Hi
I would like to temporarily format some cells in the row of the ActiveCell and some cells in the column of the ActiveCell. This is like what happens with the headings in a sheet but I need to highlight cells in the body of the WorkSheet. Can anyone help me please?
This is harder than you think.
But this has been solved,
You need conditional formatting and a sheet specific macro to do this.
The attached file does what you want and more
You will need to modify the conditional formats to remove the vertical line.
The sheet specific macro needs to run when you change your selection, it effectively switches to a second sheet and back again to force excel to apply the conditional formatting.
If your spreadsheet only was one sheet, the macro will create a second sheet.
Right Click on the sheet name and select view code to see the code.
Last edited by mehmetcik; 11-08-2015 at 07:57 AM.
My General Rules if you want my help. Not aimed at any person in particular:
1. Please Make Requests not demands, none of us get paid here.
2. Check back on your post regularly. I will not return to a post after 4 days.
If it is not important to you then it definitely is not important to me.
Thanks mehmetcik, That looks like what I need. I have not applied it to Project but I cannot as yet see a problem. Will mark this as solved when I have tried it. It might be a few days until I can get the time to work on it.
Regards Mike
@mehmetcik: just out of curiosity, is there any special reason why you add the extra worksheet?
I removed that part of the code and on selection change is sufficient, it works.
Just the fact that you select another cell is enough to trigger it.
---
Hans
"IT" Always crosses your path!
May the (vba) code be with you... if it isn't; start debugging!
If you like my answer, Click the * below to say thank-you
I knew it was somewhere: This Addin does the same thing
http://www.cpearson.com/excel/rowliner.htm
I used this about 12 years ago
Thanks to you both. mehmetcik's was the solution I needed, to fill a part row of cells that are to the right but not adjacent to the active cell and similarly a part column of cells below and not adjacent to the active cell. Keebellah is right the code can be reduced
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.Calculate
End Sub
The cross hairs of Keebellah are not what I was looking for.
Thanks again.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks