Live-Forum - Die aktuellen Beiträge
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
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige