Gruppe
Funktion
Problem
Ermittlung ein Schnittstelle mit Hilfe des Schnittstellen-Operators. Alternativ dazu die Ermittlung über VBA-Code.
StandardModule: mHWH
Sub WerteZuweisen()
Dim arr As Variant
Dim iCounter As Integer
arr = Range("A1").CurrentRegion.Value
For iCounter = 1 To UBound(arr)
MsgBox arr(iCounter, 1)
Next iCounter
End Sub