Excel-VBA-Auswahl von mehreren dynamischen Bereichen

Ich versuche, die Auswahl mehrerer dynamischer Bereich. Versuchen, verwenden Sie die union-Methode und ich bin immer die Methode 'Range' 'Objekt' Global ist Fehlgeschlagen Fehler auf der ersten Zeile.

Dim LR As Long
LR = Range("A60000").End(xlUp).Row

Dim R1, R2, R3, R4, R5, MultiRange As Range
Set R1 = Range("A7,:A" & LR)
Set R2 = Range("D7,:D" & LR)
Set R3 = Range("G7,:G" & LR)
Set R4 = Range("H7,:H" & LR)
Set R5 = Range("J7,:J" & LR)
Set MultiRange = Union(R1, R2, R3, R4, R5)
MultiRange.Select
Selection.Copy

Könnte jemand helfen?

Dank

InformationsquelleAutor Hinson.Li | 2014-02-06

Schreibe einen Kommentar