Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
348to352
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
348to352
348to352
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

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

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!

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige