Function GetLeftPad(Value) GetLeftPad = Right("0" & Value, 2) End Function