Clever-Excel-Forum

Seiten: 1 2

Vielen Dank !!!
Gibt es eine Möglichkeit den Namen der Datei incl. des Formates zu Beginn zu ändern?

in etwa so , es klappt aber nicht :

Code:
Sub Umbenennen_Datei()

DIM VarM as Variant ( da Zahlen und Buchstaben enthalten sein können ) 

VarM = Inputbox ( Name der Datei eingeben ) 

    ActiveWorkbook.SaveAs Filename:=VarM.xlsm

End Sub

Beste Grüße

Hi,

(07.07.2017, 12:00)technoente schrieb: [ -> ]DIM VarM as Variant '(da Zahlen und Buchstaben enthalten sein können) : da geht aber auch String

VarM = Inputbox ( Name der Datei eingeben )

versuche es mal so:
ActiveWorkbook.SaveAs Filename:=VarM & ".xlsm"

Seiten: 1 2

technoente

Rabe