Quick Question

[msfatman]

I'm using this code to save a file:-

fName = Range("Q2").Value
ActiveWorkbook.SaveAs Filename:=sPath & "Issue " & fName & ".xls"

If Q2 has a value in of 4, it saves it as Issue 4, I need it to save as Issue 004. If 5 was entered then it would be Issue 005.

Can anyone help?

 

[doofusboy]

ActiveWorkbook.SaveAs Filename:=sPath & "Issue 00" & fName & ".xls"

 

[schielrn]

So if it was 14 would it then be 014?

If so maybe try:

fName = Range("Q2").Value
ActiveWorkbook.SaveAs Filename:=sPath & "Issue " & format(fName,"000") & ".xls"

Otherwise if it would be 0014 then use:

fName = Range("Q2").Value
ActiveWorkbook.SaveAs Filename:=sPath & "Issue 00" & fName & ".xls"

Hope that helps.

 

[Jonmo1]

Try

fName = Format(Range("Q2").Value,"000")