Structure felder
 
        Dim feld1 As String
        Dim feld2 As String
        Dim feld3 As String
 
End Structure
 
 
 
Public x As felder
 
 
Dim $feldname as string
 
 
 
$feldname = x.(1)         <--- Namen einzelne Variablen ermitteln
 
x.$feldname = "1234"      <--- Wert setzen