Mehrere Blätter in ein neues Blatt kopieren

ich habe ein kleines Problem.

Ich habe ein Formular wo alle Blätternamen aus der auktuellen Datei ausgelesen werden und für eine mehrfache Auswahl zum kopieren vorgeschlagen werden.

Beim testen habe ich die Funktion
>>Sheet(Array("BlattName1", "BlattName2")).Copy<< benutzt. Es hat wunderbar geklapt. Eine neue Tabelle wurde erstellt mit den kopierten Blätter(keine leeren Blätter). Genau richtig.

Nur Produktiv schaut es anders aus. Die Funktion Array kann keinen String z.B. >>"BlattName1", "BlattName2"<<.
Und als Array klapt es auch nicht. :-(
>>Sheet(arrSheets()).Copy<<

Kann mir eine zufällig helfen?

Badanke mich im voraus.

MfG

Walerij Riffel