Calculating Time

[tedc]

I am writing a time program that needs to stop and start timer
I have two command buttons called: Start Time” and “Finish Time”
This is the code I attached to the buttons

Private Sub CommandButton1_Click()
ActiveCell.FormulaR1C1 = "=NOW()"
End Sub

Something is wrong somewhere
I need the “Finish Time” to be independent of the “Start Time” and as I stop and start a job, the total time needs calculating
Can anyone help?

Book1
	A	B	C	D	E	F	G
1	Client	Date	StartTime	FinishTme	TotalTime
2	JJClothingPtyLtd		4:55PM	4:55PM
3
4
5
6
Sheet1

 

[SIXTH SENSE]

Hi
use this instead!

Private Sub CommandButton1_Click() 
ActiveCell=NOW()
End Sub

 

[tedc]

Thanks mate works well

Ted