Hi,

so z.B.:
 

In ein Standardmodul:

Option Explicit

Sub test()
Dim cls As New Klasse1
cls.TestVariable = "sdfsgrdfgb"
MsgBox cls.TestVariable
End Sub

In ein Klassenmodul mit dem Namen "Klasse1":

Option Explicit

Public TestVariable As String

Gruß

Till