Thema Datum  Von Nutzer Rating
Antwort
Rot Laufzeitfehler bei Löschen mehrerer Einträge
19.04.2025 16:13:43 Sam
Solved
19.04.2025 17:52:11 xlKing
*****
Solved
19.04.2025 20:23:41 Sam
NotSolved

Ansicht des Beitrags:
Von:
Sam
Datum:
19.04.2025 16:13:43
Views:
57
Rating: Antwort:
 Nein
Thema:
Laufzeitfehler bei Löschen mehrerer Einträge

Liebes Forum,

ich bräuchte wieder einmal Hilfe bei einem kleinen Problem. Wenn in Spalte B Tabellenwerte geändert werden, dann wird in Spalte R ein Wert aus einem anderen Tabellenblatt übernommen. Wenn der Wert in Spalte B gelöscht wird, wird der Wert/Zähler in Spalte R auf 0 gestellt. Der zusammengebastelte Code macht an sich was er soll, zumindest wenn ich nur die Werte in Spalte B einzeln eintrage oder lösche. Wenn ich aber die Einträge von Spalte B-P auf einmal entferne, was öfters vorkommt, dann bekomme ich einen Fehler mit Typen unverträglich. Wäre super, wenn mir jemand sagen kann, wie ich den Code umschreiben muss, damit ich die Werte von Spalte B-P auf einmal löschen kann.

Hier noch der Code:

 Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("B:B")) Is Nothing Then Exit Sub
    Select Case Target.Value
     Case Is <> ""
        Application.EnableEvents = False
        Target.Offset(0, 16) = Sheets(3).Range("N1")
        Application.EnableEvents = True
        End Select
        
    Select Case Target.Value
     Case Is = ""
        Application.EnableEvents = False
        Target.Offset(0, 16) = 0
        Application.EnableEvents = True
        End Select
        
End Sub

Vielen Dank im Voraus für Eure Hilfe.

LG Sam
 


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 Laufzeitfehler bei Löschen mehrerer Einträge
19.04.2025 16:13:43 Sam
Solved
19.04.2025 17:52:11 xlKing
*****
Solved
19.04.2025 20:23:41 Sam
NotSolved