HERBERS Excel-Forum - das Archiv

Thema: Bereich erweitern

Bereich erweitern
matthias
Guten Morgen,
ich habe diese Zeile: 
    ActiveSheet.Range(Cells(ze, 5), Cells(ze, 6)).Select


dieser Bereich soll erweitert werden die Spalte 10 + 11
das ist natürlich Falsch: ActiveSheet.Range(Cells(ze, 5 +10), Cells(ze, 6 + 11)).Select

mfg matthias
AW: Bereich erweitern
schauan
Hallöchen,

- zum einen gibt es meist die Möglichkeit, auf Select zu verzichten
- zum anderen, schaue Dir mal Union an (Nicht den Fußballclub :-) )
AW: Bereich erweitern
Beverly
Hi Matthias,

meinst du das so: 

Union(Cells(ze, 5), Cells(ze, 6), Cells(ze, 10), Cells(ze, 11)).Select


Bis später
Karin

Link zur Homepage: https://excel-inn.de/
AW: Bereich erweitern
MCO
Moin Matthias!

So ganz hab ich das nicht verstanden, aber bei Stichwort "erweitern" bietet sich immer resize an: 
Set Rng = ActiveSheet.Range(Cells(ze, 5), Cells(ze, 6)).Resize(1, 10)

Rng.Select

Gruß, MCO
Danke Karin, klappt ! -)
matthias