Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: VBA-Code beim Speichern löschen

VBA-Code beim Speichern löschen
11.01.2005 17:17:51
Alfons
Hallo Excel-User,
ich habe eine Vorlage irgendwas.xlt mit etwas VBA-Code.
Speichern tu ich das dann mit einem Command-Button:
Private Sub CommandButton3_Click()
'Speichern
Dim Pfad As String
On Error GoTo Fehler
ActiveSheet.Shapes("CommandButton1").Select
Selection.Cut
ActiveSheet.Shapes("CommandButton2").Select
Selection.Cut
ActiveSheet.Shapes("CommandButton3").Select
Selection.Cut
Pfad = "\\Irgendwo\Sensor\2005\" + Range("J16")
ActiveWorkbook.SaveAs Filename:=Pfad
Exit Sub
usw. (Fehlerbehandlung Datei gibts schon ...)
Das funktioniert auch, sogar die Command-Buttons werd ich los.
Ich möchte aber den ganzen VBA-Code vorher löschen, wie geht das?
Im voraus besten Dank
Alfons
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA-Code beim Speichern löschen
11.01.2005 19:18:40
Björn
Hi
hier mein Vorschlag:

Sub xyz()
Dim wkb1 As Workbook, wkb2 As Workbook
Set wkb1 = ActiveWorkbook    ' merken des "aktiven" Workbooks
Set wkb2 = Workbooks.Add     ' hinzufügen + merken eines neuen Workbooks
' kopieren der 1. Tabelle auf 1. Tabelle im neuen Workbook:
wkb1.Worksheets(1).Cells.Copy Destination:=wkb2.Worksheets(1).Cells
End Sub

Vorteile:
- Übernahme sämtlicher Formatierungen im gesamten Tabellenblatt
- keine Übernahmen von VBA-Code
mfg,
Björn
Anzeige
AW: VBA-Code beim Speichern löschen
11.01.2005 19:36:56
Alfons
Danke,
probier ich morgen gleich aus.
Jetzt geh ich erst mal zum Italiener.
mfg
Alfons
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige