Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
440to444
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
440to444
440to444
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

dynamische Bereichsnamen (abhängig von Farbindex)

dynamische Bereichsnamen (abhängig von Farbindex)
21.06.2004 16:58:09
Farbindex)
Hallo,
wie kann ich alle Zellen in den Spalten E:F mit ColorIndex = 30 zu einem Bereich verbinden und mit einem Namen versehen.
Danke für Eure Hilfe.
Gruß,
Martin

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: dynamische Bereichsnamen (abhängig von Farbindex)
Farbindex)
Hallo Martin!

Sub Name_Nach_Farbe()
Dim rng As Range
Dim rngU As Range
For Each rng In Range("E1:F56536")
If rng.Interior.ColorIndex = 30 Then
If rngU Is Nothing Then
Set rngU = rng
Else
Set rngU = Union(rngU, rng)
End If
End If
Next
ThisWorkbook.Names.Add Name:="test", RefersTo:=rngU
End Sub

Gruß Sepp
Anzeige

240 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige