Saveas function

[reidn]

I am using a string of code that saves a file under the workorder name. I need it also save it the date stamp which is a text box on my form. For example I would like it to save something like this... WO2534-9/3/90
Here is the code I have so far...


objXLBook.SaveAs ("I:\Dept\AA-QMM-NA\Shared\APC\Inprocess_Final\Red_Tags\" & Me.WO_ORDER__.Value & ".xls")

Thanks for the help

[pbaldy]

The slashes would be invalid as a file name.

[reidn]

I figured as much but I could use an ID number as well. Just something to distinguish one from another if there are multiple of the same number. Basically I need to know how to reference two different text boxes

[pbaldy]

Just keep concatenating:

objXLBook.SaveAs ("I:\Dept\AA-QMM-NA\Shared\APC\Inprocess_Final\Red_Tags\" & Me.WO_ORDER__.Value & Me.OtherTextboxName & ".xls")

[reidn]

Thanks baldy, that worked. Is there any way I could add an underscore between the too so its not just a massive number? I tried & me.order & "_" & me.ID & and that didnt work...

[pbaldy]

That should work fine. What does "didn't work" mean? If you got an error, what was it? You might try Debug.Print (prints to the VBA Immediate window) or a message box so you can see what the code is trying to use:

Debug.Print "I:\Dept\AA-QMM-NA\Shared\APC\Inprocess_Final\Red_Tags\" & me.order & "_" & me.ID & ".xls"

You can examine the result to make sure it will be a valid path and file name.

[reidn]

I got it working. The problem was there was one I had to replace buried in the code that I didn't see. Thanks for the help

[pbaldy]

Happy to help!