ActiveWorkbook.SaveAs Filename
Sandra
ich habe mal wieder ein Problem.
Mit dem nachfolgenden Code lasse ich automatisch speichern.
Dim Dateiname As String
Dateiname = oXlSM.Name
ActiveWorkbook.SaveAs Filename:="\\xxxx\Dokumentation\" & Dateiname & ".xml"
Das klappt auch fast. Allerdings übernimmt er nicht nur den Dateinamen der xlsm-Mappe, sondern auch die Dateiendung. Das heißt, die Datei heist nachher abcschießmichtot.xlsm.xml. Kann ich den Teil ".xlsm" irgendwie rauslöschen?
Danke und Gruß
Sandra