So verwenden sie union in vba (mit beispiel)
Sie können die Union- Methode in VBA verwenden, um mehrere Bereiche zu einem zusammenzufassen.
Hier ist eine gängige Methode, diese Methode in der Praxis anzuwenden:
SubUseUnion ()
Set UnionRange = Application.Union(Range("A1:A10"), Range("C1:C10"))
UnionRange.Formula = "=RANDBETWEEN(1, 100)"
End Sub
Dieses spezielle Makro kombiniert die Bereiche A1:A10 und C1:C10 zu einem einzigen Bereich und weist dann jedem Wert in diesem kombinierten Bereich die Excel-Formel =RANDBETWEEN(1, 100) zu, wodurch ein Zufallswert zwischen 1 und 100 entsteht.
Das folgende Beispiel zeigt, wie man die Union- Methode in VBA in der Praxis nutzt.
Beispiel: So verwenden Sie Union in VBA, um Bereiche zu kombinieren
Wir können das folgende Makro in VBA definieren, um die Union-Methode zum Kombinieren der Bereiche A1:A10 und C1:C10 zu verwenden:
SubUseUnion ()
Set UnionRange = Application.Union(Range("A1:A10"), Range("C1:C10"))
UnionRange.Formula = "=RANDBETWEEN(1, 100)"
End Sub
Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:
Jede Zelle in den Bereichen A1:A10 und C1:C10 enthält jetzt die Formel =RANDBETWEEN(1, 100) , die eine zufällige ganze Zahl zwischen 1 und 100 zurückgibt.
Beachten Sie auch, dass wir der Union- Methode mehr als zwei Bereiche bereitstellen können.
Wir könnten beispielsweise das folgende Makro erstellen, das die Union- Methode verwendet, um drei verschiedene Bereiche zu kombinieren, und dann eine Formel in die Zelle jedes Bereichs einfügen:
SubUseUnion () Set UnionRange = Application.Union(Range("A1:A10"), Range("C1:C10"), Range("D1:D5" )) UnionRange.Formula = "=RANDBETWEEN(1, 100)" End Sub
Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:
Die drei Bereiche, die wir zu einem zusammengefasst haben, enthalten nun alle die RANDBETWEEN- Formel.
Hinweis : Die vollständige Dokumentation zur VBA- Union- Methode finden Sie hier .
Zusätzliche Ressourcen
In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:
So verwenden Sie Schnittmengen in VBA
So zählen Sie die Anzahl der in VBA verwendeten Spalten
So zählen Sie die Anzahl der Blätter in einer Arbeitsmappe in VBA