Code Optimierung

in Modul-Makros beziehe ich mich häufig auf die gleichen Objekte (z. B. Textboxen) in einer Userform. Dafür schreibe ich folgenden Code:

Test()
Dim UF As UserForm, TB1 As Object
Set UF = Userform1
Set TB1 = UF.TextBox1
...
End Sub

Da sich die ersten drei Zeilen innerhalb des Makros in vielen anderen Modul-Makros wiederholen, wäre es von Vorteil, diese drei Zeilen nur ein mal zu "deklarieren". Nur wo und wie, daß ist mir nicht bekannt.

Wäre schön, wenn mir jemand helfen könnte.

Rainer