würde gerne nur eine Tabelle einer Arbeitsmappe (die aus mehreren Tabellen besteht) im Hintergrund speichern und die Quelle offen lassen.
Sub Tabelle_Speichern()
Application.ScreenUpdating = False
Sheets("Tabellen_Name").Activate
ActiveSheet.Copy
Application.Dialogs(xlDialogSaveAs).Show
With ActiveWorkbook
' .SaveAs Filename:="C:\..\" & ActiveSheet.name & ".xls"
.Close
End With
Application.ScreenUpdating = True
Call MsgBox("fertig")
End Sub
FRAGEN:
1.) kann ich im Excel Standarddialog den Eintrag für den Namen der .xls Datei vorgeben. Er sollte ActiveSheet.name sein !
2.) kann ich den Pfad auf einen standar setzten ? (z.B. "C:\Eigene Dateien")
MERCI !
marco