IF D2 contains X then divide I2 by 10

[Bassmoore]

Hi All,

Have a major problem with our monthly call billing, we basically have a spreadsheet which shows a number called and the total cost of the call.

However our the calls for 0844 & 0845 numbers are 10x the actual cost!

Does anyone know how i can run a macro which will find the 0844 & 0845 numbers in the D column and then if it finds one, divides the total cost in column I by 10 on that particular row?


Thanks!

 

[SteveO59L]

code would go something along the lines of

Dim c As Range, rng
Dim lastrow As Long
lastrow = Cells(Rows.Count, "d").End(xlUp).Row
Set rng = Range("d2:d" & lastrow)
For Each c In rng
If Left(c, 3) = "844" Then
c.Offset(0, 5).Value = c.Offset(0, 5).Value / 10
End If
Next c

 

[Special-K99]

You mean you want to search for 0844 0845 and search for other numbers too?
Mmm, I wonder why you left that important information out?

If you only want to search for 0844 and 0845 other numbers will NOT be affected.