Shape Objekte als Array - Fehler
23.06.2003 14:21:23
Mathias
ich wunder mich gerade über folgendes. Ich möchte mehrere Objekte abhängig von UserEingaben gruppieren. Folgende Anweisung funktioniert:
ActiveSheet.Shapes.Range(Array("Textfeld1","Textfeld2")).Select
Hingegen geht folgender Code nicht (Fehlermeldung Typen unverträglich):
Dim arr
arr = Array("Textfeld1","Textfeld2")
ActiveSheet.Shapes.Range(arr).Select
Stattdessen liefert der Ansatz
ActiveSheet.Shapes.Range(Array(arr)).Select
die Fehlermeldung: "Index in der angegebenen Sammlung ist außerhalb des zulässigen Bereichs", obwohl die beiden Textfelder definitiv exisitieren und der erstgenannte Code ja auch funktioniert.
Hat jemand eine Ahnung, welchen Denkfehler ich hier drin habe? Wäre für einen Tipp sehr dankbar...
Viele Grüsse aus Berlin
mathias