Startseite > Tipps & Tricks > Rund um die VB-IDE > Prüfen ob ein Verweis vorhanden ist
Team-Moeller.de - Datenbankentwicklung und mehr ...

Prüfen ob ein Verweis vorhanden ist

Prüfen, ob ein Verweis vorhanden ist

Funktion

Diese Funktion prüft, ob ein Verweis vorhanden ist.

Code

Public Function IstVerweisVorhanden(strVerweis As String) As Boolean

'Variablen deklarieren Dim ref As VBIDE.Reference
'Initialisieren IstVerweisVorhanden = False
For Each ref In Application.VBE.ActiveVBProject.References If ref.Name = strVerweis Then IstVerweisVorhanden = True Exit Function End If Next
End Function

Beschreibung

Die Funktion wird mit "False" initialsiert. Dann wird die Auflistung der Verweise durchlaufen. Wenn der Name eines Verweises mit dem gesuchten Namen übereinstimmt, ist der Verweis vorhanden.

Verweise

Damit dieser Code funktioniert, ist folgender Verweis erforderlich:

  • Microsoft Visual Basic for Applications Extensibility 5.3

Microsoft MVP - Thomas Möller


27.03.2016:
TM VBA-Inspector:
Installationsroutine überarbeitet.


23.05.2014:
TM-RebuildDatabase
Version 1.75 bereitgestellt.


07.12.2014:
TM-DatenKlassenGenerator
Version 3.55 bereitgestellt.


21.11.2014:
TM-SmartTypes
Version 2.37.18 bereitgestellt.


Powered by CMSimple - Template by CMSimple-Styles.com - Autor:Thomas Möller