Excel Formel WENN DANN SONST

[Katojana]

Guten Abend liebes Forum,

Ich habe ein Problem.

Ich habe 5 Felder die miteinander interagieren sollen.
Wenn alle Felder 1-4 ein Ja beinhalten, soll das 5te Feld auch Ja anzeigen.
Sobald eines der Felder 1-4 ein Nein beinhaltet, soll das 5te Feld auch Nein anzeigen.

Das ist ja ziemlich einfach zu lösen mit der Wenn Dann Sonst formel.
(in meinem Fall =WENN(UND(C9="Ja";D9="Ja";E9="Ja";F9="Ja");"Ja";"Nein")

Nun möchte ich aber, dass der Benutzer in Feld 5 auch was schreiben kann, was dann Felder 1-4 automatisch auf den richtigen Wert setzt.
z.B. Wenn in Feld 5 "Ja" steht, dann ändern sich Feld 1-4 auch in "Ja"

Ist sowas möglich?
Vielleicht mit dropdown boxen?

 

[Xiaolong]

Ist sowas möglich?

Soweit ich weiß, nein

Kannst du ein 6-tes Feld daneben machen in das der Benutzer etwas eintragen kann? Dann kann man Felder 1 - 4 darauf abfragen

 

[Katojana]

Soweit ich weiß, nein

Kannst du ein 6-tes Feld daneben machen in das der Benutzer etwas eintragen kann? Dann kann man Felder 1 - 4 darauf abfragen

Das sollte möglich sein, danke.
Ich werds mal ausprobieren.

 

[cumulonimbus8]

Nun möchte ich aber, dass der Benutzer in Feld 5 auch was schreiben kann

Vergiss es. Wenn da eine Formel drin steht dann steht die drin und sonst nichts.

Inwiefern dort Aktionsmakros (füllen Feld 5 wenn in 1 bis 4 was getan wird) wirklich was nützen würden käme drauf an, glauben tue ich es nicht.

CN8

 

[Merle]

Das gibt n Kreisbezug...
Mit VBA gehts.

 

[GMG-CC]

Moin,

@ CN8: Na, dann will ich mal deinen Glauben in die richtige Richtung lenken ...

@ all:
Ja, das geht durchaus. Aber wie schon erwähnt, nur per VBA:

'Erstellt durch Günther Mumme
'GMG Computer-Consulting
'GMG-CC.de
'In das Modul der Tabelle einfügen

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
   Dim Sp As Integer, E1 As Variant
   
   E1 = Target.Value
   If Target.Address(0, 0) = "E1" Then
      If LCase(E1) = "ja" Or LCase(E1) = "nein" Then
         For Sp = 1 To 4
            Cells(1, Sp) = E1
         Next Sp
      Else
         MsgBox "Bitte nur ""Ja"" oder ""Nein"" eingeben", vbExclamation
         With Application
            On Error GoTo ErrorHandler
            .EnableEvents = False
            Target = ""
            .EnableEvents = True
         End With
         Exit Sub
      End If
      Exit Sub
   End If
   If Not Intersect(Target, Range("A1:D1")) Is Nothing Then
      With Application
         On Error GoTo ErrorHandler
         .EnableEvents = False
         Range("E1").Formula = "=IF(COUNTIF(A1:D1,""Ja"")=4,""Ja"",""Nein"")"
         .EnableEvents = True
      End With
   End If
ErrorHandler:
   Application.EnableEvents = True
End Sub

Es lässt sich natürlich auch noch abfangen, ob in eine der ersten 4 Zellen tatsächlich nur "Ja" oder "Nein" eingegeben wird, aber das ist marginal.

 

[Katojana]

Moin,

@ CN8: Na, dann will ich mal deinen Glauben in die richtige Richtung lenken ...

@ all:
Ja, das geht durchaus. Aber wie schon erwähnt, nur per VBA:

'Erstellt durch Günther Mumme
'GMG Computer-Consulting
'GMG-CC.de
'In das Modul der Tabelle einfügen

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
   Dim Sp As Integer, E1 As Variant
   
   E1 = Target.Value
   If Target.Address(0, 0) = "E1" Then
      If LCase(E1) = "ja" Or LCase(E1) = "nein" Then
         For Sp = 1 To 4
            Cells(1, Sp) = E1
         Next Sp
      Else
         MsgBox "Bitte nur ""Ja"" oder ""Nein"" eingeben", vbExclamation
         With Application
            On Error GoTo ErrorHandler
            .EnableEvents = False
            Target = ""
            .EnableEvents = True
         End With
         Exit Sub
      End If
      Exit Sub
   End If
   If Not Intersect(Target, Range("A1:D1")) Is Nothing Then
      With Application
         On Error GoTo ErrorHandler
         .EnableEvents = False
         Range("E1").Formula = "=IF(COUNTIF(A1:D1,""Ja"")=4,""Ja"",""Nein"")"
         .EnableEvents = True
      End With
   End If
ErrorHandler:
   Application.EnableEvents = True
End Sub

Es lässt sich natürlich auch noch abfangen, ob in eine der ersten 4 Zellen tatsächlich nur "Ja" oder "Nein" eingegeben wird, aber das ist marginal.

Ohhhh awesome danke =D
Ich werds direkt mal ausprobieren! <3