Hey,

I need help with my excel spreadsheet. We have a timesheet that calcuates employee regular time and overtime.

However, I need to add an checkbox that when the employee clicks the checkbox it will recalculate the regular and overtime fields so that the total in the overtime cell will change to 0 and add whatever was in the overtime cell to the regular cell.

Example:

Regular hours = 8
Overtime hours = 1

OnClick()
Regular hours = 9
Overtime hours = 0

THANKS!!


webXtreme

__________________
webXtreme

A checkbox or a button? Does this span over a range? Is this checkbox to loop through each worker?

Assuming Name is in Column A, Regular Hours is in column B, and overtime hours is in column C:
************************************************** ****************************
Private Sub CheckBox1_Click()

'Checks for overtime and adds it to the normal hours column then zeros it out
  Dim iRowOn As Long
  iRowOn = 2 'The row of the first name, assuming 1 header row
  Do While Cells(iRowOn, 1).value <> ""
    Cells(iRowOn, 2).Value = Val(Cells(iRowOn, 2).Value) + Val(Cells(iRowOn, 3).Value)
    Cells(iRowOn, 3).Value = 0
    iRowOn = iRowOn + 1
  Loop

End Sub

************************************************** ****************************