View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
sebastienm sebastienm is offline
external usenet poster
 
Posts: 694
Default Macro, if then next

Hi,
Excel has a ConditionalFormating featu
Assuming your range is A1:A10 and must be Dynamically formatted based on the
values of B1:B10 (special format when B is 1).
-Select A1:A10. Make sure A1 is the active cell.
- menu Format Conditional Formatting. In the dialog, choose:
-'formula is'
-enter the formula: = (B1=1)
(if formula returns True then applies the special format)
-click the Format button and choose a pattern in the Pattern Tab, say
Grey.
- Clickok
-click ok
From now on when a cell in B1:B10 is 1, it corresponding cell in A1:A10 gets
the Grey pattern

Is it close to what you were looking for?

Regards,
Sebastien

"aseret" wrote:

I am trying to get the cells in one column to show highlighted given the
value in the adjacent cell in the next column =1, if not then no format
change is needed. The macro I have pieced together is listed below but it It
works for one row and then does not drop down to the next row.


Public Sub Highlight()
For Each cell In Selection
If cell.Offset(0, 1) = 1 Then
ActiveCell.Select
Selection.Interior.ColorIndex = 6#
Pattern = xlSolid
End If
Next
End Sub