Microsoft Office Tutorials and References
In Depth Information
8.3.3 Datensätze zusammenfügen
Ausgabe des Tagesnamens, mit Hilfe von yyyy können Sie den
Monatsnamen ausgeben.
Abbildung 8.23
Datumsformatierung
8.3.3
Datensätze zusammenfügen
Für einen Export von Daten ist es häufig notwendig, die Datensätze vor-
her zusammenzufügen. Dies übernimmt die Funktion Join() . Sie wan-
delt ein eindimensionales Datenfeld in eine Zeichenkette um. Die einzel-
nen Daten eines Datensatzes werden dabei durch definierte Zeichen
getrennt. Ein Beispiel:
Join()
Sub DatensaetzeZusammenfuegen()
Dim i As Integer
Dim T(1 To 3) As String
ThisWorkbook.Worksheets("Tabelle3").Activate
Fori=1To3
T(i) = Cells(1, i).Value
Next i
Cells(2, 1).Value = Join(T, "#")
End Sub
Das Ergebnis:
Abbildung 8.24
Datenfeld in Zeichenkette umwandeln
Zur Erläuterung:
Es wird ein Datenfeld mit drei Elementen deklariert.
Die Daten eines Datensatzes stehen im vorliegenden Beispiel in drei
Zellen nebeneinander. Sie werden den einzelnen Feldelementen
zugewiesen.
Search JabSto ::




Custom Search