want to move content of cells somewhere else only if it's not a date format

[Bouje]

I have a column of data that has a mix of dates and numbers. I want to create a macro that moves only the numbers (not dates) over a set distance (a few columns over and up one). I can play around with "offset" and get it right but am having trouble with getting the "NumberFormat" property to recognize what's in date format and what's not.

I used the following simple code to get started:

Please Login or Register  to view this content.

It's moving everything regardless of format. I tried using m/d/yyyy instead of "Date" but that doesn't work either. Do I need to use an "elseif" somewhere too?

Thanks.

[6StringJazzer]

I ran your code with m/d/yyyy and it worked perfectly. Check the formatting in the cells that you think are dates. If you have custom formatting you need to use the custom format string.

Please Login or Register  to view this content.