Wie verwende ich die Option Private-Anweisung in VBA?

In VBA (Visual Basic for Applications) wird die `Private`-Anweisung verwendet, um die Sichtbarkeit von Variablen, Prozeduren oder Funktionen auf das Modul zu beschränken, in dem sie deklariert sind. Dies bedeutet, dass sie nur innerhalb dieses Moduls verfügbar sind und nicht von anderen Modulen aus zugegriffen werden können. Dies ist nützlich, um den Zugriff auf bestimmte Teile Ihres Codes zu kontrollieren und Namenskonflikte zu vermeiden.

Hier ist, wie Sie die `Private`-Anweisung verwenden können:

Private Variablen

Um eine Variable privat zu machen, deklarieren Sie sie mit dem Schlüsselwort `Private` am Anfang des Moduls:

Private myVariable As Integer

Private Prozeduren und Funktionen

Um eine Prozedur oder Funktion privat zu machen, verwenden Sie das `Private`-Schlüsselwort vor ihrer Deklaration:

Private Sub MyPrivateSub()
    ' Code der Prozedur
End Sub

Private Function MyPrivateFunction() As String
    ' Code der Funktion
    MyPrivateFunction = "Hello"
End Function

Verwendung

Angenommen, Sie haben ein Modul wie folgt:

' Modul1

Private myVariable As Integer

Private Sub MyPrivateSub()
    myVariable = 10
    Debug.Print myVariable
End Sub

Public Sub MyPublicSub()
    MyPrivateSub ' Dieser Aufruf funktioniert, da er im selben Modul erfolgt
End Sub

In diesem Beispiel ist `myVariable` eine private Variable, und `MyPrivateSub` ist eine private Prozedur. Sie können `MyPrivateSub` und `myVariable` innerhalb desselben Moduls verwenden. Die `MyPublicSub` Prozedur kann `MyPrivateSub` aufrufen, weil sie im selben Modul definiert ist. Von einem anderen Modul aus wären jedoch weder `myVariable` noch `MyPrivateSub` zugänglich.

Fazit

Die `Private`-Anweisung ist eine effektive Methode, um die Zugriffsebene für bestimmte Teile Ihres Codes in VBA einzuschränken und sicherzustellen, dass nur autorisierte Teile Ihrer Anwendung Zugriff auf bestimmte Daten oder Funktionen haben.

Unlock Your Potential

Excel

Basic - Advanced

Access

Access Basic - Advanced

Power BI

Power BI Basic - Advanced

Help us grow the project