Unzusammenhängende Bereiche markieren
29.03.2018 12:22:28
Klexy
Ich möchte mehrere voneinander getrennte Zellbereiche gleichzeitig markieren. Das geht mit der _ Maus ganz einfach:
Range("E2:E13,G2:G13,M2:M13").Select
Wenn die Teilbereiche aber im Laufe eines Makros als Variablen entstehen, komm ich nicht weiter: _
Sub Unzusammenhängende_Bereiche_markieren()
Dim Teilbereich1 As Range, Teilbereich2 As Range, Teilbereich3 As Range
Dim Kombination As Range
Set Teilbereich1 = Range("E2:E13")
Set Teilbereich2 = Range("G2:G13")
Set Teilbereich3 = Range("M2:M13")
Set Kombination = Range(Teilbereich1, Teilbereich2, Teilbereich3) ' hier hakt's
Kombination.Select
End Sub