Fehlermeldung, wer kann helfen
28.03.2005 07:50:35
Bryan
ich bekomme bei folgendem Code die untenstehende Fehlermeldung.
Sub Werte_R410()
Data = Array( _
Array("B3", "L21800W1.X", "IP21-G402", "", 1040, 0, 0), _
Array("B4", "L21800", "IP21-G402", "", 1040, 0, 0), _
Array("B5", "ANA21812.Y_Z", "IP21-G402", "", 1040, 0, 0), _
Array("B6", "ANA21808.Y_Z", "IP21-G402", "", 1040, 0, 0), _
Array("B12", "ANA21810.Y_Z", "IP21-G402", "", 1040, 0, 0) _
)
For i = 0 To UBound(Data)
Range(Data(i, 0)).Formula = "=ATGetCurrVal(Data(i, 1), Data(i, 2), Data(i, 3), Data(i, 4), Data(i, 5))"
Next
End Sub
Fehlermeldung:
(Data(i, 0) Index auserhalb des gültigen Bereichs
hat jemand eine ahnung was da schief läuft
gruss Bryan