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
1672to1676
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
1672to1676
1672to1676
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Dropdown sperren nach Auswahl

Dropdown sperren nach Auswahl
14.02.2019 09:29:52
Torsten
Hallo zusammen,
kann nicht das passende zu meinem Problem finden. Deshalb die Frage nach Hilfe bei euch.
Problem:
Ich habe in einem geschuetzten Arbeitsblatt eine Dropdown Auswahl in einer Zelle H17 (Datengueltigkeit). Soweit so gut.
Welchen Code kann ich verwenden, um diese Zelle fuer nachtraegliche Veraenderung zu sperren? Also, wenn ein Wert aus dem Dropdown ausgewaehlt ist, die Zelle gesperrt wird und bei Anwahl der Zelle eine Mitteilung kommt, z.B. "Keine Veraenderung mehr moeglich".
Hab schon was versucht, aber mit wenig Erfolg. Die Meldung kommt zwar, aber der Wert kann trotzdem veraendert werden.
Vielen Dank im Voraus.
Gruss Torsten

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

Betreff
Datum
Anwender
Anzeige
AW: Dropdown sperren nach Auswahl
14.02.2019 09:38:29
Nepumuk
Hallo Torsten,
eine eigene Meldung für die Zelle geht nicht.
In das Modul der Tabelle:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$H$17" Then
Call Unprotect(Password:="GEHEIM")
Target.Locked = True
Call Protect(Password:="GEHEIM")
End If
End Sub

Kennwort anpassen !!!
Gruß
Nepumuk
AW: Dropdown sperren nach Auswahl
14.02.2019 10:00:50
Daniel
Könnte man nicht noch eine If Abfrage ergänzen?

If Target.Locked Then
MsgBox "Keine Veränderung mehr möglich"
Else
Gruß
Daniel
AW: Dropdown sperren nach Auswahl
14.02.2019 10:06:49
Nepumuk
Hallo Daniel,
da kommt vorher die Meldung von Excel dass die Zelle gesperrt ist.
Gruß
Nepumuk
Anzeige
AW: Dropdown sperren nach Auswahl
14.02.2019 10:09:20
Daniel
Ergibt Sinn, insofern erscheint dann ja doch schon eine Meldung ;-)
AW: Dropdown sperren nach Auswahl
14.02.2019 11:01:00
Torsten
Danke Nepumuk, funktioniert. Wie muesste das fuer eine Range aussehen.
Ich meine, wass muesste hier geandert werden? Z.B. fuer Range H17:BG17 
If Target.Address = "$H$17" Then

AW: Dropdown sperren nach Auswahl
14.02.2019 11:57:33
Nepumuk
Hallo Torsten,
dann so: 

If Not Intersect(Target, Range("H17:BG17")) Is Nothing Then
Gruß
Nepumuk
AW: Dropdown sperren nach Auswahl
14.02.2019 13:00:11
Torsten
OK Danke. Klappt

300 Forumthreads zu ähnlichen Themen

DropDown Auswahl in Zelle
Lars

Hallo,
ich würde gerne in einer Zelle eine DropDown-Auswahl zur verfügung stellen, wenn die Zelle aktiviert wird. Die Liste soll enthalten "Wartung", "Stillstand" sowie ein Feld zur Freitexteingabe.
Irgendwie stehe ich gerade vor einem Rätsel.
kann mir jemand helfen?
Danke
G...
01.10.2008 13:01:00
Thread-ID: 1013606
6 Beiträge
Anzeige
Dropdownliste aus Matrix erstellen
asdf

Hi ich habe folgendes Problem,
ich hab eine Matrix und möchte die Zeile und Spalte per Dropdownliste auswählen
(wie ich die Dropdownliste selbst erstelle weiss ich ) und will nach auswahl von Zeile und Spalte nun das Ergebnis aus der Matrix haben, also den inhalt der in Spalte x und Ze...
31.10.2008 11:38:00
Thread-ID: 1020833
2 Beiträge
Dropdown Auswahlfeld über INDIREKT ansprechen
Thomas

Hallo und einen schönen Tag
Könntet ihr mir mal hilfreich in die Seite treten?
INDIREKT: ich bekomme es einfach nicht hin.
Ich möchte ein Dropdown Auswahlfeld über INDIREKT ansprechen.
Aber so eins wo der Pfeil immer sichtbar ist.
Habe die Datei mal mit hochgeladen.
Wär...
10.11.2008 14:53:21
Thread-ID: 1023207
6 Beiträge
Anzeige
Dropdown-Auswahlliste: Ausgabe anderer Text
Daniel

Hallo
Ich habe eine Dropdown-Auswahlliste erstellt, die auch funktioniert. Nun möchte ich aber, dass aus Platzgründen ein anderer (kürzerer) Text ausgegeben wird als in der Auswahlliste angezeigt wird.
Beispiel: Anzeige = Telefon ----- Ausgabe im Feld = Tel.
Ist das überhaupt mac...
04.12.2008 08:58:00
Thread-ID: 1030032
2 Beiträge
Dropdown-Auswahl, bestimmte Spalten ausblenden
Dan

Hallo
Ich habe folgendes Problem:
in einem Dropdown-Fenster kann ein Wert ausgewählt werden (z.B. Hund, Katze oder Maus).
- wenn ich nun Hund auswähle, sollen die Spalten F+H ausgeblendet werden,
- wenn ich nun Katze auswähle, sollen die Spalten G+I ausgeblendet werden, und
13.03.2009 11:07:26
Thread-ID: 1059787
5 Beiträge
Sortierung Daten in DropDown Auswahl
Jochen

Hallo,
ich hab mal die Besipeildatei hochgeladen.
https://www.herber.de/bbs/user/62594.xls
Ist es hier möglich die Einträge im Drop Down (VBA) alphabetisch zu sortieren?
Gruß Jochen
24.06.2009 14:17:31
Thread-ID: 1084124
3 Beiträge
Drop down Auswahl
Eike

Hallo zusammen!
Ich möchte ein einem Feld verschiedene Auswahlmöglichkeiten für die Dateneingabe über eine Drop Down Auswahl vorgeben. Geht das?
Schöne Grüße
Eike
28.07.2009 09:56:08
Thread-ID: 1091800
4 Beiträge
Gültigkeite - Liste ohne doppelte Werte
susi

Hallo,
ich habe eine kleines, eher optisch unschönes Problem. In einer Tabelle wird von den Nutzern auf dem ersten TB eine Liste mit Werte al la ABC1000; ABC1010 ... eingetragen. Nun können sich aber diese Werte auch wiederholen. Auf einem zweiten TB habe ich eine Spalte die sich über DATEN...
13.08.2009 07:57:25
Thread-ID: 1095462
2 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
5
1
1
5
4
1
4
2
3
1
3
5
4
2
6
1
2
2
4
5
5
3
1
2
9