Hallo Adde
Statt jedesmal den Worksheets Namen anzugeben,könntest du eine With/End With Anweisung nutzen!
With Worksheets("DeinName")
.Cells(x,y)= irgendwas
End With
Wenn das Array richtig deklariert ist!
Könntest du im Einzelschrittmodus die Wertigkeit leicht feststellen!
Gruß Michael