Inhaltsverzeichnis
Union - Mehrere Bereiche verbinden
Möglicherweise möchten Sie mehrere Bereiche kombinieren oder verbinden, wenn die Bereichszeichenfolge zu lang ist, oder Sie möchten versuchen, die Arbeit mit Ihrem Code zu vereinfachen.
Die Notwendigkeit, mehrere Bereichszeichenfolgen zu kombinieren, ist wahrscheinlich am häufigsten, wenn eine große Anzahl nicht zusammenhängender Zellen mit VBA ausgewählt wird.
Eine Möglichkeit, mehrere Bereichszeichenfolgen zu verbinden, besteht darin, die Union-Funktion von VBA zu verwenden. Die Syntax für die Union-Funktion lautet:
| 1 | Union (Arg1 als Bereich, Arg2 als Bereich usw.) als Bereich |
Das Folgende ist ein Beispiel für die Verwendung von Union. Zuerst deklarieren Sie einige Bereichsvariablen, setzen dann die Bereichsvariablen auf etwas und kombinieren sie schließlich mit Union.
| 1234567891011 | Sub UnionBeispiel()Dim Rng1, Rng2, Rng3 als BereichSet Rng1 = Range("A1,A3,A5,A7,A9,A11,A13,A15,A17,A19,A21")Set Rng2 = Range("C1,C3,C5,C7,C9,C11,C13,C15,C17,C19,C21")Set Rng3 = Range("E1,E3,E5,E7,E9,E11,E13,E15,E17,E19,E21")Union (Rng1, Rng2, Rng3).WählenEnd Sub |
