Supportnet / Forum / Tabellenkalkulation
Pflichtfelder bei Bedingung
Frage
Hallo zusammen,
ich versuche verzweifelt eine Möglichkeit zu finden Pflichtfelder zu erzeugen, wenn in einem Auswahlfeld 4 bestimmte bezeichnungen ausgewählt werden. wenn( <zelle a> ="abc"; dann mache zelle b zu pflichtfeldern;)
Bsp zum Verständnis:
Wenn in einem Auswahlfeld "Mercedes" gewählt wird, soollen die 3 Nachbarzeilen ausgefüllt werden müssen. Z.B. Hubraum, Kilometer, u.ä.
Hat jemand eine Idee, wie man das realisieren könnte?
Viele Grüße,
Helge
Antwort 1 von Saarbauer
Hallo,
ich glabe was du suchst ist die "Gültigkeitsprüfung" unter "Daten"
Gruß
Helmut
ich glabe was du suchst ist die "Gültigkeitsprüfung" unter "Daten"
Gruß
Helmut
Antwort 2 von nighty
hi helge :)
hier zwei kurze ansaetze bzw beispiele :)
gruss nighty
diese oder die andere in eine if then abfrage mit abfrage auf zelle bzw inhalt
bei beiden varianten wie du ja siehst gehoert der code in die tabelle
viel spass beim tuefteln :))
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
With Worksheets(1)
Dim bereich(2)
Dim zaehler1 As Integer
bereich(0) = "A1"
bereich(1) = "A3"
bereich(2) = "A5"
For zaehler1 = 0 To 2
If Range(bereich(zaehler1)) = "" Then
Range(bereich(zaehler1)).Select
Exit For
End If
Next zaehler1
End With
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Dim rgBereich As Range
Dim zaehler1 As Range
Set rgBereich = Worksheets("Tabelle1").Range("A1,A3,A5")
For Each zaehler1 In rgBereich
If zaehler1 = "" Then
zaehler1.Select
Exit For
End If
Next zaehler1
End Sub
hier zwei kurze ansaetze bzw beispiele :)
gruss nighty
diese oder die andere in eine if then abfrage mit abfrage auf zelle bzw inhalt
bei beiden varianten wie du ja siehst gehoert der code in die tabelle
viel spass beim tuefteln :))
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
With Worksheets(1)
Dim bereich(2)
Dim zaehler1 As Integer
bereich(0) = "A1"
bereich(1) = "A3"
bereich(2) = "A5"
For zaehler1 = 0 To 2
If Range(bereich(zaehler1)) = "" Then
Range(bereich(zaehler1)).Select
Exit For
End If
Next zaehler1
End With
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Dim rgBereich As Range
Dim zaehler1 As Range
Set rgBereich = Worksheets("Tabelle1").Range("A1,A3,A5")
For Each zaehler1 In rgBereich
If zaehler1 = "" Then
zaehler1.Select
Exit For
End If
Next zaehler1
End Sub
Antwort 3 von Redbill
Danke für die schnellen Antworten!
@Helmut
Die Gültigkeitsprüfung verwende ich, um Typen auswählen zu lassen. Das klappt. Das Problem ist, dass bei bestimmter Auswahl von Typen andere Felder ausgefüllt werden sollen (Pflichtfeld)
@nighty
von VB habe ich leider weniger bis gar keine Ahnung. Mit deinen Scripts kann ich leider nicht viel zaubern. Ich habe gehofft, dass man das ganze über Formeln lösen kann.
Ich habe gerade versucht die Auswählbaren Typen farblich zu markieren, um auf die Pflichtfelder aufmerksam zu machen, aber leider kann man nur 3 Typen bedingt formatieren in einer Zelle. Ich bräuchte aber mindestens 4. Arrays nimmt Excel leider nicht....:(
@Helmut
Die Gültigkeitsprüfung verwende ich, um Typen auswählen zu lassen. Das klappt. Das Problem ist, dass bei bestimmter Auswahl von Typen andere Felder ausgefüllt werden sollen (Pflichtfeld)
@nighty
von VB habe ich leider weniger bis gar keine Ahnung. Mit deinen Scripts kann ich leider nicht viel zaubern. Ich habe gehofft, dass man das ganze über Formeln lösen kann.
Ich habe gerade versucht die Auswählbaren Typen farblich zu markieren, um auf die Pflichtfelder aufmerksam zu machen, aber leider kann man nur 3 Typen bedingt formatieren in einer Zelle. Ich bräuchte aber mindestens 4. Arrays nimmt Excel leider nicht....:(
Antwort 4 von Redbill
Lösen könnte ich das ganze wenn ich auf die Pflichtfelder eine Gültigkeitsprüfung lege, die meckert" wenn man in dem Auswahlfeld nebenan bestimmte Typen auswählt, ohne die Pflichtfelder auszufüllen.
Dafür müßte man die Gültigkeitsprüfung an eine Bedingung knüpfen....
Leider wei0 ich nicht wie das funktionieren könnte....
Dafür müßte man die Gültigkeitsprüfung an eine Bedingung knüpfen....
Leider wei0 ich nicht wie das funktionieren könnte....