Problem Printing Headers using Visual Basic

[Paulxlus]

I have a macro that sorts various info and prints out several different sheets that need different headers. Everything works except only part of the info is posted into the headers.

I use the following code:

Please Login or Register  to view this content.

And get a page with the following headers:

Store Daily Pick Date(this part works fine)


Why are the first two headers only partially entered? This happens to all the other sheets

[Arkadi]

Can you clarify what you mean by partially entered? I don't follow...
I do know that this code:

Please Login or Register  to view this content.

Adds the date "&D" and then the letters "ate" as "&D" is the code for the date

[Paulxlus]

The date is OK as long as I leave it as "&Date" I get the date, if I use "&D" I get nothing. It's the left and centre header that is giving me problems. The left header should read "Store # 1" but all I get is "Store". The centre header should read "Daily Pick List" but comes up "Daily Pick". I'm using Office 2010 and never needed to put headers into VB before.

[Arkadi]

Odd, I'm in office 2010 also, and have no issues with your code...
Are you getting a printout with partial headers, or are you actually checking the headers on the spreadsheet?
Also, if you put the headers in manually, does it take?

EDIT: try removing the Application.printcommunication statements, does it still do the same? I forgot I ommitted that, and if I enter that part of the code I get the same as you. If you do remove the "Aplication.PrintCommunication" statements, you will have to change &Date to &D

[Paulxlus]

What appears on the sheet is what I'm getting in print. Also, if I go to the page layout tab and check the print headers they are as they appear on the page. I do agree that "&D" should be the code for the date but why "&Date" works I have no idea.

[Arkadi]

Definitely a Application.PrintCommunication issue in my opinion. I know it speeds up pagesetup functions, but it causes too many headaches, so I never use it.

[Paulxlus]

I stopped using it and it made no difference

[Arkadi]

Got me stumped then... only using Application.Printcommunication = false did I get to duplicate your problem. Srry, will get back to you if I think of something.

It is set to true when you apply the header now? It wasn't left on False from another section of code?

[Paulxlus]

Setting it to true did not solve the problem