title image


Smiley Re: Tabelle mit VB speichern unter .csv - falsches Listtrennzeichen
Hallo Helmut,versuche es mal mit diesem Code.GrussUdoSub CSV_Format()Dim exportfile As Stringexportfile = "Demo.csv"Dateinummer = FreeFileSet TB = Worksheets("Tabelle1")Open exportfile For Output As #DateinummerFor Z = 1 To TB.UsedRange.Rows.CountFor S = 1 To TB.UsedRange.Columns.CountTMP = TMP & CStr(TB.Cells(Z, S).Text) & ";"Next STMP = Left(TMP, Len(TMP) - 1)Print #Dateinummer, TMPTMP = ""Next ZClose #DateinummerMsgBox "Die Datei:" & Chr$(13) & exportfile & Chr$(13) & "wurde erstellt!"End Sub

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: