Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Entf-Taste in bestimmtem Bereich sperren

Entf-Taste in bestimmtem Bereich sperren
09.03.2018 09:19:28
Mirko
Hallo an alle,
möchte gerne die Entfernen Taste für den Bereich A6:A58 sperren und habe folgenden Code gefunden
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.HasFormula = True Then
Application.OnKey "{del}", ""
Else
Application.OnKey "{del}"
End If
End Sub

dieser sperrt die Entfernentaste wenn eine Formel in der Zelle enthalten ist, kann mir einer sagen wie ich diese ändern muss, das die Entf-Taste im Bereich A6:A58 immer gesperrt, es ist uninteressant ob eine Formel enthalten ist oder nicht, der Code ist nur ein Beispiel, ich habe leider nichts passenderes gefunden.
Gruß Mirko
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Entf-Taste in bestimmtem Bereich sperren
09.03.2018 09:28:14
Oberschlumpf
Hi Mirko,
aktiviere doch den Blattschutz. Dann sind alle Zellen, die von dir vorher als "gesperrt" deklariert sind, bei aktiviertem Blattschutz gar nicht veränderbar.
Oder soll tatsächlich nur das Löschen von Zellinhalten verhindert werden? Aber das Verändern von Zellinhalten soll weiterhin möglich sein?
Ciao
Thorsten
Anzeige
AW: Entf-Taste in bestimmtem Bereich sperren
09.03.2018 09:37:49
Mirko
Hi Thorsten,
richtig es soll nur verhindert werden das man mit der Entf-Taste etwas löschen kann, der Zelleninhalt kann man mit einer Combobox weiter verändern.
Hab es jetzt mal so versucht:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = Range("A6:A58").Address Then
Application.OnKey "{del}", ""
Else
Application.OnKey "{del}"
End If
End Sub
das funktioniert aber leider auch nicht. Kenn mich nicht sonderlich aus mit VBA bin halt immer am Googlen.
Gruß Mirko
Anzeige
AW: Entf-Taste in bestimmtem Bereich sperren
09.03.2018 09:39:46
Hajo_Zi
Hallo Mirko,
Du musst auch beachten Excel, lässt Zu das Du einen Bereich Löschen kannst z.B A5:B60

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
AW: Entf-Taste in bestimmtem Bereich sperren
09.03.2018 09:45:52
Mirko
Hallo Hajo,
die Zellen vor A6 und nach A58 sin geschützt somit geht das ja nicht!
Gruß Mirko
Anzeige
AW: Entf-Taste in bestimmtem Bereich sperren
09.03.2018 09:42:51
Daniel
HI
probier mal:
if intersect(Target, Range("A6:A58")) is nothing then
Application.OnKey "{del}" '--- Del-Taste freigeben
Else
Application.OnKey "{del}", "" '--- Del-Taste sperren
end If
Gruß Daniel
AW: Entf-Taste in bestimmtem Bereich sperren
09.03.2018 09:43:38
Oberschlumpf
Hi Mirko
bei Verwendung einer ComboBox aus den ActiveX-Controls änder die Eigenschaft Style um auf "2 - fmStyleDropDownList".
Hilfts?
Ciao
Thorsten
Anzeige
AW: Entf-Taste in bestimmtem Bereich sperren
09.03.2018 09:49:22
Mirko
Hallo Daniel,
genau so wollte ich es, tausend Dank und natürlich auch danke an alle anderen die mir helfen wollten.
Gruß Mirko
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Entf-Taste in Excel in bestimmten Bereichen sperren


Schritt-für-Schritt-Anleitung

Um die Entf-Taste in einem bestimmten Bereich in Excel zu sperren, kannst Du den folgenden VBA-Code verwenden. Hier sind die Schritte:

  1. Öffne den VBA-Editor:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Füge einen neuen Modul hinzu:

    • Klicke mit der rechten Maustaste auf "VBAProject (DeinArbeitsblattName)" und wähle Einfügen > Modul.
  3. Füge den folgenden Code ein:

    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
       If Not Intersect(Target, Range("A6:A58")) Is Nothing Then
           Application.OnKey "{del}", "" '--- Del-Taste sperren
       Else
           Application.OnKey "{del}" '--- Del-Taste freigeben
       End If
    End Sub
  4. Schließe den VBA-Editor:

    • Drücke ALT + Q, um den VBA-Editor zu schließen und zu Excel zurückzukehren.
  5. Teste die Funktion:

    • Wähle eine Zelle im Bereich A6:A58 und versuche, die Entf-Taste zu verwenden. Sie sollte nun deaktiviert sein.

Häufige Fehler und Lösungen

  • Entf-Taste funktioniert nicht: Stelle sicher, dass der Code im richtigen Arbeitsblatt-Modul eingefügt wurde. Der Code muss in das spezifische Arbeitsblatt eingefügt werden, in dem Du die Funktionalität haben möchtest.

  • Blattschutz nicht aktiv: Wenn Du Blattschutz aktiviert hast, stelle sicher, dass die Zellen, die Du sperren möchtest, nicht bearbeitbar sind. Wenn alle Zellen geschützt sind, funktioniert die Sperre nicht.


Alternative Methoden

Eine andere Methode, um die Entf-Taste in Excel zu sperren, ist die Verwendung des Blattschutzes:

  1. Markiere den Bereich A6:A58.
  2. Rechtsklick > Zellen formatieren > Schutz:
    • Deaktiviere die Option "Gesperrt".
  3. Aktiviere den Blattschutz:
    • Gehe zu Überprüfen > Blattschutz und aktiviere den Schutz.

Auf diese Weise kannst Du verhindern, dass Inhalte in diesem Bereich gelöscht werden.


Praktische Beispiele

  • Fall 1: Du hast eine Liste von Produkten in A6:A58. Um versehentliches Löschen zu vermeiden, verwendest Du den obigen VBA-Code.

  • Fall 2: Du möchtest, dass Benutzer nur über eine ComboBox Änderungen vornehmen können, während die Entf-Taste für diesen Bereich gesperrt bleibt. Der VBA-Code hilft, die Entf-Taste zu deaktivieren, während die ComboBox weiterhin funktioniert.


Tipps für Profis

  • Fehlerbehebung: Wenn die Entf-Taste trotz Code weiterhin funktioniert, überprüfe, ob der Code korrekt im Arbeitsblatt-Modul eingefügt wurde und der Blattschutz aktiv ist.

  • VBA optimieren: Du kannst den Code erweitern, um auch andere Tasten wie Backspace zu sperren, indem Du Application.OnKey "{bksp}", "" hinzufügst.


FAQ: Häufige Fragen

1. Was ist die Del-Taste? Die Del-Taste, auch Entfernen-Taste genannt, wird verwendet, um Inhalte in Excel zu löschen.

2. Wo ist die Entfernen-Taste in Excel? Die Entfernen-Taste befindet sich in der Regel in der Nähe der Funktionstasten auf der Tastatur, oft in der oberen rechten Ecke.

3. Warum funktioniert die Entf-Taste nicht, obwohl ich den Code eingegeben habe? Stelle sicher, dass der Code im richtigen Arbeitsblatt-Modul eingefügt wurde und der Blattschutz aktiv ist.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige