jactionscripters.com

Home > Runtime Error > Visual Basic Runtime Error 4608

Visual Basic Runtime Error 4608

Contents

HotDocs Wiki Page Discussion View source History Search Personal tools Log in / create account Navigation Main page Contents Glossary Categories Community portal HotDocs Knowledge Base Developer Corner Problems & Solutions Perhaps I'm not understanding your problem - disregard if it's irrelevant. 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 Close Box Join Tek-Tips Today! click site

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 ' I also thank you Graham for your solution - no other site in my Google search had anything close to this. 0 Featured Post Courses: Start Training Online With Pros, Today Not the answer you're looking for? For example integers cannot exceed 32767.

Microsoft Visual Basic Runtime Error 4608

This still didn't help me write a macro that worked. There is also a simpler way I have found to correct the documents but I don't know if the method will have any side effects. Cancel Red Flag SubmittedThank you for helping keep Tek-Tips Forums free from inappropriate posts.The Tek-Tips staff will check this out and take appropriate action. This information was very helpful, however, I had cleaned it up initally and when it didn't work, I put everything back in.

  1. Now in a healthy document this setting is the same in each section throughout the document.
  2. Why was Susan treated so unkindly?
  3. You may have to register before you can post: click the register link above to proceed.

If it is section breaks how can I get the macro to work around/with them? What is causing this runtime error. 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 asked 7 months ago viewed 243 times active 7 months ago Blog Stack Overflow Podcast #93 - A Very Spolsky Halloween Special Related 1Word Macro for other tray printing1Printing UTF32 Symbols

Sign Up Now! Sub PlainPrint_B() Dim sec as Section ' ' PlainPrint-B Macro ' Prints to Aficio 2075-B, Plain paper ' ' Get active/default printer. Are you aComputer / IT professional?Join Tek-Tips Forums! What does "M.C." in "M.C.

By the way, you may be experiencing the same error message as the OP, but it is definitely a different problem. 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 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 We have Word 2003 and our printer is an HP Laserjet 4250.

Runtime Error 4608 When Printing

Thanks. –dbasnett Mar 26 at 21:21 @dbasnett did this solve your problem? I found this documentation in Word: Use the DifferentFirstPageHeaderFooter property with the PageSetup object to specify a different first page. Microsoft Visual Basic Runtime Error 4608 If sec.Index = 1 Then .FirstPageTray = 261 .OtherPagesTray = 260 All rights reserved.

We > have Word 2003 and our printer is an HP Laserjet 4250. > > Selection.WholeStory > With ActiveDocument.PageSetup > .FirstPageTray = 262 > .OtherPagesTray = 260 > End With > get redirected here 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 Our printer is an HP Laserjet 4250. Many of the printer drivers do not use numbers from the wdPaperTray enumeration.

Next by Date: Re: ReplaceBookmark Previous by thread: Re: Problem with a user form command button Next by thread: RE: PageSetup + Section Breaks = Value out of range Run-time Error Retrieved from "http://wiki.hotdocs.com/index.php?title=%27Value_out_of_Range%27_Error_When_Inserting_Variable_in_Word_Footer" Category: Problems and Solutions This page was last modified on 2 August 2011, at 14:48. 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 navigate to this website When I try to Debug it, it will continually error out on any of the lines under "With ActiveDocument.PageSetup".

Below is the text of the macro Sub PlainPrint_B() ' ' PlainPrint-B Macro ' Prints to Aficio 2075-B, Plain paper ' ' Get active/default printer. See http://word.mvps.org/faqs/macrosvba/ModifyRecordedMacro.htm -- Salut! _______________________________________ Jean-Guy Marcil - Word MVP TOO Word MVP site: http://www.word.mvps.org Jean-Guy Marcil, Nov 2, 2005 #4 LDMueller Guest Thank your for your response. Click Here to join Tek-Tips and talk with other members!

Already a member?

Now, with a new document, when I run the script, it gives me this error: Run-time error '4608': Value out of range This occurs when the code executes the DifferentFirstPageHeaderFooter property Is there a way to load the ShowConfig before Sitecore finishes initializing? Application.ActivePrinter = strActivePrinter End Sub 0 LVL 38 Overall: Level 38 MS Word 1 Message Active today Author Comment by:Hypercat (Deb)2006-08-31 Thank you GrahamSkan you get the points, The above You'll be able to ask questions about MS Office or chat with the community and help others.

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: Here's Why Members Love Tek-Tips Forums: Talk To Other Members Notification Of Responses To Questions Favorite Forums One Click Access Keyword Search Of All Posts, And More... Esker" mean? my review here 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 Your code ran

subscribe Programmers Heaven C# School Book -Free 338 Page eBook The Programmers Heaven C# School book covers the .NET framework and the C# language. Send… MS Office Outlook MS Word Office / Productivity Creating an MLA Formatted Paper with Citations and a Bibliography Video by: Tony This video walks the viewer through the process of 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. EDIT: The documents are here This is the latest version of the macro, which actually runs, but....

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