ist es irgendwie möglich, eine Arbeitsmappe(mit vielen Blättern, Formeln, Bezügen, Makros) unter einem neuen Namen abzuspeichern, dabei werden aber nur Werte abgespeichert, d.h. keine Formeln keine Bezüge, keine Makros oder sonstiges...
Ich habe bis jetzt dieses Makro, der speichert aber auch die enthaltenen Makros mit. Wenn man diese frisch gespeicherte Datei aufmacht, dann sind da auch diese Makros drin.
In jedem Sheet gibts einen Code, dann noch 2 Module, und Code in DieseArbeitsmappe.
Sub NurWerteSpeichern()
Dim wks As Worksheet
Dim sFile As String, sPath As String
Application.ScreenUpdating = False
sPath = GetDirectory
sFile = "Controlling_Zeiterfassung_2002_Werte.xls"
sDateiPfad = sPath & "\" & sFile
For Each wks In Worksheets
With wks.UsedRange
.Value = .Value
End With
Next wks
ActiveWorkbook.SaveAs sDateiPfad
Application.ScreenUpdating = True
End Sub
mit "GetDirectory"(Funktion) wähl der Benutzer den Ordner aus, wo die Datei gespeichert werden soll...
ich hoffe ihr könnt mir helfen,