Attach template/macro after merge

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - Bookmark truncation help In our department i am in charge of putting together forms. We use a document management system (DMS) that incorporates Word as our database's word processer over the old dinosaur of a processor we used to have. Anywhoo.... we use bookmarks in incorporate certain bits of info from our database into documents (client's first names, last names, case numbers, etc.) The following is what I use to delete leading zeros from a case number bookmark: the bookmark in this example is coded as CASNMI. {=ABS ([CASNMI]) \# "###0" \*MERGEFORMAT} The result of this coding within the document is a number like 44565 instead of 00044565. It cuts off the leading zeros, resulting in a neater looking document. Okay, this leads me to the question that I have now. What coding do I use to get the bookmark for the middle name to truncate it to just the first middle initial. So that instead of inserting the middle name as "Smith", my result would just be "S". No macros please, as they do not translate into the use of our DMS program. Tag: Attach template/macro after merge Tag: 57954
  - 2
    - How do i iterate through picture collection? How do i iterate through picture collection in the Active Doc? I've tried 'Shapes' collection, but it only seems to find some of the pictures, but not all Tag: Attach template/macro after merge Tag: 57952
  - 3
    - Resize Word's window very small? My code opens and closes documents, causing the documents windows to "flash" rapidly. I thought if there was a way to resize these windows after they open to very small squares, I could minimize the "flashing" effects. Can this be done in VBA? Ed Tag: Attach template/macro after merge Tag: 57951
  - 4
    - Inserting web-based images into a Word Document Using VBA In WORD VBA, I can use easily open a web-based html file, using: Documents.Open Filename:="http://www.mysite.com/index.html", ConfirmConversions:=False, format:=wdOpenFormatText However, if I try to insert a we-based IMAGE file, using either of these: Selection.InlineShapes.AddPicture Filename:="http://www.mysite.com/myimage.gif", LinkToFile:=False, SaveWithDocument:=True ActiveDocument.Shapes.AddPicture Filename:=:="http://www.mysite.com/myimage.gif", LinkToFile:=False, SaveWithDocument:=True I get an "Invalid File Name" error. How can I insert a web-based image into a document using VBA? -- Ron Pierce localization: www.lucenaturale.com/tran Tag: Attach template/macro after merge Tag: 57950
  - 5
    - Changing picture layout from vba I am using VB6 to control Word and importing a picture object into Word. When the picture is imported, I cannot move or reposition it without clicking on the Format | Picture menu then selecting the Layout tab and then clicking on the Tight mode (or another mode). After I do this, I can move the object. The problem is that I cannot do this when I start a macro and I do not know how to do this in code. Is there a better way to do this in code? Thanks in advance, WayneM Tag: Attach template/macro after merge Tag: 57948
  - 6
    - Clearing the 'Undo' memory cache in Word to avoid sluggish behavio Hello, I have to work with approximately 1,000 page Word documents (talk about pushing things to the limit). I often have to make numerous find&replace operations (in fact I have them all saved in macros to run consecutively and automatically). The problem is that Word seems to run out of memory and evens warns of insufficient memory. I do not need the 'Undo' feature of Word in these circumstances. How can I turn off 'Undo"? Will that solve my problem? What I'd like to do is include macro code to clear the 'Undo' memory cache after each find&replace operation. Is this possible? Thanks for any and all expert opinions on this! Tag: Attach template/macro after merge Tag: 57947
  - 7
    - Delete Picture from Header?? I had no trouble using VBA to add a bitmap picture to a header with ...Shapes.AddPicture "SomeFile" False, True, 8, 5, 380, 90 But I can't figure out how you use VBA to delete a picture from the header. I've tried this (from Helmut) but it has absolutely no effect. Dim oSct As Section Dim oHdr As HeaderFooter Dim oDcm As Document Dim oShp As Shape Set oDcm = ActiveDocument For Each oSct In oDcm.Sections For Each oHdr In oSct.Headers For Each oShp In oHdr.Shapes oHdr.Range.InlineShapes(1).Delete Next Next Next Next I tried this: ActiveDocument.Sections(1).Headers(wdHeaderFooterFirstPage).Range.ShapeRange (1).Delete but I get an error message 5941 about something not being in its collection How exactly do you use VBA to delete a picture from a header?????????????????? Thanks Jim Tag: Attach template/macro after merge Tag: 57945
  - 8
    - Word "pops up" a message box occassionally..... I'm automating report creation from VB.NET using Word VBA. During this process, I need to embed links into the document at various places. Sometimes, Word pops up a message box as follows: Word is unable to create a link to the object you specified. Please insert the object directly into your file without creating a link. This is all well and good (because sometimes the link *is* invalid!) but I would rather be notified of it in my code than have Word pop up a message box that must be responded to by the user. My report creation process is supposed to go on in the background with Word "invisible", so obviously in this case the user won't be able to respond to the message (err, I don't even want the user to be able to do so!). So my question to you is: Is there any way to prevent Word popping up this message box and having my application handle the error instead? Tag: Attach template/macro after merge Tag: 57944
  - 9
    - instr function with wildcard I'd like to find a three digit number within a string. It would be much (much) better if it's possible to do this using INSTR rather than Find. ex: mystring = "abcdef789gh" anumber = instr(1, mystring , whatever) What should whatever equal to find digits in mystring ? Thank you! Tag: Attach template/macro after merge Tag: 57943
  - 10
    - control PowerPoint with Word From Word, I want to be able to display a dialog box prompting users to pick a PowerPoint file. I want to open the PPT file, save the PPT file as JPGs (all slides in the PPT), then close the PPT file, revert back to Word, and do some more stuff in Word. The PPT file will always be in the folder C:\Work. I'd like to be able to build a folder for the JPG slides that would be C:\Work\name_of_the_PPT_file, so users could easily reference the correct folder if they needed to at some future point. Below is some code that gets me part of the way there, but I can't figure out how to get just the name of the PPT file. I tried using something like this: PathOnly = WordBasic.FilenameInfo$(.Name, 5) ...but that only works if I display a second dialog box and write more coding, all of which seems cumbersome for users, plus I want to keep the coding as streamlined as possible. Anyone have any ideas how I can extract just the filename of the PPT file from the variables I have in the code, or do I need to do a major rewrite? = = = = = = = = = Sub Insert_PPT_pics() Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFilePicker) Dim vrtItem As Variant Dim ppt1 As Variant Dim myFile As String With fd .AllowMultiSelect = False .Filters.Add "PowerPoint files", "*.ppt", 1 .FilterIndex = 1 .InitialFileName = "C:\Work" .InitialView = msoFileDialogViewList If .Show = -1 Then For Each vrtItem In .SelectedItems myFile = vrtItem Next vrtItem End If End With Set fd = Nothing Set ppt1 = CreateObject("PowerPoint.Application") ppt1.Visible = True ppt1.Presentations.Open (myFile) ppt1.Activate ' Here is where I want to save the PPT file as JPGs. ' Need to figure out how to get just the name of ' the PPT file rather than the whole path. ppt1.Quit ' Release object references Set ppt1 = Nothing ' revert to Word Selection.HomeKey Unit:=wdStory ' do some stuff in Word End Sub Tag: Attach template/macro after merge Tag: 57942
  - 11
    - Change color of Selection indicator Hi, Is it possible to change the color of the Selection indicator. Normally, the selection is indicated by an inverse of the underlying text color and background color. (in a simple document, this would be white text on a black background). I was wondering if you can change these colors (eg...if you do a selection, it would show blue text on a green background). Cheers, Jean Tag: Attach template/macro after merge Tag: 57940
  - 12
    - Save As I have created a command button that the users can update their Table of contents using the following code: .TablesOfContents(1).Update. Is there VBA code that I can write that will then open the Save as dialog box so users can save their final document. Thanks Tag: Attach template/macro after merge Tag: 57938
  - 13
    - create hyperlink assigned to word bookmark Hi, I'm having trouble creating a hyperlink to assign to a bookmark in a word doco. Below is the code I'm using. This is giving me a type mismatch. The bookmark is called "hyper". I've tried various other ways with no luck. doc.Hyperlinks.Add Address="http://www.msn.com/", Anchor="This way", SubAddress=doc.Bookmarks("hyper") Any help much appreciated Tag: Attach template/macro after merge Tag: 57931
  - 14
    - Saving as XML Hello, I have a problem. I open a UTF-8 coded XML-File in Word2003 and save it as UTF-8 in a new XML-File. The XML has the UTF-8 tag but the content isn't not UTF-8 coded. For example the german umlauts are still in the output file. On an other PC it works. What can it be? Thanks Werner Tag: Attach template/macro after merge Tag: 57930
  - 15
    - create hyperlink in word Hello, I want to add a hyperlink to a bookmark in a word document and am not having any success. The bookmark is named 'hyper" Below is the relevant code. doc.Hyperlinks.Add Address="http://www.blah.com/", Anchor="Link Name", SubAddress=doc.Bookmarks("hyper") This is returning a type mismatch. Any help much appreciated. Tag: Attach template/macro after merge Tag: 57929
  - 16
    - Question on FileOpen Dialog Word 2000 I have the following code. If Err.Number = 52 Then With Dialogs(wdDialogFileOpen) .Name = "Error.log" .Display End With End if Error 52 is a bad file name or file number. This is part of an error handling routine. Basically, if the path to the error log does not exist, then the user is given the opportunity to specify the path to the error log. The problem is that if the folder selected by the user is empty, the Open button in the dialog box will not work. Is there a way around this? -- Tom State of Montana Department of Justice Help Desk "Making the world a safer place." Tag: Attach template/macro after merge Tag: 57928
  - 17
    - Language settings I commonly use both English and French for Word and I have to go through a lot of work to switch the language from English to French. Is there a way where I can set up Word to have the default language be English, but where I can quickly get to French without having to thumb through the list of languages every time I want to switch? Thank you. Tag: Attach template/macro after merge Tag: 57926
  - 18
    - Dynamically Resize a Word 2003 Document Hi all, I would like to use VBA to create a macro that will resize and relocate a Word 2003 document on the screen when it opens up. The co-ordinates and dimensions of such a document will be specified in the macro (either hard-coded, or relative to the current screen resolution). Ideally, I want to create a new template with this macro embedded, and set to run as soon as the user opens up a document that is based on this template. How can this be done ? thanks, Andrew J Fortune, Melbourne, Australia Tag: Attach template/macro after merge Tag: 57923
  - 19
    - Heeeelp..... exe doesn't start Hi, i wrote one small Prog. and did Setup.exe. but after intall this prog i cann't start it, it peeps and hapands nothing.... Thanks.... Gio Tag: Attach template/macro after merge Tag: 57920
  - 20
    - Special monthly church-events calendar. I'd like a template for a monthly church-events calendar. I can a sample what I mean Tag: Attach template/macro after merge Tag: 57915
  - 21
    - To hide a command button so it doesn't print out Hello, I created a command button to automatically update my table of contents in my word document using the following code: Private Sub CommandButton1_Click() ActiveDocument.TablesOfContents(1).Update End Sub The button is placed at the end of the document. When I go to print the final document the button also prints out so I have an "update TOC" button in my final printed document. Is there a command button property that makes it so the button doesn't print out when you print the document? Tag: Attach template/macro after merge Tag: 57909
  - 22
    - creating rtf document from within Word Hi, all, Is it possible to create an .rtf document from within Word using VBA? Sometimes I open and work on existing rtf documents in Word, but I'm wondering if it's possible to create them from within Word as well. Larry Tag: Attach template/macro after merge Tag: 57904
  - 23
    - Can't run Wizards Tried running "letter Wizard.Wiz" as supplied with Word 2003 and all that would happen is there was a flash - as if it was trying to work, and then back to the blank document, if one loaded, or to not even a blank document if none had been loaded. I have set security to the lowest setting but that did not help -- Frank J Tag: Attach template/macro after merge Tag: 57900
  - 24
    - Open Method fails on Error 5174 I am trying to open a file using a full path name stored in a variant. Using Word 2000 in XP Home Edition. Example code: Dim v3 As Variant v3="C:\ita\reports\SynCrew101JR3-D_12-Oct-2004_13.44.10\tp.1" Documents.Open FileName:=v3 ' The above code yields runtime error 5174 (cannot find file) When I use this code: Documents.Open FileName:="C:\ita\reports\SynCrew101JR3-D_12-Oct-2004_13.44.10\tp.1" the file opens up successfully. I have tried storing the filename in a string variable. The same error occurs. The same behavior occurs when I use the Dir function. I have tried to use very short fullpath names. The same failure occurs. Appreciate any help or comments. Thank you, JMS Tag: Attach template/macro after merge Tag: 57896
  - 25
    - Load Global Template Why am I receiving the message, "The add-in template is not valid" when attempting to load into Word. The template is in Word's startup folder and shows up under Templates and Add-Ins, but will not allow me to check the box to make it active. Thanks! Ermine Tag: Attach template/macro after merge Tag: 57894
- Next
  - 1
    - InsertDatabase in Word 2003 Hi, i want to make a connection to a sql2000 stored procedure from Word to get some orderdetail records based on a orderID. Can someone give me an example or a link Url how to do this in Word 2003 (vba). Greetings, Mark Bakker Tag: Attach template/macro after merge Tag: 57893
  - 2
    - Hyperlink in the same document I am trying to write a Word Macro to convert selected text in 3G specifications into hyperlinks to other places within the same document. However, I believe there is a bug in Word. As a simple example, if I record a macro to add a hyperlink, using the standard record macro functionality, to produce the following macro code: Sub Macro1() ' ' Macro1 Macro ' Macro recorded 2004-10-11 by user1 ' ActiveDocument.Hyperlinks.Add Anchor:=Selection.Range, Address:="", _ SubAddress:="_9.2.1.4_Cause", ScreenTip:="", TextToDisplay:= _ "9.2.1.4 Cause" End Sub then the hyperlink I have created works. But if I exit Word without saving the document, then reopen the document and re-run the macro I had previously created, the new hyperlink it creates doesn't work. This seems like a bug to me, any idee? Tag: Attach template/macro after merge Tag: 57892
  - 3
    - How can I manipulate XML-Attributes over WORD-VBA Hello, I have written a VBA-WORD-Macro to store XML from Word 2003. What I need is to change the value of an attribute over my macro. All what I get is a readonly XMLNode on which the value can't be changed. Have anyone an idea how a workaround could be Tag: Attach template/macro after merge Tag: 57888
  - 4
    - Checking characters in a range is too slow Hi, I want to extract ranges from a paragraph which have the same color. At the moment I solve this problem iterating over all characters in a paragraph and comparing their color. Groups of consecutive characters with the same formatting build a range. The result is a list of these ranges. (eg from character 1 to character 8, the color is red, from character 9 to character 11 the color is white, ...) But as you might know, this is too slow because of the Collection iteration (doing characters(i) for each and every character in the pragraph is way too slow). I think it must be possible to do something with Find and Replace but I am not sure how to start. Thanks, Jean Tag: Attach template/macro after merge Tag: 57883
  - 5
    - Word 2003 - Error 5479 - Bug in vba?? Hi there, (Word 2003 with or without SP1, german version) i have a severe problem with word 2003. I have a complex program, managing small word documents to make manuals etc. It runs with Word 97 to Word XP. But with Word 2003 i have some problems. I reduced the problem to a documents.open - command. To get a small, reproducible test-program , i made the following simple mini-program, which shows the same strange effects: One Main program, just showing a userform: Sub main() UserForm1.Show End Sub The form Userform1 just have one button with this code on the click-event: Private Sub CommandButton1_Click() Dim obj As Object Set obj = Documents.Open(FileName:="F:\bs175.doc") End Sub or Private Sub CommandButton1_Click() Documents.Open FileName:="F:\bs175.doc" End Sub or Private Sub CommandButton1_Click() Dim obj As Word.Document Set obj = Documents.Open(FileName:="F:\bs175.doc") End Sub The file F:\bs175.doc exists. F: is a local path. Thats it. Now the effect: Starting Word and starting the macro by tools/Macros/run results in an error-message: Runtime error 5479 Microsoft Office Word can not close, because a Dialog box is open.... If I open the visual basic editor and run the macro, everything is fine. Even if the Visual Basic Editor have just been opened once in the Word-Session, the error will not appear again in this session. Even if I close the Visual Basic Editor. I am really astonished, that such a simple example could produce the error-message, but its true on my system. It would be very nice, if you could tell me, whether its an effect just on my computer or whether you can reproduce the problem as well. Meanwhile I tested the same on another machine: same effect But the effect only comes, if the macro with the form is in a template, which is in the autostart-directory. (I put it in the normal.dot) Any hints, how to avoid the problem, are welcome. Thanks in advance and sorry for my bad english Ingo Tag: Attach template/macro after merge Tag: 57882
  - 6
    - Bookmark and REF-field problem Dear group, I have a template, which is not protected as a form, because people have to be able to edit parts of the document. I use a createdate field on page one, which needs to be repeated in the header on pages 2 and later. No problem so far, I use the Ref-field for this. Now, some people actually don't want the create-date so they overwrite the createdate field on page one with their own desired date. This destroys the bookmark. As a result, on page one there is the correct date, but on the subsequent pages the ref-field will give an error: bookmark not found. (Of course using a createdate field on page 2 doesn't solve the problem, because the dates on page 1 and 2 will not be the same.) How can I make sure that a bookmark is not deleted, or is there another way to fix this problem? Thanks in advance, Martin Tag: Attach template/macro after merge Tag: 57881
  - 7
    - How do I change the NORMAL.DOT from American A4 to UK A4 in Word I have Office XP Prof but have found that in the NORMAL.DOT template in Word, is preset with American size A4 which is different from UK size A4. How do I change this as it affects the use of my labels facility as the US paper size is smaller than UK and the labels do not print out according to what is on the screen so making most of them unusable. Tag: Attach template/macro after merge Tag: 57879
  - 8
    - Integrate custom Help in Office 2003 Hi , I am implementing ISmartdocument solution using managed code. My questions are: a) How to add a chm to an office 2003 word(integrated with its help contents) b) How to programmatically show up a particular content based on the context node the cursor is in... (PopulateHelpContent is not relevant here since i need to show up chm) I am stuck figuring out solution for this since past 2 days...please let me know if you have any pointers. Appreciate your time.. thanks, Vishnu Tag: Attach template/macro after merge Tag: 57876
  - 9
    - Adding 14 Days onto a Date I have a program that mail merges information in Word in order to create invoices. There is a mail merge field called INVOICEDATE in the word document. I want to create a new field that adds 14 days onto this INVOICEDATE field. I opened the word document and used ALT+F9 to toggle the INVOICEDATE field and it showed the following: { QUOTE InvoiceDate\@ "DD MMMM YY" } Based on another post I put on here I tried to edit this field to be: 1) { FORMAT (DateAdd("d",14,InvoiceDate), "DD MMMM YY")} When I try and create an invoice it comes back with an error message: Error! Bookmark not defined. I have obviously done something wrong???? Tag: Attach template/macro after merge Tag: 57869
  - 10
    - Macro that browses multiple selection Hi all, No question, just a macro that some might find useful... Multiple selections (= selection of non-contiguous stuff) in Word2002/2003 are great. But Word doesn't have too many commands to make them useful (yet). One major gripe I have is that you can't easily browse through the selected items/ranges, looking at them one by one. Say you have selected a dozen words/paragraphs/cells... or more in some book with "Edit > Find > Highlight all items found in...". Or you have selected all occurrences of some particular style or kind of formatting from the "Styles and formatting" pane (... right-click on some style or formatting). Usually, you'd like to check out some or all of the selected ranges, before you copy or delete them, or change the formatting. Now, the only way to check out the selected ranges is to scroll through the whole doc (perhaps 300 pages), and look out for the selections. The macro below shows all selected ranges one by one (with a counter in a MessageBox showing the index -- "Multiple selection 3 of 7" ..., and an option to cancel at any time), and restores the multiple selection afterwards. It's pretty clumsy, mostly because VBA doesn't have much to offer regarding multiple selections. The macro doesn't work for multiple selected (floating) graphics. In tables, it will re-select only the text, even if whole cells were selected originally. Note that you have to change one line (containing "%F" in SendKeys) if you use a non-English version. Hope it may be useful! And hope there aren't serious bugs: Use it on your own risk. If the macro should run amuck, you can stop it with Ctrl+Pause ... And then, you should select all text and uncheck "Format > Font > Shadow". Perhaps, a future version of Word might add "Selection" to "Edit > GoTo" and the browser, so you can use Ctrl+PageDown/Ctrl+PageUp to center the screen on the next/previous selected range? What do you think: What other commands might be useful? Regards, Klaus Sub LoopMultipleSelection() Dim myRanges As New Collection Dim myRange As Range Dim i As Long ' Use Font.Shadow to mark selections: Selection.Font.Shadow = True ' Find all ranges with .Shadow=True: Set myRange = ActiveDocument.Range(0, 0) myRange.Find.ClearFormatting myRange.Find.Font.Shadow = True With myRange.Find .Text = "" .Forward = True .Wrap = wdFindStop .Format = True End With Do While myRange.Find.Execute ' Work-around for table cells: If myRange.start = myRange.End Then Exit Do End If myRanges.Add myRange.Duplicate myRange.Collapse (wdCollapseEnd) Loop ' Undo applying the shadow: ActiveDocument.Undo ' Step through ranges and show them: i = 0 For Each myRange In myRanges i = i + 1 myRange.Select ActiveWindow.ScrollIntoView _ Selection.Range, True If MsgBox("Continue?", _ vbOKCancel, _ "Multiple Selection " & _ Str(i) & " of " & _ Str(myRanges.Count)) _ = vbCancel Then Exit For End If Next myRange For Each myRange In myRanges myRange.Font.Shadow = True Next myRange ' Use EditFind Dialog to ' restore the multiple selection: Selection.HomeKey Unit:=wdStory Selection.Find.ClearFormatting Selection.Find.Font.Shadow = True With Selection.Find .Text = "" .Replacement.Text = "^&" .Forward = True .Wrap = False .Format = True End With Selection.Find.Execute ' Alt+F is the accelerator key for "Find All"; ' change "F" to the appropriate key if you ' don't have an English version (e.g. "h" in German): SendKeys ("{TAB}{+}%F") Dialogs(wdDialogEditFind).Display 1 ' Clean up: Selection.Font.Shadow = False Selection.Find.ClearFormatting Set myRanges = Nothing End Sub Tag: Attach template/macro after merge Tag: 57868
  - 11
    - Delete second page in document I have a Word document that contains a table and a header. I only want the first page, but I have a second page that contains only the header. How do I delete that second page so that I can save just the first page? Thanks for any help you can give me. Virginia Tag: Attach template/macro after merge Tag: 57866
  - 12
    - Count # of occurences of all words in an MS Word document I need a tool which will count the number of occurrences of ALL words in a Microsoft Word document; the output would be something like this: tree 4 grows 3 city 6 ecology 2 the 78 etc .... Anybody know of anything readily available which will do this ? Thanks ....... Tag: Attach template/macro after merge Tag: 57863
  - 13
    - Creating VBA to add 14 days to an existing date I use a program that creates Invoices within Microsoft word. It picks up certain data from the program and merges it into Microsoft Word, such as the date of the invoice. Can anyone help me create VBA that would add 14 days onto the date of the invoice? Regards James Tag: Attach template/macro after merge Tag: 57859
  - 14
    - Word macro, bringing data from Excel with find command, How do I . I am programming a macro in Word and searching for data in Excel to bring into a Word table. Not all data is in the Excel spreadsheet. My macro errors out when Excel doesn't find the seached-for text. How can I catch this error? Tag: Attach template/macro after merge Tag: 57858
  - 15
    - Interacting with Mind Manager Hi I am trying to develop a template to pull data from Mind Manager v5.1.22 Apparently this program uses something called Sax Basic, which looks to be very similar to Visual Basic. I'm wondering if there is anyone who knows something about this program, what type of format it stores information in, and how I can query it with VBA to fit information into my Word template. TIA Tag: Attach template/macro after merge Tag: 57854
  - 16
    - Word 2003 ( Data Visible in Print Preview but doesn't print out) We have program code using OLE automation that creates a Word 97 style document and automatically prints the results. This has worked until we have started to update to Word 2003 on our desktops. Now, a table within the document does not print out but it is contained within the document and is visible when we do a print preview. The Options Compatibility shows as 'Word 97'. If we remove the sub option 'Use Word 2002 table style rules', the print out shows the missing table. How can we programatically set the sub option off? Tag: Attach template/macro after merge Tag: 57852
  - 17
    - Scripting Runtime Help file not opening In a macro using scripting runtime filesystemobject if I highlight a scripting term and press F1 the help window opens but it not populated. Using Word2000 under Windows2000 the file contining the help information VBLR6.CHM is in the path and is in the same place as other .CHM files which open correctly. Does it neg registering and if so how? -- AlanC Tag: Attach template/macro after merge Tag: 57851
  - 18
    - Word spellcheck should suggest the correct spelling next to the c. Comments from the CIO of Milbank Tweed, a large NYC law firm: "A thought as I use Word and in particular the pop-up menu when you right-click on a misspelled word. Depending on whether the word is near the top or bottom of the screen, the menu will appear beneath or above the word/cursor. As the correct word options are always at the top of the menu, there is an inordinate amount of mouse movement required when correcting a word that is near the bottom of the screen vs. one that is near the top. Try it, you'll see what I mean. It would be great if the suggested correct words were always listed beside the cursor with the true menu items either above or below according to the menu direction." Tag: Attach template/macro after merge Tag: 57849
  - 19
    - Combine Word Basic macro with Delete Hidden Text macro This is actually a followup of previous "Problem with MS Word macro" question that was answered successfully. I was wondering how I could combine the Delete Hidden Text macro code that Anne Troy and Helmut Weber submitted with the Word Basic macro that Deletes All Comments in the document, thus attaining one button that "cleans up" the document of both hidden text and comments. Thank You! Ermine Tag: Attach template/macro after merge Tag: 57848
  - 20
    - ActiveX control appears at top of file I confess, I've never bothered to learn much about in-document controls since they seem only to mess things up and userforms are far preferable. So I don't know how to react to this: At my office, a document recently edited has just now acquired a dropdown control at the top of the first page. The dropdown is empty and the VBE shows no code in the file, but nobody knows how it got there. The last person to edit the file definitely doesn't have the background to be using, or even inserting, such an object, and the only other person who's been in the file is me. Another odd thing: It wasn't selectable -- clicking the surface of the control never produced visible handles, black or white. To delete it, we had to remove the first paragraph (which it sat at the far left of). Is this a sign of something dangerous? Virus scans on both machines come up clean. TIA -- Mark Tangard "Life is nothing if you're not obsessed." --John Waters Tag: Attach template/macro after merge Tag: 57847
  - 21
    - Add new row in Table + new set of Form Fields Hi, This is my first messgae on this board, and I guess I'm straight in with a common Q (can't find previous Qs, tho)... I have a table with text form fields in each of the 5 cells in row 2 (row 1 has the 5 headings). Is there a way of assigning an 'on exit' macro to the last cell of the last row that a) checks for TAB being pressed (indicating a new row, as is normal in Word) and then b) adds new text form fields in the new row...ready for the same scenario to happen again (i.e. Potentially press TAB at the end of that row, too)? Hope all this makes sense, and that someone can help me out, too! Thanks, in advance. Tag: Attach template/macro after merge Tag: 57839
  - 22
    - document event handler for document(s) in frameset I am trying to catch a document close event on a document of type wdNewFrameset. What happens is that the template is automatically set to Normal, the document doesn't even occur in the Documents list anymore. No document event handler of the framset document or any of the documents in the frameset is called at any time. Is this a word bug or can I code around that to allow for some custom code once the frameset or any of the frameset documents are about to be closed? thanks in forward! Tag: Attach template/macro after merge Tag: 57838
  - 23
    - Picture controls in a word form (unprotected area) I am trying to create a word form document that can be used to report software bugs in our product. I have created the form to ensure a consitent look and feel. I wanted the user to screen print errors they get to aid in explaining the issue and the only way I could do that was to have an unprotected area in the form which is fine. Now the issue, when I paste the screen print, the picture controls are disabled, I can resize but not crop or use any of the picture controls and the autoshpaes are also disabled. If anyone can help in this I would apprecaite it. Thanks -- Nels Tag: Attach template/macro after merge Tag: 57837
  - 24
    - Table issues Hi I have 2 issues with a table with I dont understand: 1) This 2 commands format all column of my table to "centered", not only the first one. Why is that? WordTable.Columns.Item(1).Select; WordApp.Selection.Range.ParagraphFormat.Alignment(1); 2) This 4 commands does only format cell(1,1) to "centered", not the whole column. WordTable.Columns.Item(1).Select; WordApp.Selection.Range.ParagraphFormat.Alignment(1); WordTable.Columns.Item(2).Select; WordApp.Selection.Range.ParagraphFormat.Alignment(2); Btw: Code may look a bit strange because it runs in an ERP-Module (Excel as Automation Object). Thank you for your help. Tag: Attach template/macro after merge Tag: 57835
  - 25
    - AppActivate Error I have a Word-document which contains a userform. By clicking om commandbuttons in this form the current userform hides and open another one. This works fine! BUT, with the second userform that opens I want the focus to be at the document and not at the userform (this userform is set to modal 0). I am running this application on Office XP and Windows XP, and switch between to different computers with the same OS and Office versions. The problem doesn't occure every time on both computers, but seems to occure whenever it wants to. Therefor it's very difficult to find the solution to the problem. I have tried these commands in the code of the commandbuttons, hiding the first userform and when initializing the second userform: 1. frmTilbakeSkjema.Show 0 AppActivate Application.Caption 2. frmTilbakeSkjema.Show 0 AppActivate ("Microsoft Word") 3. AppActivate Application.Caption 4. AppActivate ("Microsoft Word") Like I said - sometimes it works fine with either of the alternatives, and sometimes not. SO....Please help? :-) -- Mette Tag: Attach template/macro after merge Tag: 57828

