Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Tabellenblatt ohne Code speichern

Tabellenblatt ohne Code speichern
02.05.2007 13:52:11
Holger
Hallo
Ich möchte ein Tabellenblatt über ein Makro ohne Code speichen.
Habe mit dem Speichen auch keine Schwierigkeiten nur möchte ich dies ohne den folgenden Code.

Private Sub Worksheet_Activate()
UserForm1.Show
End Sub


Kann mir jemand dabei helfen ?
Gruß
Holger

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblatt ohne Code speichern
02.05.2007 15:45:16
Rudi
Hallo,
etwa so:

Sub BlattOhneCodeKopieren()
Worksheets("Tabelle1").Copy
With ActiveSheet.Parent.VBProject.VBComponents(ActiveSheet.CodeName).CodeModule
.DeleteLines 1, .CountOfLines
End With
On Error GoTo ERRORHANDLER
ActiveWorkbook.SaveAs ThisWorkbook.Path & "\test.xls"
Exit Sub
ERRORHANDLER:
MsgBox "Die Datei konnte nicht gespeichert werden!"
End Sub


Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

Anzeige
AW: Tabellenblatt ohne Code speichern
03.05.2007 08:08:39
Holger
Hallo
Danke für den Code, aber es kommt bei der Ausführung des Codes zur Fehlermeldung "Objekt erforderlich"
(Userform1 kann nicht gefunden werden).
Der Code:

Private Sub Worksheet_Activate()
UserForm1.Show
End Sub


steht in der Tabelle9.
Hat vielleicht jemand eine Idee ?
Gruß
Holger

Anzeige
;

Forumthreads zu verwandten Themen

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