|
Hi,
dafür brauchst du weder VBA noch Steuerelemente / Formularfelder.
Es läuft einfach per Formel.
Hier mal ein Beispiel welches per Makro erzeugt wird, weil es das besser verdeutlich als es nur verbal zu schildern.
Option Explicit
Sub Beispiel_Init()
With Range("A1") 'DropDown 1
.Validation.Delete
.Validation.Add xlValidateList, Formula1:="Version-A,Version-B"
Range("E10").Formula = "=IF(" & .Address & "=""Version-A"",3*B12," & _
"IF(" & .Address & "=""Version-B"",B11+B12,"""")" & _
")"
End With
With Range("A2") 'DropDown 2
.Validation.Delete
.Validation.Add xlValidateList, Formula1:="Version-C,Version-D,Version-E"
Range("E11").Formula = "=IF(" & .Address & "=""Version-C"",3*B15," & _
"IF(" & .Address & "=""Version-D"",B14," & _
"IF(" & .Address & "=""Version-E"",B14+3*B15,"""")" & _
")" & _
")"
End With
'Ergebnis
Range("B10").Formula = "=MIN(E10,E11)"
End Sub
Nachdem du das Makro einmal ausgeführt hast, kannst du dir die Werte / Formeln im aktiven Blatt ansehen.
Die DropDown-Felder sind dabei Gültigkeitslisten und befinden sich hier im im Beispiel in den Zellen A1 und A2.
Gruß
|