Live-Forum - Die aktuellen Beiträge
Datum
Titel
27.09.2025 13:16:54
Mit VBA erstellter S.-Brief erzeugt mehr Briefe als Daten
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
348to352
348to352
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Modul im VBProject vorhanden?

Forumthread: Modul im VBProject vorhanden?

Modul im VBProject vorhanden?
10.12.2003 18:29:27
Andreas
Hallo Forum,

wie kann ich abprüfen, ob im aktuellen Workbook ein bestimmtes Modul bereits vorhanden ist? Also, irgendwie in der Richtung

If Exists(ActiveWorkbook.VBProject.VBComponents("Modul1")) Then
Do Something
Else
Do Something Else
End If

Grüße
Andreas
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Modul im VBProject vorhanden?
10.12.2003 18:36:13
Bärnd
Hallo Andreas,

Dim booVorhanden as Boolean
Dim vbcTmp as VBComponent

booVorhanden = False
For Each vbcTmp in ActiveWorkbook.Components
If vbcTmp.Name = "Modul1" Then booVorhanden = True
Next cvbTmp

If booVorhanden Then
Do Something
Else
Do SomethingElse
End If

Eventuell (quick and dirty) geht auch was in der Art:
Dim strTmp$

strTmp = ""
On Error Resume Next
strTmP = ActiveWorkbook.VBProject.VBComponents("Modul1").Name
On Error Goto 0
If strTmp = "Modul1" Then
Do Something
Else
Do SomethingElse
End If

Ciao

der Bärnd
Anzeige
AW: Modul im VBProject vorhanden?
10.12.2003 18:38:50
Andreas
Genau das was ich suchte, danke!
;

Forumthreads zu verwandten Themen

VBProject
wolfgang

Hallo
nach folgender vba schnipsel funktioniert nicht
With ActiveWorkbook.VBProject
.VBComponents.Remove .VBComponents("Modul1")
End With
muß man irgendeinen Verweis aktivieren ?
hat jeman ein Tipp
gruß Wolfgang
11.12.2008 21:12:00
Thread-ID: 1032229
6 Beiträge
ThisWorkbook.VBProject ansprechen
Andreas

Hallo Excel Freunde,
wie kann ich in VBA bestimmen, daß die Aktion nicht im Bereich „ActiveVBProject.VBComponents“, sondern analog zu „ThisWorkbook“ durchgeführt wird?
Konkret will ich eine Messagebox kommen lassen, die die CodeElemente des Workbooks anzeigt aus dem die Messagebox gesta...
10.06.2009 20:44:47
Thread-ID: 1080609
2 Beiträge
Bibliothek für VBProject.References
skaddy

Hallo zusammen
Ich wollte die Referenzen auslesen damit ich eine spezielle dann bei einem Add-In mit setzen kann. Leider steigt meine Makro aus in der Zeile Set oRefs = ActiveWorkbook.VBProject.References
Ich denke ich habe die Bibliothek nicht... kenn mich da aber nicht so aus.
Ka...
20.05.2010 22:29:48
Thread-ID: 1158170
2 Beiträge
VBProject läuft bei Schreibschutz nicht
Peter

Hallo,
die Anweisung:
ActiveWorkbook.VBProject.VBComponents.Count
läuft nur , wenn das VB Projekt keinen Schreibschutz hat. Gibt es eine Lösung?
11.07.2010 19:00:15
Thread-ID: 1166517
13 Beiträge
Application.VBE.ActiveVBProject
Joachim

Hallo zusammen,
mit nachstehenden Code erzeuge ich - bei Codeänderungen im Projekt - automatisch eine neue Versionsnummer.
Dim Jetzt As Date Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) If Application.VBE.ActiveVBProject.Saved = True Then Exit Sub Jetzt...
18.08.2011 09:33:16
Thread-ID: 1226573
8 Beiträge
Anzeige
Application.VBE.ActiveVBProject
Joachim

Hallo zusammen,
mit nachstehenden Code erzeuge ich - bei Codeänderungen im Projekt - automatisch eine neue Versionsnummer.
Dim Jetzt As Date Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) If Application.VBE.ActiveVBProject.Saved = True Then Exit Sub Jetzt...
18.08.2011 09:43:14
Thread-ID: 1226575
3 Beiträge
Anzeige
VBProject
Heidrun

Hi,ich habe ein Problem mit einer VBA-Routine, die in Excel 97/2000 lief, in Excel XP nicht mehr.Bei der Zeile:With ThisWorkbook.VBProjct.VBComponents("Symbolleiste").CodeModulegibt es den Laufzeitfehler 1004Die Mehtode "VBProject" für das Object "_Workbook" ist fehlgeschlagen.Leider habe ich n...
23.07.2002 17:03:01
Thread-ID: 139623
3 Beiträge
Anzeige
Application.VBE.ActiveVBProject.Filename
Christian

Hallo,
ich habe folgendes Problem. Nachstehender Code funktioniert in Excel 2010, aber in Excel 2002 "nicht ganz so gut":
Private Sub Workbook_Open() MsgBox (Application.VBE.ActiveVBProject.Filename) End Sub In Excel 2002 habe ich das Phänomen, dass die Fehlermeldung "Pfad nicht gefund...
08.09.2015 17:13:12
Thread-ID: 1446581
3 Beiträge
Zugriff auf VBProject zickt auf anderem Rechner
Burkhard

Hallo miteinander,
ich importiere per VBA Codemodule (aus sImportFromPath) in eine Excel-Datei (sImportToFile). Auf meinem Rechner funktioniert auch alles wunderbar; auf einem anderen Rechner reagiert das "Workbooks.Open" sehr seltsam: anstatt im Code weiterzumachen, wird die Zieldatei geöf...
22.01.2018 10:19:33
Thread-ID: 1603772
7 Beiträge
Anzeige
Application.VBE.VBProjects.Item(3).VBComponents...
Steffen D

Hallo,ich ändere mit Hilfe eines Makros eine Zeile in einem Makro, und zwar mit diesem Befehl:text2 = "Range("B48").FormulaLocal = "=SUMME(A1:A10)"Application.VBE.VBProjects.Item(3).VBComponents.Item(6).CodeModule.ReplaceLine 8, text2
nun, so wie ich es mache wird es nicht auf allen Rechnern...
03.12.2002 14:39:40
Thread-ID: 188398
3 Beiträge
vbClear, VBProject-Reiniger von Hans
Steffen D

Hallo Leute,ich habe eine Arbeitsmappe mit ca. 20 Blättern
nun hat sich die Dateigröße seit letztens fast verdoppelt (von 700kb auf 1200kb).Nun wollte ich mal den VBProject-Reiniger von hans ausprobierenaber leider scheitert bei mir schon der download!
folgende fehlermeldung kommt:WARNING...
05.12.2002 08:32:16
Thread-ID: 189117
3 Beiträge
Absturz- VBProject.VBComponents("Tabelle")
Daniel

Hallo Forumer,also ich hab folgendes Problem. Ich will mit einem Makro ein Makro schreiben. Ich weiß zwar wie, allerdings macht stürtzt Excel mir dabei immer ab.
Also Tabelle wird einwandfrei übergeben und in der Variable Tabelle und gcn steht dir richtige Tabelle drin.Sub Sub_anlegen(Tabell...
03.03.2003 16:36:47
Thread-ID: 226617
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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