Een tabteken opgeven met vba (met voorbeelden)


Er zijn twee manieren om een tabteken op te geven met VBA:

  • vbTabblad
  • chr(9)

Deze twee constanten vertegenwoordigen een tabteken in VBA.

Het volgende voorbeeld laat zien hoe u elk van deze constanten in de praktijk kunt gebruiken.

Voorbeeld: Tabteken opgeven met VBA

Stel dat we de volgende lijst met voor- en achternamen in Excel hebben:

Laten we zeggen dat we VBA willen gebruiken om een berichtvenster te maken waarin elk van deze voor- en achternaam wordt weergegeven, met een tabblad ertussen.

We kunnen hiervoor de volgende macro maken:

 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

Wanneer we deze macro uitvoeren, ontvangen we het volgende berichtvenster als uitvoer:

VBA gebruikt het vbTab-teken

Merk op dat we vbTab hebben gebruikt om de voor- en achternaam in elke rij met een tab samen te voegen.

Vervolgens hebben we de constante vbNewLine gebruikt om elke nieuwe naam aan een nieuwe regel in het berichtvenster toe te voegen.

Als we dat hadden gewild, hadden we ook chr(9) kunnen gebruiken om een tab-teken te specificeren:

 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

Wanneer we deze macro uitvoeren, ontvangen we het volgende berichtvenster als uitvoer:

VBA gebruikt het vbTab-teken

Merk op dat vbTab en chr(9) beide dezelfde resultaten opleveren.

Aanvullende bronnen

In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende taken in VBA kunt uitvoeren:

Hoe tekenreeks naar int in VBA te converteren
Hoe een string naar dubbel te converteren in VBA
Hoe te controleren of string een andere string bevat in VBA

Einen Kommentar hinzufügen

Deine E-Mail-Adresse wird nicht veröffentlicht. Erforderliche Felder sind mit * markiert