Как указать символ табуляции с помощью 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