Versuche mich an einem Eingabeformular. Bin relativ neu im VBA Land. Habe soweit alles hingekriegt, wenn auch nicht elegant wie ich vermute... jedoch möchte ich in einer Zelle nicht, dass die dortige Formel überschrieben wird wenn activate ausgeführt wird. Ziel: In Zelle 5 wird ein Wert eingetragen via Formular und in Zelle 6 und 7 wird dann je nach Grösse der Zahl in Zelle 5 die entsprechende Formel ausgeführt. Hier die aktuelle Programmierung:
Private Sub UserForm_Activate()
TextBox4 = Sheets("Kalkulation").Cells(5, 4)
TextBox5 = Sheets("Kalkulation").Cells(6, 4)
TextBox6 = Sheets("Kalkulation").Cells(7, 4)
Und das soll hinein:
In Cells 6 soll stehen =WENN(D6 in Cells 7 soll stehen =WENN(D6>60;C8;0)
Hat jemand eine Idee? Besten Dank auf jeden Fall.
Stephan