Hi I have create a find program using these:

Set c = Worksheets("MFS").Range("a1:a1000").Find(what:=v, lookat:=xlPart)

Set d = c.Find(what:="enbl", lookat:=xlPart)
Its looking for a code number in a cell, in this example its 12601 which is stored in the variable 'v'
Then it looks for the word "enbl". If both criterica is met 12601 is put in a list.
05:1 1260104 Enbl

What I would like to do now is extract the 04 at the end of the 12601. Any idea as how I can get started with this

Thanks
Mike