Vba का उपयोग करके टैब कैरेक्टर कैसे निर्दिष्ट करें (उदाहरण के साथ)
VBA का उपयोग करके टैब वर्ण निर्दिष्ट करने के दो तरीके हैं:
- vbटैब
- सीएचआर(9)
ये दो स्थिरांक VBA में एक टैब वर्ण का प्रतिनिधित्व करते हैं।
निम्नलिखित उदाहरण दिखाता है कि व्यवहार में इनमें से प्रत्येक स्थिरांक का उपयोग कैसे करें।
उदाहरण: वीबीए का उपयोग करके टैब कैरेक्टर कैसे निर्दिष्ट करें
मान लीजिए कि हमारे पास Excel में प्रथम और अंतिम नामों की निम्नलिखित सूची है:
मान लीजिए कि हम एक संदेश बॉक्स बनाने के लिए वीबीए का उपयोग करना चाहते हैं जिसमें इनमें से प्रत्येक प्रथम और अंतिम नाम को उनके बीच एक टैब के साथ प्रदर्शित किया जाए।
ऐसा करने के लिए हम निम्नलिखित मैक्रो बना सकते हैं:
SubUseTab ()
Dim i As Integer
Dim AllNames As String
For i = 2 To 11
AllNames = AllNames & Range("A" & i).Value & vbTab & Range("B" & i).Value & vbNewLine
Next i
MsgBox AllNames
End Sub
जब हम इस मैक्रो को चलाते हैं, तो हमें आउटपुट के रूप में निम्नलिखित संदेश बॉक्स प्राप्त होता है:
ध्यान दें कि हमने प्रत्येक पंक्ति में पहले और अंतिम नाम को एक टैब के साथ जोड़ने के लिए vbTab का उपयोग किया था।
फिर हमने संदेश बॉक्स में प्रत्येक नए नाम को एक नई पंक्ति में जोड़ने के लिए vbNewLine स्थिरांक का उपयोग किया।
यदि हम चाहते, तो हम टैब वर्ण निर्दिष्ट करने के लिए chr(9) का भी उपयोग कर सकते थे:
SubUseTab ()
Dim i As Integer
Dim AllNames As String
For i = 2 To 11
AllNames = AllNames & Range("A" & i).Value & chr(9) & Range("B" & i).Value & vbNewLine
Next i
MsgBox AllNames
End Sub
जब हम इस मैक्रो को चलाते हैं, तो हमें आउटपुट के रूप में निम्नलिखित संदेश बॉक्स प्राप्त होता है:
ध्यान दें कि vbTab और chr(9) दोनों समान परिणाम देते हैं।
अतिरिक्त संसाधन
निम्नलिखित ट्यूटोरियल बताते हैं कि वीबीए में अन्य सामान्य कार्य कैसे करें:
वीबीए में स्ट्रिंग को इंट में कैसे बदलें
वीबीए में एक स्ट्रिंग को डबल में कैसे बदलें
कैसे जांचें कि स्ट्रिंग में VBA में कोई अन्य स्ट्रिंग है या नहीं