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
ActiveSheet.Range(Cells(ze, 5), Cells(ze, 6)).Select
Union(Cells(ze, 5), Cells(ze, 6), Cells(ze, 10), Cells(ze, 11)).Select
Set Rng = ActiveSheet.Range(Cells(ze, 5), Cells(ze, 6)).Resize(1, 10)
Rng.Select
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen