macro problem posting not correctly

tinamiller1

New member
Joined
Aug 28, 2013
Messages
16
Reaction score
0
Points
0
I am trying to change the cells of a 935 row worksheet but it keeps changing everything to the same thing. My macro is:

Code:
'macro fifteen
'implant update
Sub imptype()
Dim c As Range
For Each c In Range("l2:l" & Range("l" & Rows.Count).End(xlUp).Row)
    c = IIf(UCase(c) = "AIP", "Implant Pass-through: Auto Invoice Pricing (AIP)", "Implant Pass-through: PPR Tied to Invoice")
Next
End Sub

DATA HAVE
imptype
AIP
Standard
Standard
Standard
Standard
AIP
AIP
AIP
Standard
AIP
Standard
AIP
DATA Need
imptype
Implant Pass-through: Auto Invoice Pricing (AIP)
Implant Pass-through: PPR Tied to Invoice
Implant Pass-through: PPR Tied to Invoice
Implant Pass-through: PPR Tied to Invoice
Implant Pass-through: PPR Tied to Invoice
Implant Pass-through: Auto Invoice Pricing (AIP)
Implant Pass-through: Auto Invoice Pricing (AIP)
Implant Pass-through: Auto Invoice Pricing (AIP)
Implant Pass-through: PPR Tied to Invoice
Implant Pass-through: Auto Invoice Pricing (AIP)
Implant Pass-through: PPR Tied to Invoice
Implant Pass-through: Auto Invoice Pricing (AIP)
 
Maybe try IIf(UCase(Trim(c)) in case there are spaces that you can't see.
 
Back
Top