Ein Excel Makro zum vorbereiten einer Excel Datei für Filemaker

[philippu2006]

Habe ich gefunden. muss ich in dem sich öffnenden Fenster etwas einstellen?

[schauan]

... nein. Wie gesagt, setze einen Haltepunkt in die Zeile (geht mit F9), starte den Code und wenn er dort anhält noch 1x F8 drücken.

[Kuwer]

Hallo,

ersetze mal

Datei = Left(ThisWorkbook.Path, InStrRev(ThisWorkbook.Path, "\")) & "Import.xlsx"

durch

Datei = Left(ThisWorkbook.Path, InStrRev(ThisWorkbook.Path, Application.PathSeparator)) & "Import.xlsx"

Gruß Uwe

[philippu2006]

Okey cool jetzt funktioniert es.
Mit dem alten Office ist jetzt alles super und es gibt keinerlei Probleme.
Mit dem neuen Office kommt aber noch eine Fehlermeldung beim schließen der Datei. An sich nicht weiter tragisch, da es aber andere Mitarbeiter nutzen müssen währ es cool wenn es keine Meldungen gibt.

[Kuwer]

Hallo,

vielleicht klappt es so:

  'Datei ohne Dialog speichern
  ActiveWorkbook.Save
  Workbooks("Import vorbereiten.xlsm").Save
  Application.Quit
End Sub

Gruß Uwe

[philippu2006]

Perfekt, Ich danke euch beiden Ihr habt mir sehr geholfen :)
Jetzt kann ich es rausgeben ^^