Vba code to autofit column when text is entered & time stamp entry for alternating columns

Hi there,

place this in WorkSheet_Change event:

Please Login or Register  to view this content.

or here is Your sample:
officer tracking.xlsm

Does this solution match Your requirements?

Hi there,
It is because this code is assigned to Worksheet_Change event. I words:
If You enter something in cell A4, then timestamp should be recorded to cell A3. But recording timestamp to A3 triggers another change event, and if

Please Login or Register  to view this content.

stands alone (without IF), the code records another timestamp in A3-1 = A2. Then another change event with timestamp to A1 and finaly You do not have cell A0... And this is Your 1004 error.

So You have to use IF to stop all that triggering after 1st timestamp. The IF says to excel change event, that only if value is entered in column which can be divided by 2 without any rest, record timestamp to cell on the left. And this only for column with number 4 and higher.

Is it understandable?

Hi there,

without '-2' it will work in the same way... It is a rest from my testing...
BUT when I look at that now, better You add new condition for IF and finaly the IF row has to look like:

Please Login or Register  to view this content.

because when You write something to col B, it should not write timestamp in col A.
Pls rewrite that line in Your workbook.