Home > Runtime Error > Microsoft Visual Basic Runtime Error 4608

Microsoft Visual Basic Runtime Error 4608

Contents

Already a member? This > macro basically takes a 3 page letter, for example and formats the > first page to print from our letterhead tray (tray 1) and all other > pages to If the OddAndEvenPagesHeaderFooter property is True, you can return an odd header or footer by using wdHeaderFooterPrimary, and you can return an even header or footer by using wdHeaderFooterEvenPages. The instructions apply generally to Office 2007 and later versions, but Microsoft® Word 2013 was used for the specific steps and figures.  What is Send to Mail Recipient? Source

Add Stickiness To Your Site By Linking To This Professionally Managed Technical Forum.Just copy and paste the BBCode HTML Markdown MediaWiki reStructuredText code below into your site. VBA Visual Basic Follow-Ups: Re: PageSetup + Section Breaks = Value out of range Run-time Error 4608 From: Russ RE: PageSetup + Section Breaks = Value out of range Run-time Error 46 From: periodic JaredHess View Public Profile Find all posts by JaredHess #2 04-14-2008, 04:11 PM Heyjoe Centurion Join Date: Nov 2006 Location: USA Posts: 171 Just a couple of thoughts. Get 1:1 Help Now Advertise Here Enjoyed your answer?

Microsoft Visual Basic Runtime Error 4608

It took .5 hours to format the two documents, two of the smallest, in the link above. It's certainly hard to grasp what exactly you want this code to do since there are no comments describing what your code does :). I have the document that failed and will provide it if needed.

  • Our printer is an HP > > Laserjet 4250. > > > > My problem is this.
  • All Rights Reserved.
  • With ActiveDocument.Sections(1) .PageSetup.DifferentFirstPageHeaderFooter = True .Footers(wdHeaderFooterPrimary).PageNumbers.Add _ FirstPage:=True End With Doing it this way may help.
  • Password Home Register Calendar Today's Posts FAQ Free Publications Search Xtreme Visual Basic Talk > Legacy Visual Basic (VB 4/5/6) > VBA / Office Integration > Word, PowerPoint, Outlook, and Other
  • About Us We're a friendly discussion community for Microsoft Office help and support.
  • subscribe
