Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: 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
  • Anzeige

    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
    Anzeige
    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
    Anzeige
    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
    ;

    Forumthreads zu verwandten Themen

    Anzeige
    Anzeige
    Entdecke relevante Threads

    Schau dir verwandte Threads basierend auf dem aktuellen Thema an

    Alle relevanten Threads mit Inhaltsvorschau entdecken
    Anzeige

    Beliebteste Forumthreads (12 Monate)

    Anzeige
    Anzeige
    Entdecke mehr
    Finde genau, was du suchst

    Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

    Suche nach den besten Antworten
    Unsere beliebtesten Threads

    Entdecke unsere meistgeklickten Beiträge in der Google Suche

    Top 100 Threads jetzt ansehen
    Anzeige