Then change
from
For a = 1 To aLastRow
to
For a = 5 To aLastRow


"Robert" wrote:

Hi Joal,
Thanks for your support!
I changed the code but still no values in column C...
Forgot to mention that the if then should start at row5.
Rgds,
Robert