nicht angemeldet
ReMoin Freagles,
Ich habe die Excel Datei schon mal umgewandelt in eine CSV-datei, du hast recht, das funktioniert, es wäre aber wichtig das es eben auch mit einer excel-Datei gehen würde, da diese ich immer wieder ändert. Bei den Besuchern der Seite kann ich von ausgehen, dass diese nur den IE benutzen.
da hilft dir doch ein kleines Excel-Makro, das jedes Mal, wenn du die Datei speicherst auch die CSV-Datei automatisch mitspeichert...
Hier isses ;-):
Option Explicit
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim alt As Workbook
Dim neu As Workbook
Application.DisplayAlerts = False
Set alt = ActiveWorkbook
Set neu = Workbooks.Add
alt.Activate
' Hier den Namen der Tabelle eintragen, deren Daten du speichern willst
Sheets("Tabelle1").Select
Cells.Select
Selection.Copy
Range("A1").Select
neu.Activate
Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:=False _
, Transpose:=False
Range("A1").Select
Application.CutCopyMode = False
' Hier den Pfad und Dateinamen der CSV-Datei eintragen
ActiveWorkbook.SaveAs FileName:= _
"C:\DeinPfad\DeinName.csv", FileFormat _
:=xlCSV, CreateBackup:=False
neu.Close False
Range("A1").Select
Set neu = Nothing
Set alt = Nothing
End Sub
Du musst jetzt einfach nur diesen Code kopieren, deine Excel-Datei öffnen und mit [Alt]+[F11] in den VBA-Editor wechseln. Dort öffnest du im Projekt-Explorer (in der Regel oben links im Fenster) jeweils durch Doppelklick den Bereich "VBAProject (DeinName.xls)" / "Microsoft Excel Objekte" / "DieseArbeitsmappe" und fügst den Code dort ein. In den beiden Zeilen, die den Kommentaren folgen musst du noch die Namen des Tabellenblatts und der CSV-Datei anpassen und schon klappt's auch mit dem Nachbarn ;-)
Viele Grüße aus Bochum
Dirk