كيفية تحديد حرف علامة التبويب باستخدام vba (مع أمثلة)

هناك طريقتان لتحديد حرف جدولة باستخدام VBA:

• vbTab
• مركز حقوق الإنسان(9)

يمثل هذان الثابتان حرف جدولة في VBA.

يوضح المثال التالي كيفية استخدام كل من هذه الثوابت عمليًا.

مثال: كيفية تحديد حرف علامة التبويب باستخدام VBA

لنفترض أن لدينا القائمة التالية من الأسماء الأولى والأخيرة في Excel:

لنفترض أننا نريد استخدام VBA لإنشاء مربع رسالة يعرض كل من هذه الأسماء الأولى والأخيرة مع وجود علامة تبويب بينهما.

يمكننا إنشاء الماكرو التالي للقيام بذلك:

 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:

كيفية تحويل السلسلة إلى int في VBA
كيفية تحويل سلسلة إلى مضاعفة في VBA
كيفية التحقق مما إذا كانت السلسلة تحتوي على سلسلة أخرى في VBA