Sheets(Array()) - Frage
28.10.2004 09:52:43
Matthias
ich habe eine WB mit x Sheets. Davon möchte ich alle ausser 4 gemeinsam auswählen.
Dazu wollte ich :
For i = 1 To Sheets.Count
cn = Sheets(i).CodeName
Select Case cn
Case Is = "Master", "Menue", "Data1", "Data2"
GoTo sprung
End Select
'......
Next
verwenden. Nun weiß ich jedoch nicht, wie ich die Sheets in die Funktion
Sheets(Array("x", "y", "z")).Select
bekomme. Wie kann ich nun die ermittelten Sheets in das Array bekommen?
Danke.
Matthias