Hallo Zusammen,
wahrscheinlich sehe ich vor lauter Bäumen keinen Wald mehr...
Eigentlich soll der folgende Code den Zweck haben in Zelle "C32" den Wert 0.5, 1 oder1.5 zu schreiben, je nach dem, was in C29, C30 und C31 steht. Aber egal was ich auswähle, der Ergebnis ist immer 0.5.
Als Anfänger zum verzweifeln... Für die Cracks hier wohl eher einen Kleinigkeit, oder?
Vielen, vielen Dank für Eure Hilfe!
Steve
wahrscheinlich sehe ich vor lauter Bäumen keinen Wald mehr...
Eigentlich soll der folgende Code den Zweck haben in Zelle "C32" den Wert 0.5, 1 oder1.5 zu schreiben, je nach dem, was in C29, C30 und C31 steht. Aber egal was ich auswähle, der Ergebnis ist immer 0.5.
Als Anfänger zum verzweifeln... Für die Cracks hier wohl eher einen Kleinigkeit, oder?
Quellcode
- Private Sub Worksheet_SelectionChange(ByVal Target As Range)
- If Range("C29").Value = "Ja" Then
- Range("C32").Value = 0.5
- ElseIf Range("C30").Value = "Ja" Then
- Range("C32").Value = 0.5
- ElseIf Range("C31").Value = "Ja" Then
- Range("C32").Value = 0.5
- ElseIf Range("C29").Value = "Ja" And Range("C30").Value = "Ja" Then
- Range("C32").Value = 1
- ElseIf Range("C30").Value = "Ja" And Range("C31").Value = "Ja" Then
- Range("C32").Value = 1
- ElseIf Range("C29").Value = "Ja" And Range("C31").Value = "Ja" Then
- Range("C32").Value = 1
- ElseIf Range("C29").Value = "Ja" And Range("C30").Value = "Ja" And Range("C31").Value = "Ja" Then
- Range("C32").Value = 1.5
- End If
Vielen, vielen Dank für Eure Hilfe!
Steve