Check Cells for Real Dates

[rhombus4]

Whats the easiest way to check if a cell is a valid date before doing something else

Need to Check A7, C7 L7 and Z7 if any are either text or incorrect date entries exit sub with a message box

Thanks

 

[rhombus4]

When D2 changes new data is passed onto the sheet z1 gives target row when clicked on, so when I select a row I can copy a row of data. Just wanted to check dates i.e a7, c7, l7 and z7 if row 7 was selected

I already have a few lines if code when D2 changes.
How many not intersect targets can you have.

Ideally I wanted it in the module code I was doing earlier it worked for 2 ranges not 3 or 4
I.e this works

For each c in range("A" and rownum, "C" & rownum)

But when I tried below I got compile error wrong number of arguments or invalid property assignmen

For each c in range("A" & rownum, "C" & rownum, "L" & rownum)

 

[jasonb75]

Using that method, the commas need to be inside the double quotes

For each c in range("A" & rownum & ",C" & rownum & ",L" & rownum)

Commas inside the quotes for non continuous ranges.

Commas outside the quotes for a continuous range (maximum of 2 ranges specified), Range("A1","L1") is the same as Range("A1:L1") but is a bit easier to write when using a variable as the row.

 

[rhombus4]

Thanks again. Didn't realise Range("A1","L1") is the same as Range("A1:L1")
Never seen it like that, just "A1, b1, c1" etc