
116408
02.06.2014, aktualisiert um 13:36:27 Uhr
VBA in Excel, Einträge von diversen Zellen löschen
Hallo
Bin neu im Forum und habe gleich eine (für mich) happige Aufgabe
Ich habe ein Aufnahmeblatt geschaffen, bei dem ich für den Neueintrag einen Button haben möchte, mit dem ich alle Eintragungen (ungesicherte Felder) löschen kann.
Hat mir jemand einen guten Tip oder gar eine Lösung?
LG
cuba
Bin neu im Forum und habe gleich eine (für mich) happige Aufgabe
Ich habe ein Aufnahmeblatt geschaffen, bei dem ich für den Neueintrag einen Button haben möchte, mit dem ich alle Eintragungen (ungesicherte Felder) löschen kann.
Hat mir jemand einen guten Tip oder gar eine Lösung?
LG
cuba
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 239764
Url: https://administrator.de/forum/vba-in-excel-eintraege-von-diversen-zellen-loeschen-239764.html
Ausgedruckt am: 25.04.2025 um 06:04 Uhr
2 Kommentare
Neuester Kommentar
Hallo cuba, Willkommen auf Administrator.de!
Kein Problem mit einem kleinen VBA-Makro:
Du markierst die zu löschenden Zellen und vergibst den Zellen einen Namen (Tab > Formeln > Namen definieren), und dann kannst du den Inhalt aller zugeordneten Zellen so mit VBA löschen
wenn man einen bestimmten Bereich auf Zellen überprüfen möchte ob die Zelle bearbeitbar ist oder nicht und dann diese zu löschen, ginge dies z.B. so:
Hier wird z.B. der Bereich A1:B10 im ersten Arbeitsblatt auf bearbeitbare Zellen überprüft, und deren Inhalt dann gelöscht.
Grüße Uwe
Kein Problem mit einem kleinen VBA-Makro:
Du markierst die zu löschenden Zellen und vergibst den Zellen einen Namen (Tab > Formeln > Namen definieren), und dann kannst du den Inhalt aller zugeordneten Zellen so mit VBA löschen
Sub LöscheBereich()
Range("DerNameDeinerZellen").ClearContents
End Sub
Sub LöscheFreigegebeneZelleninBereich()
Dim cell As Range
For Each cell In Worksheets(1).Range("A1:B10")
If Not cell.Locked Then
cell.ClearContents
End If
Next
End Sub
Grüße Uwe
Wenns das dann war, den Beitrag bitte noch auf gelöst setzen. Merci.