Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1260to1264
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
Inhaltsverzeichnis

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

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
...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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige