Saved Value to another Cell if any Cell Value Changed

Hi Guys,

Your golden hands really i need it.
What is the code IF ANY Changing Cell Value in F9 (will be changed by scrollbar) then the value from cell F10 (as Calculation) will be saved to another cell (F11) ?
I enclosed the attachment for reference.

Below the code in UserForm1:

Option Explicit

Private Sub CommandButton1_Click()
Dim PauseTime, Start, Finish, TotalTime, MyTime
Do
    Start = Timer
    DoEvents
    Sheet1.[F4] = Start / (60 * 60)
Loop
End Sub

Private Sub CommandButton2_Click()
End
End Sub

Private Sub ScrollBar1_Change()

Dim MyTime
MyTime = Time
Sheet1.[E5] = Format(MyTime)

TextBox1.Value = ScrollBar1.Value
Sheet1.[F9] = TextBox1.Value

On Error Resume Next

End Sub

Private Sub UserForm_Initialize()
ScrollBar1.Min = 0
ScrollBar1.Max = Sheet1.[E9]
ScrollBar1.Orientation = fmOrientationHorizontal
ScrollBar1.SmallChange = 1
ScrollBar1.LargeChange = 1
ScrollBar1.Value = 0
End Sub

Thanks in advance for your helps and supports.

Best Regards,
Iqballhud