Try using Timer if the date information is not important. Timer gives
the number of seconds (including fractions of a second) since
midnight.
Public Sub Record_Stage_Time()
Sheets("Sheet2").Range("C8") = 0 'so you can see it's changed
Stage_Start_Time = Timer
For x = 1 To 75000000 'loop takes 1.4 secs or so
Next
Stage_End_Time = Timer
Sheets("Sheet2").Range("C8") = (Stage_End_Time - Stage_Start_Time)
End Sub