Speichern im aktuellen Verzeichniss und xls-Format
06.10.2002 12:10:12
Klaus K.
ich benutze folgendes Makro um eine Arbeitsmappe (97) beim Öffnen in die aktuelle Excel-Version des Users zu speichern.
Private Sub Workbook_Open()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
datei = ThisWorkbook.Name
ActiveWorkbook.SaveAs Filename:=datei, FileFormat _
:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:= _
False, CreateBackup:=False
End Sub
Das Problem ist aber, dass die Mappe hier im Standartverzeichnis gespeichert wird.
Es soll aber im aktuellen Verzeichniss gepeichert werden. Also da wo die Mappe geöffnet wurde.
Ich wäre für jeden Ansatz dankbar.
Gruss
Klaus