Hot News:

Unser Angebot:

  Foren auf CAD.de (alle Foren)
  Excel
  Erste leere Zeile (A-H markieren)

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
Autor Thema:  Erste leere Zeile (A-H markieren) (2048 / mal gelesen)
röhmler
Mitglied
Sachbearbeiter techn. Dokumentation


Sehen Sie sich das Profil von röhmler an!   Senden Sie eine Private Message an röhmler  Schreiben Sie einen Gästebucheintrag für röhmler

Beiträge: 414
Registriert: 17.02.2004

AutoCAD Mechanical 2014

erstellt am: 22. Apr. 2016 12:23    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

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

runkelruebe
Moderator
Straßen- / Tiefbau




Sehen Sie sich das Profil von runkelruebe an!   Senden Sie eine Private Message an runkelruebe  Schreiben Sie einen Gästebucheintrag für runkelruebe

Beiträge: 8075
Registriert: 09.03.2006

MS-Office 365 ProPlus x86
WIN7(x64)

erstellt am: 22. Apr. 2016 12:34    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für röhmler 10 Unities + Antwort hilfreich

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

röhmler
Mitglied
Sachbearbeiter techn. Dokumentation


Sehen Sie sich das Profil von röhmler an!   Senden Sie eine Private Message an röhmler  Schreiben Sie einen Gästebucheintrag für röhmler

Beiträge: 414
Registriert: 17.02.2004

AutoCAD Mechanical 2014

erstellt am: 22. Apr. 2016 12:54    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

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

röhmler
Mitglied
Sachbearbeiter techn. Dokumentation


Sehen Sie sich das Profil von röhmler an!   Senden Sie eine Private Message an röhmler  Schreiben Sie einen Gästebucheintrag für röhmler

Beiträge: 414
Registriert: 17.02.2004

AutoCAD Mechanical 2014

erstellt am: 03. Mai. 2016 17:12    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities


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



Pflichtpraktikum im Bereich Support der Projektleitung für Batterieprototypen ab September 2024
Life is always about becoming? Im Leben geht es darum, sich auf eine Reise zu begeben, um die beste Version unseres zukünftigen Selbst zu werden. Während wir Neues entdecken, stellen wir uns Herausforderungen, meistern sie und wachsen über uns hinaus.

Bewerben Sie sich bei Mercedes-Benz und finden Sie den Aufgabenbereich, in dem Sie Ihre Talente individuell entfalten können. Dabei werden Sie von visionären Kolleginnen und Kollegen unterstützt, die Ihren Pioniergeist teilen....
Anzeige ansehenProjektmanagement
KlaK
Ehrenmitglied V.I.P. h.c.
Dipl. Ing. Vermessung, CAD- und Netz-Admin



Sehen Sie sich das Profil von KlaK an!   Senden Sie eine Private Message an KlaK  Schreiben Sie einen Gästebucheintrag für KlaK

Beiträge: 2624
Registriert: 02.05.2006

Office 2010; Office365
Visual Basic

erstellt am: 10. Mai. 2016 13:48    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für röhmler 10 Unities + Antwort hilfreich

Ähnliche Frage hier neu gestellt !

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz