Hallo liebe VBA Gemeinde,
ich habe volgendes Problem und zwar möchte ich ein excel Tabellenblatt als csv datei Exportieren
Mit diesem Code hier klappt das auch wunder bar
If Dateiname <> "False" Then
ActiveSheet.SaveAs Filename:=Dateiname, FileFormat:=xlCSV, Local:=False
Jetzt ist aber das problem das diese csv datei irgenwie noch mit excel verbunden ist, dass heißt wenn ich jetzt z.B. dieses Blatt dann lösche mit:
Dim wks As Worksheet
Dim blatt As String
Application.DisplayAlerts = False
blatt = "Zwischenspeicher"
For Each wks In ActiveWorkbook.Worksheets
If wks.Name = blatt Then
Sheets(blatt).Delete
End If
Next
Und dann über das "Normal Excel-Speicher" Icon speichere so überschreibt er mir die csv datei wieder mit dem nächsten Tabellenblatt
Ich schätz mal ich muss die csv datei oder das "Speicherevent" irgendwie noch schliesen aber ich komme einfach nicht drauf.
Ich hoffe sehr es kann mir einer helfen ich bin hier schon voll am verzweifeln.
Vielen dank schonmal im vorraus
|