Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Gesucht wird: SuperDuperAdvancedRangebereich

Forumthread: Gesucht wird: SuperDuperAdvancedRangebereich

Gesucht wird: SuperDuperAdvancedRangebereich
Holger
Hallo,
weiter am Basteln, ist mir eine Idee gekommen.
Ich habe ein Makro, in dem ich einen Rangebereich definiere.
Dieser wird bearbeitet. Nun möchte ich dasselbe Makro benutzen
für eine zusätzliche Funktion, dafür bräuchte ich aber einen anderen
Rangebereich. Und zwar soll der nur die Zellen beinhalten,
die B.offset(0,18) eine leere Zellen haben.
Also so:
Sub Neuer Rangebereich
Set rngContracts = wsContracts.Range("B31:B" & lngLastRowContracts)
'Jetzt müßte dieser Rangebereich eingeschränkt werden auf die
Zellen, die B.Offset(0,18) leer sind.
Geht das?
End Sub
Ansonsten muss ich das Makro im Prinzip doppen schreiben/halten,
das wäre echt nervig.
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Gesucht wird: SuperDuperAdvancedRangebereich
23.11.2010 11:02:03
Rudi
Hallo,
eigentlich einfach.
Set rngContracts = wsContracts.Range("B31:B" & lngLastRowContracts).Offset(, 18).SpecialCells(xlCellTypeBlanks).Offset(, -18)
Gruß
Rudi
AW: Gesucht wird: SuperDuperAdvancedRangebereich
23.11.2010 11:05:39
Holger
He Rudi,
meinst du echt, das geht?
Mit diesem SpecialCell TypeBlanks habe ich nicht so durchgeblickt, aber
da hatte ich auch mehrere Rangebereiche zu einem zusammengeführt.
Ok, ich probier's aus und melde mich.
Gruß+Dank
Holger
Anzeige
Genial, klappt!! Danke Rudi!!! k.t.
23.11.2010 11:10:51
Holger
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige