Speichern ohne VBACode
24.05.2006 13:03:35
Volker
Ich versuche mit dem untenstehenden Code eine Sicherung anzulegen.
Da sich auf den Ursprungstabellenblatt mehrere Schaltflächen befinden, diese beim "speichern unter" mitkopiert werden,wird der Kopiervorgang mit Fehlermeldung beendet.
Wie kann ich es erreichen, das nur das Blatt ansich, d.h. ohne dazu gehörenden Code und ohne Schaltflächen kopiert wird?
Hier der Code
Sub Rechnung_sichern()
Dim A1Text As String
Sheets("Rechnung").Select
A1Text = Sheets("Rechnung").[M7]
Sheets("Rechnung").Copy
ActiveWorkbook.SaveAs "G:\Ausgangsrechnungen_nicht_bezahlt\" & A1Text & ".xls"
End Sub
Vielen Dank
Gruß Volker
Anzeige