Having issue the unselecting a cell

[dwhite30518]

Good Friday All!!!

So I have the following code...

Please Login or Register  to view this content.

This code currently changes the format of the dates with in the spreadsheet and then searches 2 columns for blanks. In 2 columns, I want the row to highlight if the cell is blank. I have that part working. However, if there are no blanks in those 2 columns, then it seems to highlight the last cell in the last formatted date column. How do I fix this?

I have attached a sample worksheet I am using so you can see what happens. Sheet 1 has a blank in the Repair Activity 1 Column and sheet 2 does not contain any blanks.


I look forward to your solutions!!!

Thanks!!!

[ChuckYeager]

Hi,

If you are having a problem with this part of the execution....

Please Login or Register  to view this content.

You have to just c.entirerow.select action to the next row and provide and "End IF" after the "End With" statement. I have not check your sheet however it seems that the with statement is executed during the loop or near the end of the loop notwithstanding the result of the IF...THEN check.

[dwhite30518]

I have entered the "End If" after the "End With" but then I get a compile error that says, "End If without Block If."

[ChuckYeager]

Hi Dwhite30518,

You also have to move the c.entirerow.select as well down in the preceding If...then statement in both instances.

that section of code should look like

Please Login or Register  to view this content.

see if it works.

[dwhite30518]

When I use that code a get an error that says, "Next without For."

[ChuckYeager]

Hi dwhite30518,

Can you please paste the code that you've just tried to execute.

[dwhite30518]

Please Login or Register  to view this content.

This is the entire code that I have been working with and you can use on the workbook I posted and see the results I have been getting.

Thanks!!!

[ChuckYeager]

Hi Dwhite30518,

This is the corrected code. Execute this

Please Login or Register  to view this content.

[dwhite30518]

Awesome!!! That works great...Thanks!!!!!!!!!!