एक ही सेल में पाठ को स्वाइप कैसे करें या एक्सेल में व्यवस्थित करें? - एक्सेल

मेरे पास एक शीट है और मैं पूर्व में सेल में टेक्स्ट की स्थिति बदलना चाहता हूं:

cell A                 | Cell B
----------------------------------------------
hd photo this is my    | this is my hd photo
-----------------------------------------------
pen this is my         | this is my pen
------------------------------------------------
your name what is      | what is your name

मेरे पास सेल ए मान हैं और सेल बी की तरह मूल्य बनाना चाहते हैं। आशा है कि आप मेरे प्रश्न को समझ लेंगे। धन्यवाद

उत्तर:

उत्तर № 1 के लिए 1

निम्न उपयोगकर्ता परिभाषित फ़ंक्शन का प्रयास करें (UDF):

Public Function rotate(s As String, Kount As Long) As String
ary = Split(s, " ")
ReDim bry(0 To UBound(ary))
j = 0

For i = Kount To UBound(ary)
bry(j) = ary(i)
j = j + 1
Next i

For i = 0 To Kount - 1
bry(j) = ary(i)
j = j + 1
Next i

rotate = Join(bry, " ")
End Function

उदाहरण के लिए:

यहां छवि विवरण दर्ज करें

पहला तर्क मूल पाठ वाला कक्ष है और दूसरा तर्क वाक्यांश के अंत में स्थानांतरित होने वाले शब्दों की संख्या है।

उपयोगकर्ता परिभाषित कार्य (यूडीएफ) स्थापित करने और उपयोग करने के लिए बहुत आसान हैं:

  1. एएलटी-एफ 11 वीबीई विंडो लाता है
  2. ALT-मैं एएलटी-एम एक नया मॉड्यूल खोलता है
  3. सामान को पेस्ट करें और वीबीई विंडो बंद करें

यदि आप कार्यपुस्तिका को सहेजते हैं, तो यूडीएफ इसके साथ सहेजा जाएगा। यदि आप बाद में 2003 के बाद Excel के संस्करण का उपयोग कर रहे हैं, तो आपको सहेजना होगा फ़ाइल के रूप में .xlsm बजाय .xlsx

यूडीएफ को हटाने के लिए:

  1. ऊपर के रूप में वीबीई खिड़की लाओ
  2. कोड साफ़ करें
  3. वीबीई विंडो बंद करें

एक्सेल से यूडीएफ का उपयोग करने के लिए:

=rotate(A1,3)

सामान्य रूप से मैक्रोज़ के बारे में और जानने के लिए, देखें:

http://www.mvps.org/dmcritchie/excel/getstarted.htm

तथा

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

और यूडीएफ पर विनिर्देशों के लिए, देखें:

http://www.cpearson.com/excel/WritingFunctionsInVBA.aspx

काम करने के लिए मैक्रोज़ सक्षम होना चाहिए!


संबंधित सवाल
सबसे लोकप्रिय