Hi all,

I am trying to automate a mail merge process, which has worked okay so
far, but I am finding that when the merge to new document is complete,
I lose the other macros that were in the original template.

I am not allowed to mess with Normal.dot so I can't make my macros
part of that template, which is what the new form letters are based
on.

Is there a way of bringing the macros from the main document template
over to the new merged form letters?

Thanks for any help you can offer.

Zoe

Top

Re: Attach template/macro after merge by Harold

Harold
Fri Oct 15 08:04:45 CDT 2004

Yes you can attach a template programmatically
use this ActiveDocument.AttachedTemplate ="full path and name of template"

You can also move modules from one project to another using the Organizer.
Application.OrganizerCopy "path and template name",ActiveDocument,
"Module1", wdOrganizerObjectProjectItems

--
Harold Kless, MCSD
Support Professional
Microsoft Technical Support for Business Applications
haroldk@microsoft.com

--
This posting is provided "AS IS" with no warranties, and confers no rights.
Use of included script samples are subject to the terms specified at
http://www.microsoft.com/info/cpyright.htm

"Zoe" <harris.zoe@agd.sa.gov.au> wrote in message
news:979ab689.0410141907.7e90ab27@posting.google.com...
> Hi all,
>
> I am trying to automate a mail merge process, which has worked okay so
> far, but I am finding that when the merge to new document is complete,
> I lose the other macros that were in the original template.
>
> I am not allowed to mess with Normal.dot so I can't make my macros
> part of that template, which is what the new form letters are based
> on.
>
> Is there a way of bringing the macros from the main document template
> over to the new merged form letters?
>
> Thanks for any help you can offer.
>
> Zoe

Top