or ??
[VBA]Sub M_snb()
For each cl in columns(3).specialcells(2)
If InStr(cl.offset(,1), "STATUS CODE") Then cl.offset(,1)=Val(split(cl.offset(,1),"Status code")(1))
Next
End Sub[/VBA]
or ??
[VBA]Sub M_snb()
For each cl in columns(3).specialcells(2)
If InStr(cl.offset(,1), "STATUS CODE") Then cl.offset(,1)=Val(split(cl.offset(,1),"Status code")(1))
Next
End Sub[/VBA]
Posting Permissions
Reply With Quote