title image


Smiley Geht es so ?
Ich habe es so gelöst und weiß nicht ob es das gelbe vom Ei ist.



Dateiname:

fName = Application.GetSaveAsFilename(InitialFileName:="Paketliste.xls")



If fName = False Then

Exit Sub

End If



On Error GoTo Dateiname

ActiveWorkbook.SaveAs Filename:=fName, FileFormat:=xlNormal

On Error GoTo 0





Wolfgang

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: