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
Du musst angemeldet sein, um einen Kommentar abzugeben.
Das problem tritt auf, weil das Komma in Sie Bereich Aussagen. I. e. wenn Sie
R1
sollten Sie schreiben:Auch bei der Definition der Objekt-Typ der Variablen
R1
, ...,R5
sollten Sie es schreiben alsSonst
R1
, ...,R5
wird definiert als eine Variante. Dies verursacht nicht ein problem, aber es spart Speicher und sorgt für einen saubereren code.plus eins für die richtige Art der Deklaration von Variablen.
InformationsquelleAutor Netloh
Kann man auch es so einstellen:
Was Sie getan haben ist Sie ein bisschen Durcheinander der Bereich syntax.
Sehen Sie nachstehend einige Allgemeine Reihe-Syntax:
Mit
:
zu definierenRange
:Mit
,
zu definierenRange
:Mit
Cells
Eigenschaft:Mit
Range
Eigenschaft:Alle syntax oben ergibt:
$A$1:$A$(LR)
Haben jeweils bestimmte Vorteile und verwendet.
Verwenden Sie die syntax, die Sie am besten vertraut sind mit.
Zusätzliche:
Diese nutzt
Intersect Function
:InformationsquelleAutor L42