Hi
In follwing code myGate = CS and the statement nCs =39445. In the Find
method I want that myDayNr = 39445, not "nCS". How to do?

Public nCS As Long
Sub X()
'----
myDayNr = "n" & myGate
'----

Cells.Find(myDayNr, After:=ActiveCell, LookIn:=xlValues,
LookAt:=xlWhole, _
SearchOrder:=xlRow, SearchDirection:=xlNext).Activate
End Sub
--
Officebyggaren
Kent Älmegran