Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 15
Default footer character limit issue in Excel

I am running Excel v14 in MS Office 2010. I have a routine that puts a two line disclaimer into the footer of each tab in the workbook. The routine also inserts the date in the right hand side of the footer.

If I put the disclaimer and date in manually, no issues. If I insert the same disclaimer via code, the second line of the disclaimer truncates the last six characters of the string. If I leave the date out of the code, it works perfectly.

The disclaimer does not bust the 255 character limit. The first line is 43 characters; the second is 68.

So, I need to have both the disclaimer and date correctly inserted.

Any suggestions?

here's the code:

*********

Const Proprietary1 = "&8This string length is exactly 43 characters"
Const Proprietary2 = "The second line string length is much longer at 68 text characters--"



With ActiveSheet.PageSetup

.LeftFooter = ""
.CenterFooter = Proprietary & Chr(13) & Export
.RightFooter = Date

end with
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 15
Default footer character limit issue in Excel

One more bit of information - the page layout is landscape mode.

On Monday, April 2, 2018 at 10:31:51 AM UTC-4, wrote:
I am running Excel v14 in MS Office 2010. I have a routine that puts a two line disclaimer into the footer of each tab in the workbook. The routine also inserts the date in the right hand side of the footer.

If I put the disclaimer and date in manually, no issues. If I insert the same disclaimer via code, the second line of the disclaimer truncates the last six characters of the string. If I leave the date out of the code, it works perfectly.

The disclaimer does not bust the 255 character limit. The first line is 43 characters; the second is 68.

So, I need to have both the disclaimer and date correctly inserted.

Any suggestions?

here's the code:

*********

Const Proprietary1 = "&8This string length is exactly 43 characters"
Const Proprietary2 = "The second line string length is much longer at 68 text characters--"



With ActiveSheet.PageSetup

.LeftFooter = ""
.CenterFooter = Proprietary & Chr(13) & Export
.RightFooter = Date

end with


  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1,182
Default footer character limit issue in Excel

What happens when you move the disclaimer to LeftFooter?

.LeftFooter = Proprietary & vbLf & Export
.RightFooter = Date

--
Garry

Free usenet access at http://www.eternal-september.org
Classic VB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.vb.general.discussion
  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 15
Default footer character limit issue in Excel

Tried your suggestion. The result is the last character of the Proprietary2 string is truncated.


On Monday, April 2, 2018 at 10:31:51 AM UTC-4, wrote:
I am running Excel v14 in MS Office 2010. I have a routine that puts a two line disclaimer into the footer of each tab in the workbook. The routine also inserts the date in the right hand side of the footer.

If I put the disclaimer and date in manually, no issues. If I insert the same disclaimer via code, the second line of the disclaimer truncates the last six characters of the string. If I leave the date out of the code, it works perfectly.

The disclaimer does not bust the 255 character limit. The first line is 43 characters; the second is 68.

So, I need to have both the disclaimer and date correctly inserted.

Any suggestions?

here's the code:

*********

Const Proprietary1 = "&8This string length is exactly 43 characters"
Const Proprietary2 = "The second line string length is much longer at 68 text characters--"



With ActiveSheet.PageSetup

.LeftFooter = ""
.CenterFooter = Proprietary & Chr(13) & Export
.RightFooter = Date

end with


  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3,872
Default footer character limit issue in Excel

Hi,

Am Tue, 3 Apr 2018 05:46:17 -0700 (PDT) schrieb :

Tried your suggestion. The result is the last character of the Proprietary2 string is truncated.


reduce the font size to 7


Regards
Claus B.
--
Windows10
Office 2016


  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 15
Default footer character limit issue in Excel

Claus,

Changing font size has no effect - it still truncates the last 6 characters of the second string at font size 6, 7, 8, etc...



On Tuesday, April 3, 2018 at 9:13:38 AM UTC-4, Claus Busch wrote:
Hi,

Am Tue, 3 Apr 2018 05:46:17 -0700 (PDT) schrieb :

Tried your suggestion. The result is the last character of the Proprietary2 string is truncated.


reduce the font size to 7


Regards
Claus B.
--
Windows10
Office 2016


  #9   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1,182
Default footer character limit issue in Excel

Here's my code...

Sub SetFooter()
With ActiveSheet.PageSetup
.RightFooter = "&D"
.CenterFooter = "This string length is exactly 48 characters long" & vbLf _
& "The second line string length is much longer at 70 text characters long"
End With
End Sub

--
Garry

Free usenet access at http://www.eternal-september.org
Classic VB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.vb.general.discussion
  #10   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 15
Default footer character limit issue in Excel

Garry,

I had the same code as what you have listed below in a formatting subroutine which formats the page and the footer. I moved this code into a separate sub called from the formatting sub, and it works!

It makes no sense to me why this is so, but I'm grateful

Art


  #11   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1,182
Default footer character limit issue in Excel

Garry,

I had the same code as what you have listed below in a formatting subroutine
which formats the page and the footer. I moved this code into a separate sub
called from the formatting sub, and it works!

It makes no sense to me why this is so, but I'm grateful

Art


You're most welcome! I appreciate the feedback; glad to help...

--
Garry

Free usenet access at http://www.eternal-september.org
Classic VB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.vb.general.discussion
Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Circumventing the 255 character header/footer limit Cato Larsen Excel Worksheet Functions 9 May 14th 23 07:46 PM
Text box character limit issue ~L Excel Worksheet Functions 0 November 13th 08 07:52 PM
Character limit in an Excel Row Denise Excel Worksheet Functions 1 October 6th 05 02:33 AM
Is it possible to add a 650 character footer in Excel? evecorin Excel Programming 0 April 4th 05 09:31 PM
Footer character limit Michelle Excel Programming 0 June 3rd 04 08:30 PM


All times are GMT +1. The time now is 05:51 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"