Home Register Calendar Today's Posts FAQ Archive © Xtremevbtalk.com 2001 - 2016.
  • Sub letter1() ' ' letter1 Macro ' Format document to print on Letterhad Paper with Bond for all following pages ' Macro created 9/27/05 by Leigh Descher Mueller for CWA '
  • Join & Ask a Question Need Help in Real-Time?
  • Basically the code sits in an Excel workbook which generates a report in Word, using Word VBA of course, populating it with the contents of a worksheet which was itself populated
  • Rich. . It would be better to start a new thread... -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP TOO Word MVP site: http://www.word.mvps.org Jean-Guy Marcil, Nov 2, 2005 #3 Jean-Guy Marcil You would think that if the 'line-pitch' was visible in the XML then there would be some where in Word that you could set this value. Comment underneath if this suggestion does not fix your problem. .BookFoldPrinting = False .BookFoldRevPrinting = False .BookFoldPrintingSheets = 1 share|improve this answer answered Mar 26 at 18:42 Floam 116110

    Two of them are for home/personal use: Office 365 Home and Office 365 Perso… Office 365 MS Office Office / Productivity MS Word MS Excel Advertise Here 767 members asked questions Runtime Error 4608 When Printing more hot questions question feed lang-vb about us tour help blog chat data legal privacy policy work here advertising info mobile contact us feedback Technology Life / Arts Culture / Recreation Suggested Solutions Title # Comments Views Activity Printing issues with color, black and white and MS WORD 19 50 54d How to customise Office 2016 font settings with a GPO 3 I tried using it and it did > have a window showing paper sizes, but I didn't really know what to > do with the information.

    DiCanio via OfficeKB.com, Mar 8, 2005, in forum: Word VBA Replies: 9 Views: 459 Bodiller Jun 30, 2005 Run-time error '4608' , Mar 10, 2005, in forum: Word VBA Replies: 0 Join UsClose PageSetup + Section Breaks = Value out of range Run-time Error 4608 From: "Rich" Date: Wed, 25 Jul 2007 21:43:35 +0100 Hi All, I have seen this problem When I next run this macro, if it fails, I'll be sure to investigate the information you've provided. Rob Red Flag This Post Please let us know here why this post is inappropriate.

    Runtime Error 4608 When Printing

    The larger ones have more than the smaller ones. http://www.xtremevbtalk.com/word-powerpoint-outlook-and-other-office-products/295397-run-time-error-4608-value-range-word-2003-a.html When I try to Debug it, it will continually error out on any of the lines under "With ActiveDocument.PageSetup". Microsoft Visual Basic Runtime Error 4608 On occasion on certain documents we get a runtime error of 4608 "Value out of range" and find that VB has stuck on ".FirstPageTray = wdPrinterAutomaticSheetFeed". Find all posts by Colin Legg

    « Previous Thread | Next Thread » Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)

    JaredHess View Public Profile Find all posts by JaredHess #7 04-17-2008, 09:18 AM Colin Legg Out Of Office Retired Moderator* Expert * Join Date: Mar 2005 Location: this contact form Just click the sign up button to choose a username and then you can ask your own questions on the forum. Join Us! *Tek-Tips's functionality depends on members receiving e-mail. JaredHess View Public Profile Find all posts by JaredHess #4 04-16-2008, 09:25 AM LadyAmazon Junior Contributor Join Date: Mar 2004 Location: New York Posts: 321 Hi, I am

    Sign Up Now! Blaise This article describes how to use the Send to Mail Recipient command. First Name Please enter a first name Last Name Please enter a last name Email We will never share this with anyone. have a peek here This page has been accessed 2,934 times.

    Close Reply To This Thread Posting in the Tek-Tips forums is a member-only feature. Resources Join | Indeed Jobs | Advertise Copyright © 1998-2016 ENGINEERING.com, Inc. Join Now For immediate help use Live now!

    Is there a way to load the ShowConfig before Sitecore finishes initializing?

    Many thanks, John Code: Sub ReportGenerate() ' Variable declarations Dim WordApp As Object Dim i As Integer Dim SaveAsName As String Dim TableCount As Integer TableCount = 0 Dim rng As email etiquette adding people to the thread vs reaching out directly Is there a name for the (anti- ) pattern of passing parameters that will only be used several levels deep Reasons such as off-topic, duplicates, flames, illegal, vulgar, or students posting their homework. You'll be able to ask questions about MS Office or chat with the community and help others.

    im using word 2003 ActiveDocument.PageSetup.DifferentFirstPageHeaderFooter = True Set oRng = ActiveDocument.Sections(1).Footers(wdHeaderFooterPrimary).Range oRng.ParagraphFormat.Alignment = wdAlignParagraphCenter NormalTemplate.AutoTextEntries("Page X of Y").Insert Where:=oRng, RichText:=True Casey Mac, Nov 1, 2005 #2 Advertisements Jean-Guy Marcil Guest Learn the most practical features and best approaches for ASP.NET. Here is the second version of the macro Function pagestuffB() As String ' ' Format for Publisher ' ' Dim rv As String rv = "" On Error GoTo ErrorHndlr: With Check This Out Our printer is an HP > Laserjet 4250. > > My problem is this.

    strActivePrinter = Application.ActivePrinter 'Change the active printer to match local Aficio 2075-B ActivePrinter = "\\circe\Aficio 2075-B PCL6" For each sec in ActiveDocument.Sections The normal value for line-pitch seems to be 360 in the XML for (A4 Paper). Login. Below is the text of the macro Sub PlainPrint_B() ' ' PlainPrint-B Macro ' Prints to Aficio 2075-B, Plain paper ' ' Get active/default printer.

    No, create an account now. Similar Threads run-time error '4608' value out of range grant thomas, Aug 15, 2003, in forum: Word VBA Replies: 0 Views: 760 grant thomas Aug 15, 2003 Run-time Error '4608' Value ActiveDocument.PageSetup.LinesPage = 38 'achieves the same as all the above but is a little bit easier. Newer Than: Search this thread only Search this forum only Display results as threads Useful Searches Recent Posts More...

    If so, please mark it as answered to close the question. Sometime's my letter has different margins, etc. > (I'm assuming this is the problem) and because of this I get a > Run-time error '4608: Value out of range error. What I found was that there is an attribute in each section which has the XML of or similar this XML can usually be found just before . Three of them are for business use: Office 365 Business Essentials, Office 365 Business, and Office 365 Business Premium.