using the intersect command

[claudehollett]

I have a header row across the top of my sheet with days of the month listed in each column (ie. 1-31 in general format). A list of names in col A. Each cell in col A also has a command button in it. When the button is clicked I want code to move the selection across the row until the col with today's day at the top is intersected. Increment by one the value in the intersected cell and return the selection to Col A on same row. Use system date to get the day of month (I can do this part) What I need is to know how to get to the intersecting cell) It is easy to look at the intersecting cell and click on it, but how can I get the selection there using VB and the system date.