Hi Phil
Assuming you want your variable myVar to hold this value:
myVar = Format(240,"0000000")
Note that this is held as a string value. If you simply want to
display 240 in your sheet in the desired format, then you need to set
the number format of the cell that holds the value:
Range("A1").Value = 240
Range("A1").NumberFormat = "0000000"
Hope this helps!
Richard