View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
ozgrid.com ozgrid.com is offline
external usenet poster
 
Posts: 464
Default If the cell is empty, copy the value from a specific cell.

If IsEmpty(Range("J3")) Then Range("J2").Copy Range("J3")




--
Regards
Dave Hawley
www.ozgrid.com
"Aline" wrote in message
...
Hi there,

How do I write a macro that will check the cells to see if they are empty.
If the cell J3 is empty, if it will copy the content from J2 onto J3. Do
the
same for J4, J5... J8.

Thanks,
Aline