Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
344to348
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
344to348
344to348
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Löschen von Zellen die nicht gesperrt sind

Löschen von Zellen die nicht gesperrt sind
28.11.2003 11:09:27
Tobias
Hi zusammen,

habe folgendes Problem:

Auf einem Tabellenblatt habe ich nur gewisse Zellen zur Eingabe freigstellt also nicht gesperrt. Nach Eingabe dieser Zellen ( bei aktiven Blattschutz), möchte ich nun die Möglichkeit haben, daß ich alle Inhalte der nicht gesperrten Zellen ( also diejenigen in die etwas geschreiben werden kann)lösche.

Geht dies mit ein in das Tabellenblatt eingefügtes CommandButtom und ja mit welchem Makro ?

Für Eure Hilfe vielen Dank im voraus.

Grüße
Tobias

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Löschen von Zellen die nicht gesperrt sind
28.11.2003 11:17:05
FP
Hallo Tobias,

probier mal dieses Makro

Public 

Sub ClearInpCells()
Dim rngCell As Range
For Each rngCell In ActiveCell.CurrentRegion.Cells
With rngCell
If .Locked = False Then .ClearContents
End With
Next
End Sub


Servus aus dem Salzkammergut
Franz
AW: Löschen von Zellen die nicht gesperrt sind
28.11.2003 11:25:31
Tobias
Geht leider nicht er meldet, daß dieser Befehl

For Each rngCell In ActiveCell.CurrentRegion.Cells

nicht in einem geschützten Arbeitsblatt verwendet werden kann !

Die andere Frage ist noch, wie kann ich das CommandButtom in dem geschützen Arbeitsblatt "ungesperrt" lassen, sprich, daß es genutzt werden kann ?
Anzeige
AW: Löschen von Zellen die nicht gesperrt sind
28.11.2003 20:09:11
FP
Hallo Tobias,

1) Na ja, dann heben wir eben vorher den Blattschutz auf
2) eine Schaltfläche bleibt auch bei aktivem Blattschutz benutzbar


Sub ClearInpCells()
Dim rngCell As Range
Application.Interactive = False
ActiveSheet.Unprotect Password:="Passwort"
For Each rngCell In ActiveCell.CurrentRegion.Cells
With rngCell
If .Locked = False Then .ClearContents
End With
Next
ActiveSheet.Protect Password:="Passwort"
Application.Interactive = True
End Sub


Servus aus dem Salzkammergut
Franz

302 Forumthreads zu ähnlichen Themen

Zellen/Eingabe während Berechnung sperren
Koeffi

Hallo liebe Leute,
ich habe folgendes Problem.
In meinen Sheet werden nach der Auswahl mit einer Combo-Box eine Reihe Berechnungen (SVERWEISE) ausgeführt. Leider werden diese Unterbrechungen unterbrochen, wenn man mit der Maus klickt, oder auf der Tastatur eine Eingabe macht.
Ich wü...
20.08.2008 18:37:26
Thread-ID: 1003277
4 Beiträge
Anzeige
summe bilden in abhängigkeit von zelleneintrag
zelleneintrag

hallo zusammen
ich hätte gerne gemäss dem beispiel gewusst, wie ich eine summe bilde in abhängigkeit
eines zelleintrages.
gruess
https://www.herber.de/bbs/user/56754.xls
13.11.2008 17:23:00
Thread-ID: 1024309
4 Beiträge
Abgleich von Zellenbereichen in 2 versch.Arbeitsbl
Zellenbereichen

Hallo Excel-Anwender,
als Anlage habe ich eine Excel-Datei mit 2.Arbeitsblättern beigefügt. Das 1.Arbeitsblatt heißt Ber.Blatt, das 2. Tabelle 2009. Auf dem 1.Arbeitsblatt ist in Zelle B3 eine Vergütungsbezeichnung angegeben. Im 2.Arbeitsblatt sind in der Spalte A5-A28 ebenfalls Vergütungsb...
21.11.2008 11:54:00
Thread-ID: 1026680
4 Beiträge
Anzeige
Bestimte Zeichen von Zelleninhalt auswählen
Zelleninhalt

Hallo Excelperten,
ich lese via VBA zwei Tabellen ein und erstelle daraus eine Liste. Ich überprüfe dabei, ob es bei den aktuellen Tabellen Änderungen im Vergleich zur alten Liste gibt und übertrage diese Änderungen. Dazu lese ich den Zelleninhalt (eine Product-ID) aus den einzelnen Zeilen...
08.12.2008 11:07:00
Thread-ID: 1031015
3 Beiträge
verketten unter nutzung von zelleninhalt füllen
zelleninhalt

hallo,
ich stelle derzeit in einer Notenliste die Namen der Schüler zusammen mit dem befehl:
=VERKETTEN('GT-M2 07'!C7&", "&'GT-M2 07'!D7)
wobei GT-M2 07 sich auf eine Namensliste in einem anderen Tabellenblatt bezieht. Dort sind Vor- und Zuname in einzelnen Zellen eingetrage...
21.01.2009 09:00:46
Thread-ID: 1042040
3 Beiträge
Beträge einlesen abhängig von Zellenkombination
Zellenkombination

Hallo Excelfreaks
steht vor folgendem Problem
Ausgangslage: Budgetauswertung, aufgebaut in Spalten Kostenstelle/Konto/€-Wert.
Die Kostenstellen/Kontenkombinationen finden sich in der monatlich erstellen Budgetplanwerten und Istkosten wieder.
In eine Budgetauswertung möchte ich f...
28.01.2009 17:57:00
Thread-ID: 1044655
2 Beiträge
Kopieren von Zellen in Editor
Zellen

Hallo,
wir führen eine Teileliste in Excel, die künftig in regelmäßigen
Abständen in eine txt.-Datei kopiert werden soll.
Problem hierbei sind die Leerstellen im Editor!
Gibt es einen Trick oder eine Möglichkeit den "Satz" so zusammen
zu führen, das immer nur eine Leerstell...
03.02.2009 20:54:00
Thread-ID: 1046784
3 Beiträge
Zelle nach eingabe schützen
Andre

Hallo!!
Ich möchte gern, daß wenn ich in einer Zelle eine Eingabe tätige diese Zelle mit einem Passwort gegen Änderung gesichert wird.
Kann mir da jemand helfen?
Mit freundlichen Grüßen
Andre
05.02.2009 13:55:26
Thread-ID: 1047380
3 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
6
3
3
12
2
2
1
2
2
1
6
8
3
6
9
4
8
8
4
10
6
2
6
1