Hi, ein Problem zuvor gelöst. Das zweite wartet aber schon.

Wie kann ich die Abfrage einer InputBox auf verschiedene Zellen verteilen?

Beispiel

Bedingung A ist erfüllt, InputBox öffnet sich, Wert wird eingegeben = Ergebnis soll in Zelle A1
Bedingung B ist erfüllt, InputBox öffnet sich, Wert wird eingegeben, = Ergebnis soll in Zelle A2
usw.

Die Abfrage der verschiedenen Bedinungen funktioniert. Aber sobald ich die Ergebnisse auf zwei Zellen verteilen möchte blockiert Excel....
Mein Code so far:

Dim strEingabe As String

If Target.Row = 6 And Target.Column > 8 And Range("z5") < 50 Then
Worksheets("x01").Unprotect
strEingabe = InputBox("Fall A:")
End If
If strEingabe = "" Then Exit Sub
Range("C42").Value = Range("C42") + strEingabe
Worksheets("x01").Protect


If Target.Row = 9 And Target.Column > 8 And Range("z8") < 50 Then
Worksheets("x01").Unprotect
strEingabe = InputBox("Fall B:")
End If
If strEingabe = "" Then Exit Sub
Range("C43").Value = Range("C43") + strEingabe (sobald ich eine zweite Zelle angebe funktioniert es nicht mehr)
Worksheets("x01").Protect

Könnte mir da evtl. jemand eine Lösung anbieten?
danke