Number from macro to cell

[Oeysbrei]

Hi,

I have this code that saves and open a single sheet from exel workbook to a PDF file (report). When it get saved it automatic gives a name to the file such as TTS-1, and next time saved TTS-2.
Is there anything I can do to the code that saves this filename in a cell in the worksheet as my reportnumber.

This is the code that I use.

Please Login or Register  to view this content.

Thanks in advance

Oeysbrei

[Mallycat]

This code will save the version number in cell A1 on sheet1. If you want it somewhere else, then just update the address

Please Login or Register  to view this content.

[Oeysbrei]

Thanks Mallycat,

I had to do some changes so that if some reports were deleted from the folder it would still be the the same reportnumber as filename.
This is the code after modified.

Please Login or Register  to view this content.

Is there a way I can place the value right side in the header?

Regards
Oeysbrei

[Mallycat]

I taught myself to program in VBA. The trick is to turn on the Macro Recorder, do what you want to do, then analyse the code. When I just did this (added 'test') to the right header, I came up with this code

ActiveSheet.PageSetup.RightHeader = "test" (simplified from the recorder).

Based on this learning, try this

Please Login or Register  to view this content.