Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
628to632
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
628to632
628to632
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA-Code löschen

VBA-Code löschen
29.06.2005 16:20:30
Sevket
Hallo,
ich benutze in einem Excel-Dokument die Objekte "ThisWorkbook" und "Sheet1" zur ereignisgesteuerten Anpassung meines Dokumentes. Nun möchte ich ereignisgesteuert das Dokument unter einem anderen Namen abspeichern. Vorher möchte ich aber alle controls löschen und sämlichen VBA-Code entfernen. Das Abspeichern unter einem anderen Namen nach Entfernen der controls funktioniert soweit ganz gut. Nur wenn ich das abgespeicherte Dokument dann öffnen möchte, steigt mir Excel aus. Ich nehme an, daß eben der noch vorhandene VBA-Code verweise zu den control hat...Hilfe...und vielen Dank !!

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

Betreff
Datum
Anwender
Anzeige
AW: VBA-Code löschen
29.06.2005 18:40:05
GraFri
Hallo
Vielleicht hilft dir folgender Code weiter.


      
' Code in das erste Tabellenblatt (nach "DieseArbeitsmappe"), da der Löschvorgang
' in der Richtung "letzten Tabelle" zur "ersten Tabelle verläuft". Zuerst "Module",
' dann "Userformen" und zuletzt "Ereignisprozeturen (Code in einem Tabellenblatt) löschen"

'Diese Prozedur zum Löschen aufrufen
Sub Alles_löschen()
    Call Lösche_Module
    Call Lösche_Userformen
    Call Lösche_Ereignisprozeduren
End Sub
Sub Lösche_Module()
'Löscht Module:
    For n = ThisWorkbook.VBProject.vbComponents.Count To 1 Step -1
        If ThisWorkbook.VBProject.vbComponents(n).Type = 1 Then
            ThisWorkbook.VBProject.vbComponents(n).Collection.Remove ThisWorkbook.VBProject.vbComponents(n)
        End If
    Next
End Sub
Sub Lösche_Userformen()
'Löscht Userforms:
    For n = ThisWorkbook.VBProject.vbComponents.Count To 1 Step -1
        If ThisWorkbook.VBProject.vbComponents(n).Type = 3 Then
            ThisWorkbook.VBProject.vbComponents(n).Collection.Remove ThisWorkbook.VBProject.vbComponents(n)
        End If
    Next
End Sub
mfg, GraFri
Anzeige
AW: VBA-Code löschen
30.06.2005 16:41:20
Sevket
Hallo GraFi,
vielen vielen Dank...Das ist genau das, wonach ich suchte...Hat mir echt geholfen...Respekt!!!
Gruß

12 Forumthreads zu ähnlichen Themen

Pivot VBA Tabellenblatt löschen
murat

Halllo,
ich möchte ein erzeugtes tabellenblatt, das durch pivot doppelklick entstanden ist wieder löschen.
ich habe folgendes Makro
Private Sub CommandButton1_Click() Dim letzteZelle As Long letzteZelle = Worksheets("Tabelle42").Cells.Find(What:="*", _ After:=[A1], SearchDirection:=...
24.01.2010 21:10:25
Thread-ID: 1132506
5 Beiträge
Anzeige
Access VBA Tabellen löschen
Michael

Hallo Forum,
meine Suche im Netz nach einem Code für Access mit dem ich ausgewählte Tabellen beim schliessen von Access automatisch löschen lassen will war bisher leider vergeblich.
Beim schliessen sollen nur zwei Tabellen erhalten bleiben, alle anderen können zwecks Speicherplatz gelö...
02.07.2015 11:34:45
Thread-ID: 1434433
3 Beiträge
löschen von Tabelle2 VBA
Tabelle2

Hallo zusammen,
ich habe in der Tabelle 1
Nummern und texte vergeben
Spalte A2
1-01-01-10
1-01-02-20,08
1-01-02-20,07
1-80-01-10
1-80-01-10,01
1-55-09-30
In der Tabelle 2
D2
stehen plätze oder Texte drin die in der Tabelle 1 gelöscht ( komplette...
13.02.2016 08:48:36
Thread-ID: 1475215
5 Beiträge
Anzeige
VBA Macro Inhalt Tabelle löschen wenn bestimmte Re
Andre

Hallo,
ich habe mal wieder ein kleines Problem mit excel VBA(Macro).
Ich habe eine Tabelle(Stunden) die ich jede Woche neu schreibe.
Diese Tabelle kopiere ich nur und gebe dem Tabellenblatt nur einen neuen Namen,KW12)
Wenn ich diese Tabelle dann kopiere und KW13 daraus mache, da...
22.03.2017 12:25:03
Thread-ID: 1548822
15 Beiträge
Tabelle aus der Liste der VBA-Projekte entfernen
F.M.

Das nächste Problem :-(
Ich habe bei meinen VBA-Versuchen, bei denen es um das passwortgeschütze ein- und ausblenden von Arbeitsblättern geht, irgendwann ein Blatt eingeblendet (mit "Sheets("nn").Visible = True" welches ich jetzt nicht mehr wirklich gelöscht bekomme. Es steht jedenfalls ega...
22.07.2005 11:49:43
Thread-ID: 640991
2 Beiträge
VBA: Zeile 7 in allen Tabellenblättern löschen
Janesch

Hallo Zusammen,
ich habe eine Aufgabe die bei mir öfters auftritt,
Habe Datei mit 25 Tabellenblättern und muss in jedem Tabellenblatt die 7 Zeile löschen.
Ich würde gerne über VBA lösen. Kann mir da jemand helfen.
Vielen Dank im Voraus.
Janesch
25.10.2019 15:59:28
Thread-ID: 1719715
6 Beiträge
VBA ListBox Zeilen in Tabelle löschen
Chris

Guten Abend zusammen,
ich habe ein Problem mit dem Löschen von Inhalten aus meiner Tabelle anhand der Auswahl in der ListBox.
Ich lese die Daten der ListBox aus einem Tabellenblatt ein. Multiselect ist aktiviert. Ich würde gerne für jede ausgewählte Zeile aus der ListBox, die entspreche...
28.11.2020 20:12:54
Thread-ID: 1796128
7 Beiträge
VBA Button letzte Tabellenspalte löschen
Thorsten

Hallo ich bräuchte Hilfe. Ich will einen VBA Button, der mir bei Knopfdruck die letzte _
beschrieben Zeile löscht. Private Sub CommandButton2_Click() Dim loLetzte As Long With Sheets("Arbeitsmittel") loLetzte = .Cells(Rows.Count, 1).End(xlUp).Row 'letzte Zeile in Spalte A, Spalte anpasse...
15.01.2021 23:56:11
Thread-ID: 1806092
16 Beiträge
Anzeige

Links zu Excel-Dialogen

UserForm

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
6
2
4
3
14
1
5
6
15
1
4