Herbers Excel/VBA-Archiv
Range zusammenfassen (Code abkürzen)? | Herbers Excel-Forum
- Range zusammenfassen (Code abkürzen)? von Florian vom 05.02.2010 07:43:11
- AW: Range zusammenfassen (Code abkürzen)? - von Josef Ehrensberger am 05.02.2010 07:54:34
- Cool, Danke Sepp! oT - von Florian am 05.02.2010 08:01:12
- Cool, Danke Sepp! oT - von Florian am 05.02.2010 08:01:12
Betrifft: Range zusammenfassen (Code abkürzen)?
von: Florian
Geschrieben am: 05.02.2010 07:43:11
Guten Morgen Excel-Volk!
Habe eine Frage bzgl. Ranges: habe oft verschiedene, nichtzusammenhängende Bereiche, die gleich formatiert werden sollen, z.B.
With .Range(.Cells(8, 2), .Cells(8, 45))
.[FORMAT]
End With
With .Range(.Cells(17, 2), .Cells(17, 45))
.[gleiches FORMAT]
End With
Gibt es eine Möglichkeit, diese beiden Ranges zusammenzufassen, den Code also abzukürzen, so dass ich nicht alles mehrfach schreiben muss?
Vielen Dank schon mal für Eure Hilfe!
Gruss Florian
Betrifft: AW: Range zusammenfassen (Code abkürzen)?
von: Josef Ehrensberger
Geschrieben am: 05.02.2010 07:54:34
Hallo Florian,
ja, z.B. mit Union()
With Union(.Range(.Cells(8, 2), .Cells(8, 45)), .Range(.Cells(17, 2), .Cells(17, 45))) '... End With
Betrifft: Cool, Danke Sepp! oT
von: Florian
Geschrieben am: 05.02.2010 08:01:12
..