Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Need help with looping function
Hi,
Im not really a vba programmer, so i need some help with this one. I have large excel sheet with customer which I summarize using subtotal. I want a function that does the following : if total then check the total sum for this row, if negative number set background for the whole row = yellow. I got started but then i got stuck : Sub TrailMyNegativeNumbers() ' ' TrailMyNegativeNumbers Macro ' Macro recorded 15.02.2006 by Mikal Skaaren ' ' Keyboard Shortcut: Ctrl+z ' Dim c As Range ' Select the range for the first criteria Range("A2: A22").Select For Each c In Selection.Cells MsgBox (c.Value) ' If c.Value="" then TOTAL If (c.Value = "") Then ' Get a reference to the right ' Column in the selected row ' and see if that number 0 ' ' If negative set the background color ' = yellow c.EntireRow.Select With Selection.Font ' .ColorIndex = 12 End With End If Next End Sub Could anybody help me with this function pleease? BR Mike |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Help with looping | Excel Programming | |||
Calling macros, looping function? Can this code be written more efficiently? | Excel Programming | |||
Help with macro looping and color query function | Excel Discussion (Misc queries) | |||
Looping | Excel Programming | |||
looping to End | Excel Programming |