Live-Forum - Die aktuellen Beiträge
Datum
Titel
04.10.2025 05:06:02
Mahjong gratis: gioco di puzzle senza tempo
04.10.2025 05:04:16
Mahjong gratuito: gioco di puzzle senza tempo
03.10.2025 22:18:19
Dropdown
03.10.2025 20:19:48
Formatierung bei Zelländerung
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1256to1260
1256to1260
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wertübernahme in anderes Feld + etwas mehr...

Forumthread: Wertübernahme in anderes Feld + etwas mehr...

Wertübernahme in anderes Feld + etwas mehr...
MiraCeti
Hallo zusammen.
Ich hoffe sehr auf Eure Hilfe:
Ich habe in einer Tabelle zwei Felder. Wird in dem einen Feld ein x gesetzt, soll im anderen Feld auch ein x automatisch gesetzt werden. Allerdings soll dieses Feld selbst für den Anwender eingabebereit sein. Geht das? Und wenn ja, wie?
Herzlichen Dank für Eure Hilfe
Mira
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Wertübernahme in anderes Feld + etwas mehr...
30.03.2012 11:20:13
ChrisL
Hi Mira
Vielleicht so?
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "A1" Then
If Target = "x" Then Range("B1") = "x"
End If
End Sub

(Alt+F11, links Doppelklick auf die betroffene Tabelle, Code einfügen)
Eingabe in A1, Ausgabe in B1.
Gruss
Chris
Anzeige
AW: und wie muss der Code erweitert werden, wenn..
30.03.2012 12:20:19
MiraCeti
Coool! Und wie muss der Code erweitert werden, damit der automatisch gesetzte Wert in Feld B1 wieder gelöscht wird, sobald der Wert in A1 gelöscht wird?
Herzlichen Dank
Mira
Range("B1") = IIf(Target = "x", "x", "")
30.03.2012 12:24:48
Matthias
Hallo
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "A1" Then
Range("B1") = IIf(Target = "x", "x", "")
End If
End Sub
Gruß Matthias
Anzeige
AW: Range("B1") = IIf(Target = "x", "x", "")
30.03.2012 13:09:13
MiraCeti
Super. Herzlichen Dank!
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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