|
VBA - Zellinhalt trotz Blattschutz löschen |
 |
 |
 |
|
Geschrieben von: Marcus Rose
|
|
Freitag, 02. Mai 2008 um 07:03 Uhr |
Zellinhalt, egal ob Blattschutz oder nicht, löschenDieses Excel VBA Makro fragt die Zelleigenschaften ab, ob der Inhalt einer Zelle gelöscht werden darf. Hierbei ist es eigentlich sogar egal, ob ein Blattschutz gesetzt wurde. Es geht hier um eine ganz einfache Einstellung:
markiert die Zellen, wo der Inhalt gelöscht werden darf (Im Beispiel unten befinden sich diese in Spalte B). Geht auf Zellen formatieren - Schutz - und nehmt den Haken bei gesperrt weg. Soll der Inhalt nicht gelöscht werden so muß dieser Haken gesetzt sein. Tabelle1
| | A | B | | 1 | Fragebogen | | 2 | Bitte geben Sie einen Namen ein: | Marcus Rose | | 3 | In welcher Straße wohnen Sie? | Eichenhofer Weg 91 | | 4 | Nennen Sie Ihre Postleitzahl und den Wohnort: | 42279 Wuppertal |
Nun legt Ihr folgendes Makro hinter das Tabellenblatt:
Option Explicit
Sub nicht_gesperrte_Zellen()
Dim cell As Range
With Worksheets("Tabelle1")
For Each cell In .UsedRange
If cell.Locked = False Then
cell.ClearContents
End If
Next cell
End With
End Sub Wenn Ihr jetzt das Makro startet werden nur die Zellen gelöscht, wo Ihr den Haken bei gesperrt entfernt habt. Im Beispiel wäre das alles was in Spalte B steht.
|
VBA Makro Beispiele 