ist es denn möglich ein Array bestehen aus Strings aufzubauen, also dass man ein Array über Strings indexiert.
z.B.: Feld("Test1") = 2
Feld("Test2") = 3
Oder hat jemand noch irgendeine andere Möglichkeit?
Sub Test()
Dim vArr() As Variant
Dim sFeld As String
ReDim vArr(3)
vArr(0) = "Test0"
vArr(1) = "Test1"
vArr(2) = "Test2"
MsgBox "vArr(0) = " & vArr(0) & " vArr(1) = " & vArr(1) & " vArr(2) = " & vArr(2), _
64, " Hinweis für " & Application.UserName
' oder
vArr = Array("Test1", "Test2", "Test3", "Test4", "Test5")
sFeld = vArr(1)
MsgBox "sFeld = " & sFeld, _
64, " Hinweis für " & Application.UserName
sFeld = vArr(4)
MsgBox "sFeld = " & sFeld, _
64, " Hinweis für " & Application.UserName
End Sub