---

Hi,

bin absoluter VBA Neuling. Ohne lange Erklärung, ich bin soweit, dass ich die erste leere Zelle in Spalte A finde. Nun möchte ich ab hier alle Zellen bis Spalte H markieren.
In diesem Fall ist es Zeile 19, aber es wird bei anderen Stücklisten nie die 19. Zeile sein, darum sollte das Ganze variabel sein. Hier mal der Code bis zur 1. leere Zelle in Spalte A

Range"A1").Select                  'Zelle A1 markieren
Selection.End(xlDown).Select        'markiert letzte ausgefüllte Zelle
ActiveCell.Offset(1, 0).Select      'springt eine zeile runter

Range ("A" & ActiveCell.Row & ":H" & ActiveCell.Row)  'Und hier sollte dann die zeile bis Spalte H markiert werden, aber da ist was falsch

Danke mal für Eure Vorschläge

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Moin,

ich denke, hier sind nahezu alle Möglichkeiten aufgeführt >> [VBA] Letzte Spalte / Letzte Zeile <<
Du mußt jetzt eine gewisse Transferleistung erbringen, indem Du Dir die einzelnen Zeilen anschaust und versuchst zu verstehen, was sie tun.
Als Beispiel nimm Dir diese Zeile vor:

Code:

---

LZA = Columns(1).Find("*", [A1], , , xlByRows, xlPrevious).Row  '(für Spalte A)

---

Markieren = Aktivieren?
Du baust Dir also die Range auf, die Du aktivieren möchtest. Zum Beispiel so:

Code:

---

Range(Cells(LZA + 1, 1), Cells(LZA + 1, 10)).Activate

---

PS: Leseempfehlung: Wer selektiert denn da?

------------------
Gruß,
runkelruebe          Herr Kann-ich-nich wohnt in der Will-ich-nich-Straße...

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi,

oh Mann, es funktioniert ja fast was ich gemacht hab

Range ("A" & ActiveCell.Row & ":H" & ActiveCell.Row)

hab das ".Select" hinter der Klammer vergessen

Nice Weekend  ;-)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

neu-1.JPG

Hallo,

wie sieht der Code aus für:

Zeile suchen, wo in Spalte D der Inhalt mit "Zubeh├Âr:" beginnt (nicht immer steht dasselbe Wort in Spalte D)
Dann diese Zeile und alle befüllten Zeilen darunter markieren und löschen.
Im Beispiel Zeile 9 und 10 löschen. Es gibt Stücklisten, da sind deutlich mehr Zeilen beschriftet/befüllt oder wie man dass auch richtig nennt.
Danke für die Unterstützung

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ähnliche Frage hier neu gestellt !

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP