Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I have the following code with which I want to highlight new entries to my
spreadsheet. The new entries are marked "new" in column A. I am testing some code and cannot remember/figure out how to select the range I would like to add color too. I want to highlight the active row and select up to column Z and fill in a color. Here is the code, which starts what I want to do but doesn't quite bring it home... a second question would be: Will this code work with more than one sheet if I select a new sheet? Sheets("c").Select Set wks = ActiveSheet Set rngToSearch = wks.Columns(1) Set rngFound = rngToSearch.Find("new") If rngFound Is Nothing Then MsgBox "Nope" Else Do rngFound.Select ??????????????????????? Range(ActiveCell, Columns.End(xlLeft)).Select ??? With Selection.Interior .ColorIndex = 36 .Pattern = xlSolid End With Set rngFound = rngToSearch.FindNext Loop Until rngFound Is Nothing End If End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
loop over columns | Excel Discussion (Misc queries) | |||
Selecting columns through a loop | Excel Programming | |||
need some help with selecting a sheet in a loop again | Excel Programming | |||
loop through columns | Excel Programming | |||
Loop 20 columns Help! | Excel Programming |