Look in the help index for OFFSET

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"albertmb" wrote in message
...
Hi everyone, I need your help and here is my problem:
In Sheet named "Punch Clock", I have cell A1=Today() and cell E1=Time and
cell A3 = John

In Sheet1 I have from B6:B370 a range of dates and from E4:S4 a range of
Names

In cells B6:B370 I have this formula
IF($B$6TODAY(),"",SUMPRODUCT(--('Punch Clock'!$A$3=$E$4)*--('Punch
Clock'!$A$1=B6),'Punch Clock'!$B$1))

and I have this code

Sub ConvertToValue1AftIn()
Dim cell As Range
For Each cell In Range("E6:E370")
If cell < Sheets("Punch Clock").Range("E1") Then
cell.Value = cell
End If
Next cell
End Sub

This code works only on the range of dates, is it possible to extend it to
concider also the range of names?.

Thank you in advance for your kind help