Limits bei Range

16/02/2009 - 13:14 von Andreas Killer | Report spam
Hallo!

Gibt es einen Trick um viele Bereiche zu selektieren?

Ich habe da eine Routine die mir die nicht geschützten Zellen eines
Tabellenblattes als String (in zusammenhàngenden Bereichen)
zurückgibt; Vereinfacht zum Testen:

Sub Test()
Dim S As String, I As Long
S = "$B$22:$B$43,$B$46:$B$62,$B$66:$B$69,$B$71:$B$74,$B$76:$B$78," & _
"$B$81:$B$103,$B$106:$B$119,$B$122:$B$138,$B$140:$B$146, " & _
"$B$149:$B$160,$B$163:$B$196,$B$199:$B$201,$B$204:$B$215," & _
"$B$218:$B$219,$B$222:$B$235,$B$238:$B$249,$B$252:$B$258," & _
"$B$261:$B$264,$B$267:$B$285,$B$288:$B$308"
I = Len(S)
Range(S).Select 'Fehler 1004
S = Replace(S, "$", "")
I = Len(S)
Range(S).Select 'Kein Fehler!?!
End Sub

Da das zweite Range(S).Select funktioniert stelle ich mir die Frage
was mache ich wenn ich noch mehr Bereiche habe? Nach meinen Versuchen
ist hier bei 255 Zeichen Schluß?

Von Hand (via Strg und Mausklick) kann ich ohne Probleme noch viel
mehr Bereiche selektieren. Wie geht das in VBA?

Andreas.
 

Lesen sie die antworten

#1 Andreas Killer
16/02/2009 - 13:25 | Warnen spam
On 16 Feb., 13:14, Andreas Killer wrote:

was mache ich wenn ich noch mehr Bereiche habe? Nach meinen Versuchen
ist hier bei 255 Zeichen Schluß?


Andreas wo hast Du nur Deinen Kopf?

Vereinige die einzelnen Bereiche mit Union dann gehts. :-))

Aber trotzdem: Liegt das Limit bei Range bei Euch auch bei 255
Zeichen?

Andreas.

Ähnliche fragen