Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
13.10.2025 13:34:56
PQ Abfrage mit verschiedenen Werten ausführen + Protokoll
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
928to932
928to932
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Union-Methode als Abzug

Forumthread: Union-Methode als Abzug

Union-Methode als Abzug
30.11.2007 14:37:00
Oliver
Hallo zusammen,
gibt es eine Funktion, die einen Bereich als Abzugsbereich wiedergibt?
Union mach ja folgendes:
set Range1 = Union(Range("A1:A3"),Range("A4:A5"))
'Range1.address = "$A$1:$A$5"
Jetzt möchte ich aber folgendes machen
set Range1 = Abzugsfunktion(Range("A1:A5"),Range("A4:A5"))
'Range1.Address = "$A$1:$A$3"
Ein Drumherum habe ich mir schon gebastelt! :-)
Gruß,
Oliver.

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Union-Methode als Abzug
30.11.2007 16:04:43
Gerd
Hi,
siehe Resize.
mfg Gerd

AW: Union-Methode als Abzug
30.11.2007 17:22:39
Erich
Hallo Oliver,
aus dem, was Bernd da im Online Excel Forum geschrieben hat, kann man noch etwas kürzer
die von dir vermutlich benötigte Funktion basteln: 

Function RangeDiff(r1 As Range, r2 As Range) As Range
Dim r As Range, rdiff As Range
Set rdiff = Nothing
For Each r In r1
If Intersect(r, r2) Is Nothing Then _
If rdiff Is Nothing Then Set rdiff = r Else Set rdiff = Union(rdiff, r)
Next
Set RangeDiff = rdiff
Set rdiff = Nothing
End Function

Grundlage dafür war:
http://www.online-excel.de/fom/fo_read.php?f=1&bzh=5831&h=5806
Bernds Lösung ist nicht die Differenz A minus B zweier Ranges, sondern eher A XOR B,
anders ausgedrückt: Union(A,B) ohne Intersect(A,B),
oder: Range aus allen Zellen, die in genau einer der Ranges A und B enthalten sind (nicht in beiden).
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige