Guten Abend
Um eine CSV-Datei mit ;-Delimiter zu schreiben habe ich einen Code im Netz gefunden und in meinen Code integriert.
Der Code läuft nun, doch es hat noch ein paar Bestandteile, die ich nicht verstehe. Wer kann mir die nötigen Hints geben?
1. Was bedeutet "DateiNummer = FreeFile" ? (Dateinummer ist eine Integer-Variable, FreeFile sagt mir gar nichts.
2. Was bedeutet " ... For Output as #DateiNummer
3. Was bedeutet die Schreibweise / Sonderzeichen "#DateiNummer" / "#"?
4. Was bedeutet "Close #DateiNummer"?
Danke für eine Beschreibung für einen bescheidenen, aber wissensdurstigen VBA-User.
Gruss, Peter
AWS = SavePath & "\" & File & ".csv"
DateiNummer = FreeFile
Open AWS For Output As #DateiNummer
For zNr = 1 To aSheet.UsedRange.Rows.Count
For sNr = 1 To aSheet.UsedRange.Columns.Count
TMP = TMP & CStr(aSheet.Cells(zNr, sNr).Text) & ";"
Next sNr
TMP = Left(TMP, Len(TMP) - 1)
Print #DateiNummer, TMP
TMP = ""
Next zNr
Close #DateiNummer