Laufzeitfehler 6 Überlauf bei Array
04.07.2023 15:01:33
Carsten
Hallo,
ich habe ein kleines Problem beim befüllen eines Array. Ich möchte das Array aus einem Tabellenblatt befüllen, der Bereich ist B3 bis I letzte belegte Zelle.
Jedoch schaffe ich es nicht einmal den Bereich B3:D9 in ein Array zu bekommen. Bei B3:C9 klappt es.
Hier mal der Code, der Bereich ist hierbei willkürlich gewählt und hat nichts mit dem gewünschten Ergebnis zu tun. War einfach nur um zu testen was passiert.
Kann mich vielleicht jemand von der Leitung heben?
Sub TS_oTS()
Dim arr() As Variant
Dim arr2() As Variant
arr = Range("B3:C9")
arr2 = Range("B3:D9")
End Sub