VBA - Custom Format "00" if cell contains number

[CC268]

I have a list of Revisions and I basically want to make sure that any revision that is a number (NOT a letter) is custom formatted "00" so it shows as a Rev. 01, 02, 03, etc and NOT just Rev. 1, 2, 3. I want this to be via VBA as I have an Excel Add In I am creating for other users. There are spaces between these revisions so it needs to find the bottom of the column, with the understanding that there are blank rows in between the Revs.

https://photos.app.goo.gl/chGv43H78GMrwDPR2

Any help is appreciated.

Thanks.

 

[CC268]

Anyone got any suggestions? I figure it would be a pretty simple thing, but maybe it is more complex than I thought.

 

[Marcelo Branco]

Maybe...

With Sheets("Sheet1") '<--adjust sheet name
    .Range("A4:B" & .Cells(.Rows.Count, "A").End(xlUp).Row).NumberFormat = "00"
End With

M.