Merge records with VBA in Microsoft Excel

Für einen Export von Daten ist es häufig notwendig, die Datensätze vorher zusammenzufügen. Dies übernimmt die Funktion Join(). Sie wandelt ein eindimensionales Datenfeld in eine String um. Die einzel- nen Daten eines Datensatzes werden dabei durch definierte Zeichen getrennt.

An example:

Sub DatensaetzeZusammenfuegen()
Dim i As Integer
Dim T(1 To 3) As String
ThisWorkbook.Worksheets("Tabelle3").Activate
For i = 1 To 3
T(i) = Cells(1, i).Value
Next i
Cells(2, 1).Value = Join(T, "#")
End Sub

A data field with three elements is declared. In this example, the data of a data record are in three cells next to each other. They are assigned to the individual field elements. The Join () function combines the elements of the data field into a character string, separated from the # character
If no separator is given, a space is used to separate the characters.

Was the explanation to "Merge records with VBA in Microsoft Excel"Helpful? Rate now:

Weitere Erklärungen zu Skriptsprachen