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

Code mit Zeilenumbruch

Forumthread: Code mit Zeilenumbruch

Code mit Zeilenumbruch
18.10.2019 18:57:02
Micha
Hallo,
habe einen Code der sehr lang ist.
Damit ich nicht bis ans "Ende der Welt" nach rechts ausweichen muss, soll ein Zeilenumbruch erfolgen.
Leider funktioniert meine Lösung nicht. Kann mir bitte jemand helfen?
Dim rg As Range
Set rg = Range("6,8,10,12,14,16,18,20,22,24:25,27:29,31 _
33,35,39,41,43,45,47:48 _
49:50,51,52, 56,58,70 _
usw.....usw.....")
rg.EntireRow.Hidden = False


Vielen Dank im Voraus
Gruß Micha
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Code mit Zeilenumbruch
18.10.2019 19:02:31
Werner
Hallo Micha,
das ist ein String, den mußt du vor dem Zeilenumbruch mit Gänsefüßchen abschließen und in der neuen Zeile mit & plus Gänsefüßchen wieder zusammensetzen.
Dim rg As Range
Set rg = Range("6,8,10,12,14,16,18,20,22,24:25,27:29,31" _
& "33,35,39,41,43,45,47:48" _
& "49:50,51,52, 56,58,70")
rg.EntireRow.Hidden = False
Gruß Werner
Anzeige
AW: Code mit Zeilenumbruch
18.10.2019 19:06:33
Micha
Hallo Werner,
vielen Dank für die schnelle Antwort.
Gruß
Micha
Gerne u. Danke für die Rückmeldung. o.w.T.
18.10.2019 19:07:33
Werner
AW: Code mit Zeilenumbruch
18.10.2019 19:15:33
Daniel
Hi
beachte, dass die Range-Adresse maximal 255 Zeichen lang sein darf.
wenn du an dieses Limit kommst, solltest die Range mit UNION zusammensetzen:
set rg = Range("8,6,10,12,14")
set rg = Union(rg, Range("16,18,20,22"))
usw
Gruß Daniel
Anzeige
AW: Code mit Zeilenumbruch
18.10.2019 19:18:20
Micha
Hallo Daniel,
vielen Dank für die schnelle Antwort.
Gruß
Micha
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18