nur ein Blatt abspeichern-jedoch in xlsx und pdf
15.11.2016 23:20:55
Jens
was müsste ich an meinem Code ändern damit nur die Tabelle1 abgespeichert wird?
Ist es auch möglich, das z.B. in Excel .xlsx (wie wenn ausgewählt wurde) und immer zusätzlich parallel dazu (im selben Ordner) die gleiche Tabelle1 ( also nicht die gesamte Mappe)als PDF abgespeichert wird.
Eine Nachfrage sollte nur kommen- wenn die Datei bereits besteht.-also Überschreiben-- Abbrechen-
Ist dies möglich?
Mein Code der schon mal die Mappe speichert.
Private Sub CommandButton44_Click() 'Speichern_unter_neuem_Namen
'Excel Arbeitsmappe Speichern
Dim Neuer_DateiName As Variant, DateiTypen As String
DateiTypen = "Excel Files mit Makro,*.xlsm, Excel Files ohne Makro,*.xlsx," & _
"Excel Files 2003,*.xls,PDF-Datei,*.pdf"
Neuer_DateiName = Application.GetSaveAsFilename(InitialFileName:="D:\PRIVATHAUS\", _
FileFilter:=DateiTypen)
If Neuer_DateiName = False Then Exit Sub
ActiveWorkbook.SaveAs Filename:=Neuer_DateiName
End Sub
Grüße Jens