Hallo Leute,
ich habe folgenden Code zum speichern des zweiten Tabellenblattes im Forum bekommen (welches auch super funktioniert), jedoch möchte ich gerne nur die Werte aus der Tabelle speichern und nicht die Formate.
Wo muss ich was hinzufügen?
Option Explicit
Sub Blatt_kopieren_und_speichern()
Dim objNewWorkbook As Workbook
Application.ScreenUpdating = False
Sheets("Tabelle2").Cells.Copy
Set objNewWorkbook = Workbooks.Add
objNewWorkbook.Sheets(1).PasteSpecial
On Error GoTo ERRORHANDLER
Application.DisplayAlerts = False
objNewWorkbook.SaveAs Filename:="C:\Dokumente und Einstellungen\DATENAUSW.xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
objNewWorkbook.Close
ERRORHANDLER:
Set objNewWorkbook = Nothing
Application.DisplayAlerts = True
End Sub
