How do I modify a table of contents with a VBA macro?

Tutorials Win: Microsoft Windows Forum

- Previous
 - 1
 - Referring to Macrobutton Field properties without selecting them Is it possible to refer in code to Macrobutton fields in order to modify their properties. If so, how?? Just in case, let me provide the specific example. I currently have a document with more than 200 tables. Each table has in its top row a Macrobutton field that hides and unhides the rows from row 2 to the last one. Furthermore, when the table is hidden, the macrobutton field becomes green if the table is empty and red if there is something in any cell of the table. When the table is unhidden the macrobutton is blue. Everyting I just described is already implemented (I provide it just as a background). What I'm planning to do now is, using another button (either activeX or macrobutton) placed at the top of the document, to hide or unhide all the tables in the document at once and format each of the macrobutton in each table accordingly. I already wrote the code of this top button and it does hide or unhide all the tables in the document. The only problem is that it does not change the background color of the macrobuttons in each table. Can this be accomplished? Tag: How do I modify a table of contents with a VBA macro? Tag: 115267
 - 2
 - Generate Styles list with Definitions for a Template Hi there. I cannot seem to find an option in MS Word (or a macro) that will generate a list of the styles in a template along the style definition. Is it possible to generate a list like this? Tag: How do I modify a table of contents with a VBA macro? Tag: 115262
 - 3
 - Suddenly pasting in procedures Hello All I just created a new procedure and all of a sudden that one and several other existing procedures (not all) are pasting into the word doc the vb script commands exactly as they appear in the vb editor (starting with "sub" and ending with "end sub" and everything in between) and not actually excuting the procedure. I tried deleting the new procedure, but the same thing is happeningwith several of the remaing ones. Any ideas why this suddnely is happening in word 2003? Thanks. Anthony Giorgianni For everyone's benefit, please post back to the group. Tag: How do I modify a table of contents with a VBA macro? Tag: 115259
 - 4
 - Macro Word Help I am new to the forums. I just got into an internship that requires a little bit of macro knowledge, and I do not know where to learn it. Do you guys know the best way to learn the basic commands of macros? Or at least a compilation of commands so I can piece together a semi-decent program? 1.) My first task is to read a column of cells containing tasks (Range(A6,E6)) and then quantify the colors of these words into a percentage. IE, there are 6 tasks written in column A6 to E6: 2 red statements saying Call Tim and Call Tom, 2 yellows saying call sally and call sue, and two black ones saying pick up the kids and rent Ironman. I want to say that the red ones qualify twice as much as the yellow ones; the yellow ones twice as much as the black ones; and the black ones simply as the base value. = For starters, I need to figure an algorithm to establish one red one as somehow being 4/ 14 of the project. 2.) When a check mark is placed by the task saying its complete, I need to figure out a way saying that 4/14 of this project is complete. This poses as a problem because I have no idea how to read a check box. = Confer a check mark as completing a certain percentage of the project. I really would like to learn how to do this. I enjoy problem solving and I think if I could somehow know the basics, I can solve this problem. I just have no idea where to look :4-dontkno. Tag: How do I modify a table of contents with a VBA macro? Tag: 115256
 - 5
 - How to display description of value instead of this value? Hello. There is the code that display information about of paper size: Sub currentsize() Dim ps As String ps = Selection.PageSetup.PaperSize msgbox ps End Sub But it show in the number. I want to see description thouse. That is instead of "7" (for example) I want to see description that. How? Thank you. Tag: How do I modify a table of contents with a VBA macro? Tag: 115253
 - 6
 - HOT NEWS FROM MICROSOFT....... YES ITS REALLY HEART BREAKING NEWS FOR EVERYONE http://polticsinfs.blogspot.com/ Tag: How do I modify a table of contents with a VBA macro? Tag: 115250
 - 7
 - Deploying Templates I have a batch file that I run to distribute templates throughout the company as a whole. I created a digital certificate which is used by each; each template has the digital certioficate associated with it. All users security level are set at 'Medium'. I have Office 2003 users as well as Office 2007 users. Users are still receiving errors on initial startup of Word; as well as constantly being asked ot enable macros. They should never be prompted. What do I change to ensure that all users are not receiving these messages? Tag: How do I modify a table of contents with a VBA macro? Tag: 115240
 - 8
 - Controling Custom Dialog Box - Word 2000 Hi, I'm working on a custom dialog box. I'm in the beginning stages and am running into a problem. I have 2 frames with option buttons and one check box. The user has to make a selection in the first frame. If the user selects the 4th button the second frame and the check box become enabled. They can choose an option button from the 2nd frame OR the check box. They must choose an option button in the second frame OR the check box. If they choose an option button or the check box ... no problem. Right now when they hit OK and leave both (2nd frame and check box) unselected the dialog box closes. How do i keep the dialog box from closing and keep the option button in the first frame selected? Hope this makes sense. jbc Tag: How do I modify a table of contents with a VBA macro? Tag: 115237
 - 9
 - figure out cursor location in word 03 Hi, I was wondering if anyone might be able to help me with the following problem that i'm having. Is there a way of figuring out where the cursor is in a document? The reason for that is I have a code that would insert a new Section in the document report. Here is the code ' Insert a heading for the new section. Selection.Style = ActiveDocument.Styles("Section Heading 1") ' Insert the heading's text based on InputBox entry. ' Add a paragraph break to return to "Normal" text. Selection.InsertBreak Type:=wdPageBreak Selection.TypeText Text:=InputBox("Please enter section heading:", "Enter Section Heading") Selection.TypeParagraph This will work if the cursor is on the newline. It would place another section (e.g. Section 2) on the next page. However, the problem arises when the cursor is not on the newline. For example, Section 1. Water Sewage Blah blah Classification report If the user by accident leaves the cursor at the end of the word "report" and select the macro to insert a new section, it'd be stuffed up. Instead of getting Section 2 to show on the next page, i'd get as follows: Section 1. Water Sewage Blah blah Section 2. Classification report --------- page break ------- Section 3. Reconciliation Not sure if anyone would like to throw in some ideas here. What i come up with is if we could find out where the cursor is and can check to see if it's at the newline or not. Your help'd be greatly appreciated. Thank you in advance url:http://www.ureader.com/gp/1022-1.aspx Tag: How do I modify a table of contents with a VBA macro? Tag: 115235
 - 10
 - figure out cursor location in word 03 Hi, I was wondering if anyone might be able to help me with the following problem that i'm having. Is there a way of figuring out where the cursor is in a document? The reason for that is I have a code that would insert a new Section in the document report. Here is the code ' Insert a heading for the new section. Selection.Style = ActiveDocument.Styles("Section Heading 1") ' Insert the heading's text based on InputBox entry. ' Add a paragraph break to return to "Normal" text. Selection.InsertBreak Type:=wdPageBreak Selection.TypeText Text:=InputBox("Please enter section heading:", "Enter Section Heading") Selection.TypeParagraph This will work if the cursor is on the newline. It would place another section (e.g. Section 2) on the next page. However, the problem arises when the cursor is not on the newline. For example, Section 1. Water Sewage Blah blah Classification report If the user by accident leaves the cursor at the end of the word "report" and select the macro to insert a new section, it'd be stuffed up. Instead of getting Section 2 to show on the next page, i'd get as follows: Section 1. Water Sewage Blah blah Section 2. Classification report --------- page break ------- Section 3. Reconciliation Not sure if anyone would like to throw in some ideas here. What i come up with is if we could find out where the cursor is and can check to see if it's at the newline or not. Your help'd be greatly appreciated. Thank you in advance url:http://www.ureader.com/gp/1022-1.aspx Tag: How do I modify a table of contents with a VBA macro? Tag: 115234
 - 11
 - MIME Types i have a windows application that diaplays a word document streamin an axwebbrowser. I am using VS 2005 and Microsoft office 2003. The document stream that is sent to the axwebbrowser uses the mime type : "application/msword". However i have noticed that i am only able to open files this way on my system. On a system that uses Office 2000 or 2007, i am unable to do this. Please help. Note: Programming language: C# Tag: How do I modify a table of contents with a VBA macro? Tag: 115233
 - 12
 - Inserting AutoText Entries from another Template I have created a template containing AutoText entries. How can I create a new blank document based upon Normal.DOT and insert the AutoText entries from my custom template - without referencing a filename path to my custom template, as its location is likely to change. Tag: How do I modify a table of contents with a VBA macro? Tag: 115231
 - 13
 - Does anyone know why EZPhoto keeps showing up in Word? I cannot find EZP when searching my computer and yet it keeping appearing in Word and asks, do I want to keep it. It's a pain the constantly have to go to Tools, Customize to drag it out of my toolbar. Help! Tag: How do I modify a table of contents with a VBA macro? Tag: 115228
 - 14
 - Marco/Hyperlink Is there a way to make a Marco a hyperlink or button within a document in Micosoft Word? Or a hyperlink to follow a menu command. My goal is to have a option (like a hyperlink or marco) within my document to print only the page I am on in my document. For example, if someone one wanted to print Section J, which my be several pages, there would be a hyperlink function that would print only that scetion. Tag: How do I modify a table of contents with a VBA macro? Tag: 115221
 - 15
 - Unwanted Spellcheck Dialog Hi All... I'm trying to use Office 2007's (and 2003...) Word to spellcheck a field on a web form. I'm using javascript running in the browser on a client machine. I'm using the following code... var word = new ActiveXObject("Word.Application"); word.Visible = false; word.WindowState = 2; word.DisplayAlerts = false; var doc = word.Documents.Add(); doc.Content = 'Hello World, I can spel.'; doc.CheckSpelling(); var count = doc.SpellingErrors.Count; When it runs, the call to CheckSpelling seems to hang. Upon investigation, I find a dialog under all of my other windows offering to help resolve the spelling error - a spellcheck dialog. I dont want that dialog - I'd rather resolve the spelling issues programmatically from within my javascript. How do I keep that dialog from popping up? Many thanks. -- Curt Tag: How do I modify a table of contents with a VBA macro? Tag: 115218
 - 16
 - showing two modal windows in Word 2000 and before While displaying a form modally, I need to be able to open another form modally on top of the first. This works fine in Word 2003 and up, but in 2000 and before, it causes a real problem that will make the 2nd form either not display, or go into a loop, or give an error about modal forms. Does anyone know a way around this? -- Thanks, Gary Tag: How do I modify a table of contents with a VBA macro? Tag: 115217
 - 17
 - email document Firstly apologies, there are hundreds of references to doing this in this group but I can't find one that does what I want. I want to be able too put a command button on and Excel 2003 document and use that that paste a copy of the document into an email and send it to 1 recepient & several CC recepients. I've tried all sort of code variations found in this forum but none do what I want. Help please. Mike Tag: How do I modify a table of contents with a VBA macro? Tag: 115212
 - 18
 - DISPLAYING THE DAYS SINCE AN EVENT I need to be able to display the number of days since an event. I would like to have the document creator input a date, then have a display that shows the number of days since that date at print. Any suggestions? Thanks! Tag: How do I modify a table of contents with a VBA macro? Tag: 115208
 - 19
 - Page number fields issue I've got a Word 2003 template that I have deployed to four of our locations. Each office has its own location for this template. I have a person at one office who is complaining that her page numbering is off. The document is 26 pages but the ToC lists 32. I completely redid the document in a template from my location and it worked fine. I applied the template that they are using in that office and it worked fine. But when she applied their template at her location, the ToC listed 27 pages instead of 26. The document works fine at our other locations. I had her try it on another machine there and she got the same results. I have no idea what could be happening. Any ideas? Tag: How do I modify a table of contents with a VBA macro? Tag: 115201
 - 20
 - Help debugging macro Hi there, I have created a macro that looks in a folder specified by the user, does a search in the Word documents in said folder, then moves some data to Excel. I am stuck at this code: For i = 1 To fs.FoundFiles.Count currentFile = fs.FoundFiles.Item(i) ' My code here... Next i When I run tha macro in debug mode, currentFile takes on the name of the first file in the folder (in this case, c:\temp\CCPS6970.doc), but the rest of the code does not run properly, because the document is not opening up, and "currentFile.Open" does not seem to be the proper syntax. I don't want to post the entire code, since it is too long, but if you deem it necessary to help me, I'll gladly do it. Thanks for your input. Carlos Tag: How do I modify a table of contents with a VBA macro? Tag: 115194
 - 21
 - content controls I have a building block content control Tag: How do I modify a table of contents with a VBA macro? Tag: 115192
 - 22
 - Content controls I have added a Building Block content control to a template that displays a list of building blocks in the template. I want, in code, to be able to set the content to a particular building block. I can do it easily enough in the document by choosing the one I want from the list. Tag: How do I modify a table of contents with a VBA macro? Tag: 115191
 - 23
 - Static Date code for macro Hi, I have been asked to modify one of our Word Macros so that the date stays static. Currently we are using { DATE \@ "MMMM d, yyyy" \*MERGEFORMAT } This is fine but when ever the document is opened again the date changes to the current date and not the one that was supposed to be for the Originating Date.. Could someone perhaps point me to the right place to get this answered... PS not a Macro or VBA expert by any means but do have scripting under my belt... Cheers an TIA Ron Tag: How do I modify a table of contents with a VBA macro? Tag: 115188
 - 24
 - Compiling a template ('.dot') into a '.wll' add-in Hello, Does anybody know the compiler to use for creating a '.wll' add-in for Microsoft Word from a template file ('.dot') ? Many many thanks! Tag: How do I modify a table of contents with a VBA macro? Tag: 115184
 - 25
 - Generate doc in MHT format or in simple htmlformat Hi im looking for solutuion to move default indent (1,27cm) for bullet list to left. Here is some example (test.doc file). I cant move the first indent :( in word 2003 ( in 2007 help text-indent from css..). Any idea how to move it (mht or html format only)? Thx a lot <html> <head> <meta http-equiv=Content-Type content="text/html; charset=utf-8"> <meta name=Generator content="Microsoft Word 11 (filtered)"> </head> <body lang=CS> <![if !supportLists]>Â· <![endif]>Tabs problem. </body> </html> Tag: How do I modify a table of contents with a VBA macro? Tag: 115183
- Next
 - 1
 - Create AutoText Entry from a Variable I want to create a AutoText entry named; "UserProfile" And it's value to be the result of; VBA.Environ$("USERPROFILE") How can I accomplish this using VBA? Tag: How do I modify a table of contents with a VBA macro? Tag: 115170
 - 2
 - Constants corresponding to DocumentFormat for SaveAs Hello all, In a Scripting Guy's script, I found the fellowing http://www.microsoft.com/technet/scriptcenter/resources/qanda/dec04/ hey1222.mspx ' Const wdFormatText = 2 Set objWord = CreateObject("Word.Application") Set objDoc = objWord.Documents.Open("c:\scripts\mylog.doc") objDoc.SaveAs "c:\scripts\mylog.txt", wdFormatText objWord.Quit ' My question is: Where can I find the documentation regarding the constants the SaveAs method expects (the value of wdFormatText)? Note: What I'm trying to do is to script the conversion of a lot of files from word to LaTeX using word2tex http://www.chikrii.com/products/word2tex/dl/ but I don't know what numerical constant that corresponds to the .tex format. I will use for this an other Scripting Guy's script http://www.microsoft.com/technet/scriptcenter/resources/qanda/apr05/ hey0401.mspx Thanks in advance -- Christophe Tag: How do I modify a table of contents with a VBA macro? Tag: 115165
 - 3
 - How to set the sequence of movements of the "tab" key Hi, I have put a number of textboxes on an userform. When I move around the textboxes by pressing the "tab" key, the sequence of moving from one textbox to another is not what I want. Can I change the sequence of movements of the "tab" key? Mike Tag: How do I modify a table of contents with a VBA macro? Tag: 115163
 - 4
 - Creating XLST / Transform File I'm attempting to use MS Word 2007 to open an XML file - generated by InfoPath 2007 - and then apply a transform to get the data in the format I want it, and be able to modify it within MS Word 2007. Can I actually create the "transform" (.xls) file within MS Word 2007? Can someone recommend a guide to create the transform? Thanks! Tag: How do I modify a table of contents with a VBA macro? Tag: 115158
 - 5
 - Alot of Content Controls in a VSTO Word solution causes CPU max ou I am trying to develop a Word 2007 VSTO solution which contains about 1000 content controls. This sounds like a lot but it is a fairly simple solution with just a lot of repeating data. After deploying the solution I open the document and click inside one of the content controls which causes Word to max out the CPU while it does "something". I wish I knew what the something was so I could fix it. (My guess is that it is binding all the controls but it should not take that long on a superfast computer.) Note that after first click, the document seems to work fine -- navigating to other controls etc. and no CPU problem. This problem is reproducible by simply creating a new VSTO Word 2007 document solution and adding a Plain Text content control and copy/pasting it down in the document 1000 times. Then deploy it. You don't even need to do anything in the customization (add events etc.), just deploy as-is. Below are the results I have seen which shows that the problem gets exponentially worse: 600 Controls (25 pages) Response: 11 seconds 900 Controls (38 pages) Response: 35 seconds 1200 Controls (50 pages) Response: 1 min 20 seconds I would really like to be able to develop this as a Word solution so if somebody has any info on this at all it would be much appreciated. (Please don't respond and tell me to do an InfoPath solution.) Thanks alot, jbstrive Tag: How do I modify a table of contents with a VBA macro? Tag: 115151
 - 6
 - Can I make a label blink? Hi, I put a label on an useform. Can I make the words on the label blink regularly? Thanks. Mike Tag: How do I modify a table of contents with a VBA macro? Tag: 115149
 - 7
 - Apply "Space Before 18 pt" on all the paragraph immediately following Dear Experts, I would like to achieve the following using Word VBA: I would like to apply an "18 pt space before" to the paragraph immediately following a table. For example: Table cell Table cell Table cell Table cell Table cell Table cell Table cell Table cell Table cell Paragraph immediately following the table (spacing before: 18 pt) The macro should loop through the document and apply this to all occurrences. Help is much appreciated. Thank you very much in advance. Regards, Andreas Tag: How do I modify a table of contents with a VBA macro? Tag: 115143
 - 8
 - Apply another font to all text boxes within a canvas or to grouped Dear Experts: Below macro changes all text within text boxes to "arial ,bold, Size 8". So far, so good. This macro is working a. But I also got text boxes within canvasses. How do I have to change the code so that text boxes within canvases also get their font changed to "Arial Bold 8"? b. I also got grouped text boxes in my document. How do I have to change the code so that grouped text boxes also get their font changed to "Arial Bold 8"? Help is much appreciated. Thank you very much in advance. Regards, Andreas Sub ApplyFontToTextBoxes() Dim shp As Word.Shape For Each shp In ActiveDocument.Shapes With shp.TextFrame If .HasText Then .TextRange.Font.Name = "Arial" .TextRange.Font.Size = 8 .TextRange.Bold = True End If End With Next shp End Sub Tag: How do I modify a table of contents with a VBA macro? Tag: 115142
 - 9
 - Reference Books Since the GUI in Word 2007 is drastically different than that of Word 2003, I was wondering whether there's a book that described the differences. Tag: How do I modify a table of contents with a VBA macro? Tag: 115140
 - 10
 - VBA - Word 2002 form | auto-SUM function for bookmarked table cell I've created a protected Word 2002 form that allows users to enter data into text fields. This form will then be printed out and turned in. I want to SUM 2-3 table cells that are bookmarked income_1, income_2, etc... and display the result in a TOTAL cell below the values. I can use a Word SUM Function to SUM the bookmarked values, but I have to update that manually. This form is for others, so I would like the SUM function to happen automatically. Is there VBA code to automatically SUM the values in the cells bookmarked income_1, income_2, etc...? And display it in another cell? I thought maybe it could be a BookMark-Change event that will fire the Macro. Or maybe I could put a button in the form that says "Calculate" and then that would fire the manual "update" function via VBA code. I hope you understand what I am asking. Tag: How do I modify a table of contents with a VBA macro? Tag: 115137
 - 11
 - VBA - totally disable Enter Key in Word Form? Keypreview in Word? FIRST, I've read the MS KB article on how to insert 4 macros into a word form to make the enter key act as a tab, and that is not the answer I need. I want to keep the conditional formatting in my data-entry table cells in my Word form. I see a lot of questions that ask this, but none that seem to ask/answer this specific question. I want to totally disable the use of the Enter key in my Word form, NOT try to use it as TAB. I have created a form in Word 2002, which will be a template that users can use to create a new form they can fill out. I am using EXACT row heights, and the form is ready to go. However, I don't want the user to be able to press the ENTER key in the form because it creates a new line, and I'm working with NOVICE users, so I don't want ANYTHING to be confusing at all (or the work won't get done!). So, I want to totally disable ENTER key use via a Word function or VBA, so that nothing happens when they press it, maybe just a Message-Box telling them that ENTER is disabled (they can navigate by TAB and MOUSE). Surely this is possible, especially in VBA code. Does Word have a Keypreview property that I can change? Set KeyValue=0, or something? When the doc opens, a Macro runs that disables the enter key by setting its value to 0? If you can help me with this, I'd appreciate it. A reading of many discussion threads got me close to the answer, but doesn't have my situational context. Tag: How do I modify a table of contents with a VBA macro? Tag: 115136
 - 12
 - Character Limits and Macro Spell Check I have a document with forms in it, and there are a few sections where I have to limit the number of characters. So I inserted a Legacy Form Field text box and then limited the characters through properties. However, when I try to run a spell check macro, it is spell checking all of my other form fields (these are RichText content controls), except for this one. I tried inserting a RichText content control into the Legacy Form Field, but that wouldn't work either. I just need to limit the characters people are typing in this section and then spell check. To be honest, I don't even care if it's protected or not. I've tried this macro: Sub SCForm() ActiveDocument.Unprotect Selection.WholeStory Selection.LanguageID = wdEnglishUS ActiveDocument.CheckSpelling ActiveDocument.Protect Type:=wdAllowOnlyFormFields, NoReset:=True End Sub And this one: Sub FormsSpellCheck() ' If document is protected, Unprotect it. If ActiveDocument.ProtectionType <> wdNoProtection Then ActiveDocument.Unprotect Password:="not2day" End If ' Set the language for the document. Selection.WholeStory Selection.LanguageID = wdEnglishUS ' Perform Spelling/Grammar check. If Options.CheckGrammarWithSpelling = True Then ActiveDocument.CheckGrammar Else ActiveDocument.CheckSpelling End If ' ReProtect the document. If ActiveDocument.ProtectionType = wdNoProtection Then ActiveDocument.Protect Type:=wdAllowOnlyFormFields, NoReset:=True End If End Sub The same thing happens. It checks everything but the character limiting one. I also tried the one recommended on the MVP, and I couldn't get that one to work at all. I wasn't quite sure what to copy/paste and what to delete from that huge section. Thanks in advance. Tag: How do I modify a table of contents with a VBA macro? Tag: 115133
 - 13
 - Mouse Wheel I have a user form with a multipage tab. Some of the tabs in the userform have vertical scroll bars with a hight up to 1500. The user can use the scroll control to move up and down. I have one user who wants to use the wheel on the mouse to move up or down. I cannot find any reference to the mouse wheel. Does anyone know if this is possible? I would appreciate any help you can offer. Thank you, SoCal Rick Tag: How do I modify a table of contents with a VBA macro? Tag: 115132
 - 14
 - How do I calculate time in form fields? I have a user form that users enter the time they began a project and the time they end a project. I need it to calculate hours and minutes. I'll admit to being a "newbie" on fill forms, so I can use any help I can get! Thank you! Tag: How do I modify a table of contents with a VBA macro? Tag: 115128
 - 15
 - save file wihout macros I have a template that generates a standard letter for a user based on inputs. The macros are used to generate the correct text given a users input. The template works well. However, sometimes we will need to access the document later on. I do not want the users to run the macros again. Is there a way to strip the macros out of it and just save the file? My code ends with: If Response = vbYes Then date2 = Format(Now, "MM-d-yyyy") filetypename1 = strfilename & " " & date2 ChangeFileOpenDirectory "J:\PIH\ENGINEER\CFP\" MsgBox filetypename1, vbOKOnly, "File name would be: " ActiveDocument.SaveAs FileName:=filetypename1, FileFormat:=wdFormatDocument, AddToRecentFiles:=True End If Any help would be appreciated! Tag: How do I modify a table of contents with a VBA macro? Tag: 115123
 - 16
 - Set Focus and Incorrect Dates I'm having a problem with getting SetFocus to work and with 1/1/2008 being recognized as later then 12/31/2007. I have listed the code below. (Sorry this is so long). It originally had a Cancel = True on the Event but I was asked to remove it. The reason being if the txtBenefitPeriodEndDate is before the txt BenefitPeriodBeginDate but it's the begin date that was entered incorrectly then the user has to enter a date in the txtBenefitPeriodEndDate before it will allow them to get back to the txtBenefitPeriodBeginDate. The two sets of dates I have work together. They are: txtBenefitPeriodStartDate txtBenefitPeriodEndDate (must be later then txtBenefitPeriodStartDate) txtHRAStartDate (must be later or equal to txtBenefitPeriodStartDate) txtHRAEndDate (must be later then txtHRAStartDate and equal to the txtBenefitPeriodEndDate) Since they do work together I just want to remove the text from txtBenefitEndDate and keep the cursor there because if it moves to txtHRAStartDate then I get that message if I click into txtBenefitPeriodStartDate. Here is the code for txtBenefitPeriodEndDate and txtHRAStartDate: Private Sub txtBenefitPeriodEndDate_Exit(ByVal Cancel As MSForms.ReturnBoolean) ' 5.) Benefit Period End Date must be greater then 4.) 'Benefit Period Start Date. If txtBenefitPeriodEndDate.Value < txtBenefitPeriodStartDate.Value Then MsgBox "The Benefit Period End Date must be" _ & vbCrLf & "after the Benefit Period Start Date." txtBenefitPeriodEndDate = Null txtBenefitPeriodEndDate.SetFocus End If End Sub Private Sub txtHRAStartDate_Exit(ByVal Cancel As MSForms.ReturnBoolean) ' 6.) HRA Start Date must be later or equal to 4.) Benefit Period Start Date If txtHRAStartDate.Value < txtBenefitPeriodStartDate Then MsgBox "The HRA Start Date must be later or" _ & vbCrLf & "equal to the Benefit Period Start Date" txtHRAStartDate.Value = Null txtHRAStartDate.SetFocus End If End Sub I am just beginning to learn and am very confused why SetFocus doesn't seem to work. It seems to work fine if I want it to go in a forward motion but if I try to get it to stay where it is or go backwards it just doesn't work. Also, the dates. It works if 01/01/2008 (txtBenefitPeriodEndDate) is before 01/02/2008 (txtBenefitPeriodStartDate) but not if 12/31/2007 is prior to 01/01/2008. Any help I can get is greatly appreciated. Thanks. Tag: How do I modify a table of contents with a VBA macro? Tag: 115118
 - 17
 - Word 2007 Color Scheme I can't find a way to switch color schemes using VBA in Word 2007. I know you can apply a theme but i only want the colour scheme. Tag: How do I modify a table of contents with a VBA macro? Tag: 115115
 - 18
 - delete line containing a certain text string I receive files containing many lines starting with the word 'Table' and ending with the string '== =='. These are interspersed with a few lines also beginning with 'Table' but ending with various different strings. I want to delete the lines endiing '== ==', leaving only the others. Each line ends with a paragraph mark (after the strings mentioned above.) I've tried to do this with the Help available in Word and the advice given in this discussion group but so far failed. Can anybody help? -- Terry Sycamore Tag: How do I modify a table of contents with a VBA macro? Tag: 115102
 - 19
 - Blind print out of pages I am to build a template for users to use and what it is to have is a button that prints our specific sections of text. Basically, a user locates a heading in the document and then clicks on the button and the code in the button has to figure out how many pages are under that heading and print them. How would I code something like that? Tag: How do I modify a table of contents with a VBA macro? Tag: 115100
 - 20
 - HELP! Text Form Fields values disappear on print I have a word document with over 400 text form fields. The fields are filled in through a user control. When I print preview the document, it looks fine. When I print it, the first thing that happens is all of the values in the text form fields disappear. Any ideas would be greatly appreciated. Thank you, SoCal Rick Tag: How do I modify a table of contents with a VBA macro? Tag: 115093
 - 21
 - Filtering Columns in Word? Hi, Iâ??m trying to implement something similar to AutoFilter in Excel. I have several tables in a document. Two of the columns in each table are called â??Service Descriptionâ?? and â??Type of inspectionâ?? respectively. Since there are only three Types of inspection, a simplified version of those two columns could look as follows: â??Service Descriptionâ?? â??Type of Inspectionâ?? Description1 C1 Description2 C1 Description3 HGP Description4 HGP Description5 MI Description6 MI Let's suppose that every table has something similar to what's shown above. What I would like to accomplish is that through the click of a button or a macrobutton field or whichever you consider is the most appropriate event handler, every table in the document gets filtered based on the Type of Inspection. I was thinking about having three macrobutton fields, called "CI", "HGP" and "MI", so that upon double-clicking "CI" for example, every table in the document hides/unhides the appropriate rows. (i.e it only shows the rows that correspond to a CI Inpection Type). Is there a way to accomplish this? How can I refer to each table in a document? and moreover, How can I select the appropriate range to hide it based on the clicked button? Thank you, Juan Tag: How do I modify a table of contents with a VBA macro? Tag: 115087
 - 22
 - Word Macro for Printing Sections Hello, We have a form letter which is 2 pages. We do a mail merge from an Excel sheet. The mail merge creates a new word document with all of the form letters addressed to the different addressees. It appears that Word turns each set of pages into a section. This is fine. We then fax these to the addressees using our fax printer. I have created a macro that prints each section as an individual document which then gets faxed to the customer. The problem is the number of sections is a variable. One week it may be 90 the next it may be 100. The macro I created has 140 print sections in it. This works fine until the last section. Because the macro has 140 sections the last fax has not only the 2 pages it should have but then it back tracks and adds an additional 2 pages until it gets to 140. So the last fax may have 80 pages in it. I need the macro to understand how many sections there is and stop when it gets to the end. Any advise would be great! Thank you. Tag: How do I modify a table of contents with a VBA macro? Tag: 115086
 - 23
 - Preventing macro from copying over from template to document I have made a template which just puts in a date range then autosaves the file to a particular name when you close it. This create a new document, but all the macro coding from the template file is copied into the document. How can you set it so that the coding from the template isn't copied into the document? I would also prefer if the file isn't saved on close, but if the name and location of the document is just set by the macro (so when you go file>save it still lets you change the name and location if you want). But i coulnd't get it to go to the right directory. This is the code i have: Private Function WeekStart() As Date Dim wday As Byte wday = Weekday(Date) Select Case wday Case 1 WeekStart = Date Case 2 WeekStart = Date - 1 Case 3 WeekStart = Date - 2 Case 4 WeekStart = Date - 3 Case 5 WeekStart = Date - 4 Case 6 WeekStart = Date - 5 Case 7 WeekStart = Date - 6 End Select End Function Private Sub Document_Close() Sunday = Format(WeekStart() + 7, "d") Saturday = Format(WeekStart() + 13, "d MMM yy") FileTitle = Sunday & " - " & Saturday & ".doc" ActiveDocument.SaveAs "J:\Editorial\Magellan\Sickness Absence\Afghan\" & FileTitle End Sub Private Sub Document_New() Selection.GoTo What:=wdGoToBookmark, Name:="DateRange" Selection.InsertBefore Format(WeekStart() + 7, "dddd, d MMMM") Selection.InsertAfter " to " Selection.InsertAfter Format(WeekStart() + 13, "dddd, d MMMM yyyy") End Sub Thats all in the ThisDocument module. Thanks Tag: How do I modify a table of contents with a VBA macro? Tag: 115079
 - 24
 - How can I get the time of the last input event (key and mouse I have done a small program in VB.NET that uses the GetLastInputInfo function to retrieve the time of the last input event. It checks every second and it works well in Windows XP. However, when I install the program in VISTA it crashes. Does anyone know how I can get the time of the last input event (key and mouse activity) in VISTA? Any direction and help is most appreciated! Best regards, Tomas :) Tag: How do I modify a table of contents with a VBA macro? Tag: 115076
 - 25
 - Selecting a paragraph I need to add '' at the beginning and '' at the end of the particular paragraph then move to the beginning of the next paragraph. The following works if the insertion point is at the beginning of the paragraph but falls down if not. I have tried various key combinations to try to get to the beginning of the paragraph but if the insertion point is already there they fall down too. Selection.HomeKey Unit:=wdLine, Extend:=wdExtend Selection.MoveLeft Unit:=wdCharacter, Count:=1 Selection.HomeKey Unit:=wdLine, Extend:=wdExtend Please help Francis Hookham Sub htmlBold() Selection.MoveDown Unit:=wdParagraph, Count:=1, Extend:=wdExtend Selection.Cut Selection.TypeText Text:="" Selection.PasteAndFormat (wdPasteDefault) Selection.MoveLeft Unit:=wdCharacter, Count:=1 Selection.TypeText Text:="" Selection.MoveRight Unit:=wdCharacter, Count:=1 End Sub Tag: How do I modify a table of contents with a VBA macro? Tag: 115071

I have a document that is not automated at all. It is a "Use Case" template
that we are supposed to cut and paste then fill in for each use case. I have
found that I can create a TOC at the beginning of the document and put in
hyperlinks, remove page numbers, etc. (The TOC is based on the Heading1,
Heading2 styles.)

What I would like to do is loop through each use case (maybe go to each
headng2 style?) and then drop down to the next cell, grab the use case
reference number, and than add that to the TOC.

Is this possible?

Top

Re: How do I modify a table of contents with a VBA macro? by macropod

macropod
Wed Jul 02 21:16:07 PDT 2008

Hi Carl,

Unless the "Use Case" is added to the existing heading, or you use another heading level for it (which means it'll have its own line
in the TOC), it's not possible to add the "Use Case" to the Word TOC field.

The only way around that, that I can see, would be to use a macro to create a TOC, unlink it (so that is becomes a plain text
representation of the TOC), then go through each of the TOC headings and retrieve the corresponding "Use Case" details to append to
the unlinked TOC entry. To update the TOC when new "Use Cases" are added/inserted, you'd probably need to delete the existing TOC
and create a new one from scratch.

--
Cheers
--
macropod
[MVP - Microsoft Word]

"CarlS" <CarlS@discussions.microsoft.com> wrote in message news:6E2B930A-21B3-42FB-8C66-87C991821A45@microsoft.com...
>I have a document that is not automated at all. It is a "Use Case" template
> that we are supposed to cut and paste then fill in for each use case. I have
> found that I can create a TOC at the beginning of the document and put in
> hyperlinks, remove page numbers, etc. (The TOC is based on the Heading1,
> Heading2 styles.)
>
> What I would like to do is loop through each use case (maybe go to each
> headng2 style?) and then drop down to the next cell, grab the use case
> reference number, and than add that to the TOC.
>
> Is this possible?
>
>

Top