Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 12:28:32
Formelfehler aufgrund Einfügen einer Zeile
18.04.2024 11:51:04
Aus Listbox Spalte als Wert zurück bekommen
18.04.2024 11:36:51
Beim Öffnen je nach Datum zu bestimmter Zelle springen
18.04.2024 11:16:38
Pfade werden mit Anführungszeichen "" versehen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1616to1620
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
1616to1620
1616to1620
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

DropDown Zellenwerte automatisch aktualisieren

DropDown Zellenwerte automatisch aktualisieren
15.04.2018 15:44:59
Chris
Hallo,
folgendes Problem:
Ich habe eine Dropdown mit Verweis auf 2 Zellen. Je nachdem welche Sprache vorab ausgewählt wurde, ist da Inhalt der 2 Zellen entweder "Ja;Nein" oder "Yes;No".
Da in den Dropdowns bereits Beispielwerte für spätere Anweder eingetragen sind, ändert sich die Dropdown, aber nicht der vorher in der Zelle eingetragene Wert.
Habt ihr vielleicht eine Idee?
Da häufiger mal das Wort "Ja" fällt, ist es nicht möglich über Suchen & Ersetzen alle "Ja" durch ein "Yes" zu ersetzen bzw. das über ein Makro zu automatisieren.

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

Betreff
Datum
Anwender
Anzeige
AW: DropDown Zellenwerte automatisch aktualisieren
15.04.2018 15:54:24
Hajo_Zi
starte den VBA Editor (Alt+F11), Bild sollte zweigeteilt sein ansonsten Strg+R, Doppelklick auf Deine Datei, Doppelklick auf Deine Tabelle, Code ins rechte Fenster kopieren, VBA Editor schließen.
Das Makro wird automatisch gestartet.
Der Code wirkt nur in dieser Tabelle.
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(False, False) = "D4" And Target  "" Then
Application.EnableEvents = False
Range("D5").ClearContents
Application.EnableEvents = True
End If
End Sub

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
Anzeige
AW: DropDown Zellenwerte automatisch aktualisieren
15.04.2018 16:12:53
Chris
Hallo Hajo,
erst einmal vielen Dank für die schnelle Hilfe.
Der Code geht schon einmal in die richtige RIchtung, allerdings löscht er bei Änderung nur den Inhalt.
Ich würde mir wünschen, dass ein bereits eingetragenes "Ja" zu einem "Yes" geändert wird.
AW: DropDown Zellenwerte automatisch aktualisieren
15.04.2018 16:16:30
Hajo_Zi 

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(False, False) = "D4" And Target  "" Then
Application.EnableEvents = False
If Range("D5") = "Ja" Then
Range("D5") = "Yes"
ElseIf Range("D5") = "Nein" Then
Range("D5") = "No"
ElseIf Range("D5") = "Yes" Then
Range("D5") = "Ja"
Else
Range("D5") = "Nein"
End If
Application.EnableEvents = True
End If
End Sub
Gruß Hajo
Anzeige
AW: DropDown Zellenwerte automatisch aktualisieren
15.04.2018 16:29:19
Chris
Hallo Hajo,
der Code erledigt genau das beschriebene Problem.
Meine Frage wäre jetzt noch, ob es ggf. eine simplere oder dynamischere Lösung gibt?
Ich kann schon absehen, dass es viel Arbeit wird, wenn ich den Code anpasse, um damit Felder zu aktualisieren, in denen mehr als nur ein Ja oder Nein steht oder die Felder um eine weitere SPrache ergänzt werden.
Viele Grüße
AW: DropDown Zellenwerte automatisch aktualisieren
15.04.2018 16:50:55
Hajo_Zi
im ersten Beitrag ging es um eine Zelle. 
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(False, False) = "D4" And Target  "" Then
Application.EnableEvents = False
Target.Offset(1, 0) = Uebersetzen(Target.Offset(1, 0))
Application.EnableEvents = True
End If
End Sub
Function Uebersetzen(Razelle As Range)
If Razelle = "Ja" Then
Uebersetzen = "Yes"
ElseIf Razelle = "Nein" Then
Uebersetzen = "No"
ElseIf Razelle = "Yes" Then
Uebersetzen = "Ja"
Else
Uebersetzen = "Nein"
End If
End Function
Gruß Hajo
Anzeige

300 Forumthreads zu ähnlichen Themen

Dropdownliste ausgew. gültige Werte aktualisieren
Flo

Hallo allerseits!
Ich habe ein Problem mit der Aktualisierung von bereits ausgewählten gültigen Werten in einer Dorpdownliste. Die gütligen Werte der Dropdownliste werden per Namensdefinition aus einem anderen Excelblatt gefüllt. Nun kommt es öfter mal vor, dass sich die Gültigen Werte im s...
16.08.2008 16:24:00
Thread-ID: 1002344
2 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:26:37
Thread-ID: 1020823
2 Beiträge
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
Anzeige
dropdownliste mit bilder
e-mo

Hallo..
ich habe eine Frage in Bezug zum Dropdown Liste.
Ich kann eine Dropdownliste mit der Auswahl erstellen, das ist lein Problem.
moechte aber jetzt eine Dropdownliste erstellen, wo ich als liste, paar bilder habe. Ist das moeglich? ich habe bereits in diversen foren gesucht, le...
18.11.2008 17:06:17
Thread-ID: 1025706
2 Beiträge
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
ComboBox-Dropdown im UserForm aktualisieren
Lenhard

Moin Excellianer!
Karin (Beverly's Excel Inn) hat mir hier im Forum bei folgendem Beispiel geholfen:
https://www.herber.de/bbs/user/57807.xls
Aber eine Kleinigkeit wäre noch sehr wichtig für mich und ich komme mit meinen Überlegungen nicht weiter: Wenn mit der ComboBox1 zwischen de...
22.12.2008 00:51:00
Thread-ID: 1034712
3 Beiträge
Combobox-DropDownList-DropDownCombo
Gunter

Hallo Zusammen,
ich habe in einer Tabelle eine ComboBox. Wenn diese bei der Eigenschaft Style als DropDownCombo ausgewählt ist funktioniert dieser Code:
Private Sub CommandButton1_Click() 'Lieferschein per mail versenden Dim s As String Dim t As String Dim strPath As String Dim Anwen...
08.01.2009 21:11:18
Thread-ID: 1038046
3 Beiträge
Ribbon-DropDown-Listenfeld variabel füllen?
Kasimir

Hallo an alle!
Ich habe da mal eine Frage bezüglich der Excel 2007 Ribbons.
Zum Verständnis, ich habe eine xls-Datei, in der ich beim Starten eine neue Symbolleiste erzeuge. Diese neue Symbolleiste hat u.a. ein msoControlComboBox, die ich über eine Schleife mit bestimmten Tabellenblattn...
17.01.2009 07:23:00
Thread-ID: 1040862
3 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
1
1
1
1
1
1
1
2
2
2
2
6
5
2
3
3
1
1
2
3
3
1
5
2
1