Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 11:49:37
Array verwenden
25.04.2024 10:38:52
Bedingte Formatierung per VBA / MaxPoint
25.04.2024 10:30:04
Suche mit MINWENNS und Rückgabe mehrerer Werte
25.04.2024 09:47:49
Daten aus mehreren Dateien untereinander importieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1604to1608
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
1604to1608
1604to1608
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Nicht gesperrte Zellen löschen

Nicht gesperrte Zellen löschen
27.01.2018 23:33:13
UweD
Hallo
Ich habe in einem Blatt
  • Zellen mit Formeln, //// Schutz an ////
  • Zellen mit Texten (Feld Bezeichner) //// Schutz an //// und
  • Zellen mit Eingaben (Texte und Zahlen) //// Schutz aus ////
    Blattschutz ist gesetzt mit TB1.Protect userinterfaceonly:=True
    Die EingabeFelder sind auf dem Blatt verteilt.
    soweit so gut.
    Nun möchte ich alle Eingabefelder leeren
    Wie kann ich das elegant machen ?
  • ohne die Zellen vorher per definiertem Namen zusammenzufassen
  • ohne die Zellen im VBA als Union(,,) zu definieren
    Mit TB1.Cells.SpecialCells(xlCellTypeConstants, 3).ClearContents
    lösche ich ja auch die Feldbezeichner weg
    Sowas wie TB1.Cells.SpecialCells(xlCellTypeConstants, 3).NOT LOCKED.ClearContents ?
    LG UweD

    • 5
    Beiträge zum Forumthread
    Beiträge zu diesem Forumthread

    Betreff
    Datum
    Anwender
    Anzeige
    AW: Nicht gesperrte Zellen löschen
    27.01.2018 23:40:50
    Werner
    Hallo Uwe,
    wenn es sich um einen zusammenhängenden Bereich handelt z.B. so: 
    Public Sub aaa()
Dim raZelle As Range
For Each raZelle In Worksheets("Tabelle1").UsedRange
If raZelle.Locked = False Then raZelle.ClearContents
Next raZelle
End Sub
    Gruß Werner
    AW: Nicht gesperrte Zellen löschen
    29.01.2018 08:18:52
    UweD
    Hallo Werner
    das baue ich so ein. Besten Dank für den Tipp
    LG UweD
    Gerne u. Danke für die Rückmeldung. o.w.T.
    29.01.2018 08:29:19
    Werner
    AW: Eine Alternative
    28.01.2018 08:07:47
    Gerd
    Hallo Uwe,
    du kannst den Eingabezellen einen Namen zuweisen und auf diesen
    Range("DeinName") referenzieren.
    cu Gerd
    AW: Eine Alternative
    29.01.2018 08:22:43
    UweD
    Hallo Gerd
    genau das wollte ich ja nicht
      ohne die Zellen vorher per definiertem Namen zusammenzufassen

    Dann müsste der User neue Zellen immer zu dem Namen hinzufügen.
    Ich nehm die Lösung mit der Schleife
    LG UweD
    Anzeige

    108 Forumthreads zu ähnlichen Themen

    Zellen formatieren, wenn Bedingung NICHT erfüllt
    onkelbobby

    Hallo,
    habe folgendes Makro um Zellen farbig zu markieren:
    Sub färben() Dim loletzte As Long Dim loletzte2 As Long Dim i As Integer Dim a As Integer Worksheets(2).Activate loletzte = IIf(IsEmpty(Cells(Rows.Count, 1)), Cells(Rows.Count, 1).End(xlUp).Row, Rows.Count) loletzte2 = IIf(IsE...
    02.09.2008 12:41:00
    Thread-ID: 1006734
    5 Beiträge
    Anzeige
    Nicht gesperrte Zellen farblich hinterlegen
    Loewelutz

    Liebe Ex(cel)perten,
    kleines Problem mit der Bitte um Hilfe:
    Zur besseren Übersicht möchte ich in einer Tabelle nicht geperrte Zellen mit einer bedingten Formatierung farblich hinterlegen. Bei der Suche habe ich eine Formel für die Markierung gesperrter Zellen gefunden:
    =ZELLE("Prot...
    06.12.2009 19:47:44
    Thread-ID: 1122090
    3 Beiträge
    Nicht gesperrte Zellen farblich hinterlegen
    Loewelutz

    Liebe Ex(cel)perten,
    kleines Problem mit der Bitte um Hilfe:
    Zur besseren Übersicht möchte ich in einer Tabelle nicht geperrte Zellen mit einer bedingten Formatierung farblich hinterlegen. Bei der Suche habe ich eine Formel für die Markierung gesperrter Zellen gefunden:
    =ZELLE("Prot...
    06.12.2009 20:04:13
    Thread-ID: 1122093
    5 Beiträge
    Anzeige
    Zellen formatieren geht nicht mehr
    Pepi

    Hallo zusammen
    Ich kopiere mit einem Makro Zellbereiche von einer Tabelle in eine Andere (neue Datei).
    Nach dem ich die neue Datei gespeichert habe kann ich in den Menüs Start - Schriftart / Ausrichtung / Zahl
    Bereiche meiner neuen Tabelle markieren und formatieren - doch sobald ich...
    16.08.2010 14:33:40
    Thread-ID: 1172430
    6 Beiträge
    Zellen formatieren geht nicht mehr
    Pepi

    Hallo zusammen
    Bei der angehängten Tabelle kann innerhalb des Datenbereichs plus 1 Zeile/Spalte (rot) nicht formatiert werden
    Start - Schriftart / Ausrichtung / Zahl oder rechte Maustaste
    Die Tabelle wurde mit einem Makro erstellt - auch Speicherung unter Office 2007 ändert nichts....
    16.11.2010 10:28:31
    Thread-ID: 1187005
    3 Beiträge
    Zahl als Text kann nicht in Zahl formatiert werden
    Roger

    Hallo zusammen
    Ich muss aus einer Text Datei Zahlen in Excel übernehmen, dazu muss ich die Zellen als Text formatiert haben. Wenn ich danach die Textformatierte Zahl umwandeln will in eine Zahl kommt die falsche Zahl dabei raus. 5100933050860998 wäre die richtige Zahl es kommt jedoch 5.1009...
    15.02.2011 21:50:49
    Thread-ID: 1201044
    3 Beiträge
    Daten lassen sich nicht als Zahl formatieren
    Ingo

    Hallo, ich brauche mal wieder Hilfe!
    Ich habe aus einem Stundenplanprogramm die Daten in Excel exportiert. Es werden Tabellen und Spalten angelegt. Die Werte in den Zellen lassen sich aber nicht berechnen! Ich habe versucht sie als Zahlen zu formatieren, aber ohne Erfolg. Hat jemand eine I...
    19.11.2011 20:50:15
    Thread-ID: 1238582
    3 Beiträge
    zellen lassen sich nicht mehr formatieren
    michael

    Hallo
    ich habe eine excel tabelle mit der version 2003 erstellt. dort sind einige zellen frei andere geperrt und ein blattschutz mit kennwort.
    wenn die daten eingetragen sind, wird ein macro gestartet dass den blattschutz aufhebt die zellen formatiert und rahmen einträgt danach wird wie...
    08.02.2012 20:32:20
    Thread-ID: 1249846
    7 Beiträge
    Anzeige

    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
    4
    7
    2
    4
    3
    5
    2
    2
    2
    6
    2
    10
    4
    3
    2
    2
    9
    13
    2
    24
    16
    4
    1
    5
    3