Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Syntax zu mehreren With

Forumthread: Syntax zu mehreren With

Syntax zu mehreren With
Jörg-HH
Hallo zusammen
kann man eine Konstellation wie diese
...
With .Range(A1)
.Interior.ColorIndex = 24
.Font.ColorIndex = 24
End With
With .Range(A2)
.Interior.ColorIndex = 24
.Font.ColorIndex = 24
End With
With .Range(A3)
.Interior.ColorIndex = 24
.Font.ColorIndex = 24
End With
...usw....
nicht irgendwie kürzer fassen?
Grüße - Jörg
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Syntax zu mehreren With
24.04.2012 14:00:10
Dieter
Hallo Jörg
du kannst z.B. schreiben
With .Range("A1:A27")
.Interior.ColorIndex = 24
.Font.ColorIndex = 24
End With
oder, wenn du die ganze Spalte formatieren willst
With .Columns("A")
.Interior.ColorIndex = 24
.Font.ColorIndex = 24
End With
Viele Grüße
Dieter
Anzeige
...Ergänzung...
24.04.2012 14:06:59
Jörg-HH
...sorry, Dieter - hab mich unvollständig ausgedrückt: Die in Frage kommenden Zellen bilden keinen zusammenhängenden Bereich...
Jörg
AW: ...Ergänzung...
24.04.2012 14:56:03
guentherh
Du kannst jede Range verwenden, musst halt auf die Syntax-unterschiede zw. VBA und GUI achten.
ein Beispiel für einen nicht zusammenhängenden Bereich:
Sub selectwas()
Range("A1,B2,C3").Select
With Range("A1,B2,c3")
.Interior.ColorIndex = 24
.Font.ColorIndex = 24
End With
End Sub
Gruß,
Günther
Anzeige
ok, danke! oT
24.04.2012 15:18:02
Jörg-HH
;

Beliebteste Forumthreads (12 Monate)

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