Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
300to304
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
300to304
300to304
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

negative Schnittmenge 2-er Range Obj

negative Schnittmenge 2-er Range Obj
27.08.2003 16:53:26
Alex
hallo zusammen.

Man stelle sich vor man nimmt 2 Range-Objekte in Form von Kreisen.Diese überschneiden sich teilweise.

Den Durchschnitt will ich entfernen und mit dem Rest weiter arbeiten.
Leider weíss ich (schonwieder) nicht weiter.

bin für jede hilfe sehr dankbar.

gruss alex

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: negative Schnittmenge 2-er Range Obj
27.08.2003 17:19:05
Martin Beck
Hallo Alex,

das mit den Kreisen ist zwar ein bißchen unklar, aber ich vermute, Du meinst die Schnittmenge zweier Ranges ohne die Vereinigungsmenge. Teste mal folgendes:


Sub Vereinigungs_minus_Schnittmenge()
Set rg1 = Range("C1:C10")
Set rg2 = Range("B3:E5")
Set ver = Union(rg1, rg2)
Set schnitt = Intersect(rg1, rg2)
For Each cell In ver
If Application.Intersect(cell, schnitt) Is Nothing Then
Set ver_minus_schnitt = cell
Exit For
End If
Next
For Each cell In ver
If Application.Intersect(cell, schnitt) Is Nothing Then
Set ver_minus_schnitt = Union(ver_minus_schnitt, cell)
End If
Next
ver_minus_schnitt.Select
End Sub

Gruß
Martin Beck
Anzeige
AW: negative Schnittmenge 2-er Range Obj
27.08.2003 17:26:51
alex
genau das mein ich :)

danke!
gruss alex

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige