Hello
Task:
Calculate a value, only if the background of the cell is a certain color, then go to next row.
I have been reading up on the Do/Loop, If/Then and For/Next statements, but having difficulty making any of them work.
Here is the code:
Thank you for your assistance
Task:
Calculate a value, only if the background of the cell is a certain color, then go to next row.
I have been reading up on the Do/Loop, If/Then and For/Next statements, but having difficulty making any of them work.
Here is the code:
Rich (BB code):
Cells.Find(What:=Util1, after:=ActiveCell, LookIn:=xlValues, LookAt:= _
xlWhole, SearchOrder:=xlByRows, searchdirection:=xlNext, MatchCase:=False _
, SearchFormat:=True).Offset(1, 1).Activate
If ActiveCell.Interior.Color = 16711935 Then
UpdateRow = ActiveCell.Row
TrueStat = Application.WorksheetFunction.Index(StatCol,UpdateRow)
HoldStat = Application.WorksheetFunction.Sum(TrueStat/RStat)
UpdateStat = Application.WorksheetFunction.Round (HoldStat,4)
ActiveCell.Value = Round(UpdateStat*Redist1,2)
Else