VBA líder zeros em cordas

MsgBox format(12,"0000")	' OUTPUT:  0012
Thoughtless Tapir