P
PO
Hi
I'm extracting invoicedata from a database into a worksheet
I want to leftalign the pagenumber and invoicenumber in the right header in
pagesetup of the worksheet. Each time the user retrieves the invoicedata I
use the following code to set the right header for the worksheet:
Sub SetHeader
....
with activesheet.pagesetup
.rightheader = "Page" & _
Chr(10) & "&P(&N)" & _
Chr(10) & "Invoicenr" & _
Chr(10) & strInvNr
end with
End sub
If I place the text in the right header, however, the text right aligns.
I've tried to place the text in the left header and use the string function:
with activesheet.pagesetup
.leftheader = string(165, " ") & "Page" & _
string(165, " ") & Chr(10) & "&P(&N)" & _
string(165, " ") & Chr(10) & "Invoicenr" & _
string(165, " ") & Chr(10) & strInvNr
end with
This doesn't work since you only can place up to 254 characters in one
header.
I use Excel 2000.
Any ideas?
TIA
PO
I'm extracting invoicedata from a database into a worksheet
I want to leftalign the pagenumber and invoicenumber in the right header in
pagesetup of the worksheet. Each time the user retrieves the invoicedata I
use the following code to set the right header for the worksheet:
Sub SetHeader
....
with activesheet.pagesetup
.rightheader = "Page" & _
Chr(10) & "&P(&N)" & _
Chr(10) & "Invoicenr" & _
Chr(10) & strInvNr
end with
End sub
If I place the text in the right header, however, the text right aligns.
I've tried to place the text in the left header and use the string function:
with activesheet.pagesetup
.leftheader = string(165, " ") & "Page" & _
string(165, " ") & Chr(10) & "&P(&N)" & _
string(165, " ") & Chr(10) & "Invoicenr" & _
string(165, " ") & Chr(10) & strInvNr
end with
This doesn't work since you only can place up to 254 characters in one
header.
I use Excel 2000.
Any ideas?
TIA
PO