Thema Datum  Von Nutzer Rating
Antwort
Rot Überprüfen ob Zeilen leer sind
 17.10.2022 08:57:03 Marc
Solved
17.10.2022 22:39:54 ralf_b
*****
Solved

Ansicht des Beitrags:
Von:
Marc		 Datum:
17.10.2022 08:57:03		 Views:
626		 Rating:
     
Antwort:
 Nein
Thema:
Überprüfen ob Zeilen leer sind		 
Sub Zeile_entfernen()

If WorksheetFunction.CountA(Rows(ActiveCell.EntireRow)) > 0 Then

ActiveCell.EntireRow.Delete Shift = x1Up.Enabled = False

Else

ActiveCell.EntireRow.Delete Shift = x1Up.Enabled = True

End If

End Sub

Hey Leute

Folgendes Problem...

Ich habe eine Liste und zwei Buttons zum Hinzufügen und Entfernen von Zeilen. Die funktionieren soweit einwandfrei. Was mich etwas stört ist, dass wenn ich ausversehen eine Zeile mit Inhalt lösche, kann ich diese Aktion nicht mehr rückgängig machen (Ctrl+Z zum Beispiel). Das möchte ich nun verhindern indem Excel zuerst überprüft, ob die gesamte Zeile leer ist und wenn dies nicht der Fall ist der Button zur Entfernung der Zeile deaktiviert wird. 

Ich habe es mit einer If Schleife versucht wie oben eingefügt und auch schon einige anderen Arten probiert aber hat nix funktioniert. 

Bin übrigens absoluter Neuling bezüglich VBA und Programmieren allgemein also bin ich um jede Hilfe dankbar :D.

Danke für eure Hilfe

Marc

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Überprüfen ob Zeilen leer sind
 17.10.2022 08:57:03 Marc
Solved
17.10.2022 22:39:54 ralf_b
*****
Solved