Specify Criteria for Mail Merge Recipients

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - Catching the New Page event in VBA I am developing an MS Word (xp) template for a corporate letterhead that will automatically insert the reference number (already stored in a variable from the first page) into the header of the second (and subsequent) pages. I am aware that there is no "new page" event in Word that can be caught. The solution I am working on involves checking the 'ActiveDocument.BuiltInDocumentProperties("number of pages")' property and running the code as soon as the page number has incremented. Unfortunately, I cannot find a way of checking this value each time the user types a new character. Here is the code I am using at this time : Option Explicit Private WithEvents wdApp As Word.Application Dim page1 As Integer Dim page2 As Integer 'This line is executed during the loading of the document page1 = ActiveDocument.BuiltInDocumentProperties("number of pages") Private Sub wdApp_WindowSelectionChange(ByVal Sel As Selection) page2 = ActiveDocument.BuiltInDocumentProperties("number of pages") If page2 > page1 Then MsgBox "Now on page " & Format(page2) 'Do the necessary operation here... . . . End If End Sub Unfortunately, the above sub is only works when I click with the mouse anywhere in the document. I tried other subs from the same set and I thought that 'wdApp_DocumentChange()' would be the one to use, but this dosen't work either. Can anyone give me a pointer as to how I can trap the 'new character event' (if there is one) and to check if the page number has changed ? Any help will be greatly appreciated ! Many thanks, -- Lars Tag: Specify Criteria for Mail Merge Recipients Tag: 115694
  - 2
    - Extracing info from one document while in another If I am in a form document and entering data in formfields, is it possible to extract info from a saved document to populate a few of the formfields? I know the file path of the saved document. Ideas.... Thanks, Bryan Tag: Specify Criteria for Mail Merge Recipients Tag: 115693
  - 3
    - Removing disabled items in word 2007 (VBA) Hi, Does anybody know of a way to clear the disabled items list in Word 2007 using automation (i'm automating using Visual Studio 2005 vb.Net)? Thanks in advance. -- Kenny. Systems Developer Tag: Specify Criteria for Mail Merge Recipients Tag: 115692
  - 4
    - Opening 2 documents in Axwebbrowser in Windows Application C# - Visual Studio 2005 - Word 2003 - Windows XP I have created a custom button and added it to the MS Word Standard Toolbar. On clicking this button, i get a Windows Form that states weather the Current active document is saved or not saved. When i open any Word document in an AxwebBrowser object inside a Windows Form, i find the standard toolbar and see my custom button. It works just fine. But when i run another instance of the Application and open another file in the AxWebBrowser, i find that i am able to use the Custom button only in the second instance of the application. In the Earlier(First instance) i am not able to even click the button. No only that, all the buttons in the toolbar do not seem to function at all(Bold...Italic...Allignment etc) Why is this happening and how can i resolve it. Please help. Thankyou. Tag: Specify Criteria for Mail Merge Recipients Tag: 115684
  - 5
    - Word to PDF Issue with Acrobat Distiller I am trying to convert word document to PDF using Acrobat Distiller. Acrobat Distiller showing status as printing but never converts the document to PDF. What is wrong with the below mentioned C# code. Am I passing wrong parameters to ActiveDocument.PrintOut method? Object printRange = WdPrintOutRange.wdPrintCurrentPage; Object background = false; Object append = false; Object printFile = true; Word.Application oWord = new Word.Application(); oWord.DisplayAlerts = WdAlertLevel.wdAlertsNone; oWord.Visible = false; oWord.WindowState = WdWindowState.wdWindowStateMinimize; oWord.Documents.Open(ref wordFileName, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing); oWord.ActivePrinter = "Acrobat Distiller"; oWord.ActiveDocument.PrintOut(ref background, ref append, ref printRange, ref pdfFileName, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing); oWord.ActiveDocument.Close(ref saveChanges, ref missing, ref missing); oWord.Quit(ref saveChanges, ref missing, ref missing); Tag: Specify Criteria for Mail Merge Recipients Tag: 115682
  - 6
    - Form fields in a template I have a variety of templates using form fields. I need to import specific data into some of the form fields and the form needs to remain as a template after the data is imported and separate templates need to be created after the import. It must be locked for some sections as the user needs to be able to fill-in the form fields. I have run into quite a few stumbling blocks. I can't use a mail merge because it strips my field codes out that are not being populated and the mail merge does not seem to work with templates. Is there any other way I can populate form fields (or bookmarks) with data from an excel workbook? I did get one reply with a suggestion that is probably good for creating one document, however, I didn't get a reply after providing the following additional information. I need to take the one template and generate 500+ templates using records from an excel spreadsheet, (personalizing the templates). Then the templates will be used by office staff to complete online. Any ideas? Thanks, Mary Tag: Specify Criteria for Mail Merge Recipients Tag: 115677
  - 7
    - 2007 templates I'm using Word 2007. When I attempt to attach a custom template to my document, I get a message that the template is in use and I'm given the option of being notified when the file becomes available or opening a "read-only" copy. However, the template is NOT in use. If this template was stored in my start-up folder, I could understand perhaps why I'd be getting this message since these are loaded every time you open Word. But this is stored in my "user template" folder location. Does anyone know why is this happening? Tag: Specify Criteria for Mail Merge Recipients Tag: 115662
  - 8
    - string parameters are too long? Hi all, I define some place holders ( like <<<place holder>>> in a doc file and to replace the place holders with some texts from an excel file. when text length become long then I am told "string parameters are too long", how long is too long and how can I circumvent it ? Clara -- thank you so much for your help Tag: Specify Criteria for Mail Merge Recipients Tag: 115660
  - 9
    - Help with autoexec I have a template that is saved on a sharepoint site and used by many different people. Problem is when people open the template and add text, then go to save, they inadvertently save the file as a .dot file. I have a AutoNew macro that would force the file to be saved as a .doc. This works if the file is opened directly from a directory, but it does not work when opened from where it is a link on the sharepoint internet site. Is there another way to force the file to save as a .doc? Or is there a better way to do this? Below is the code for the AutoNew macro: Sub AutoNew() Dim sPath As String sPath = Options.DefaultFilePath(Path:=wdDocumentsPath) ChangeFileOpenDirectory sPath On Error GoTo Cancelled ActiveDocument.Save Application.DefaultSaveFormat = "" Exit Sub Cancelled: If Err.Number = 4198 Then MsgBox "User Cancelled" End If End Sub Tag: Specify Criteria for Mail Merge Recipients Tag: 115655
  - 10
    - WORD SpellCheck, Add to Dictionary button Is it possible to prgrammatically, such as in a macro, disable the Add to Dictionary button in WORD's Spell checker? Thanks Tag: Specify Criteria for Mail Merge Recipients Tag: 115652
  - 11
    - using for each to select sentences in a cell Hi, I have managed to find a work around to my current problem but I am intrigued as to why this is happening. Word 2003 I am extracting individual lines out of a Table cell and placing them in a collection which i am placing in a user form to provide a user interface. Previously i would have iterated over the string until i found a carriage return / line feed character but after discovering the joys of the Word Range object (thanks to the contributions in this group!) I thought there must be a much more elegant solution. Which i thought would be along the lines of Tag: Specify Criteria for Mail Merge Recipients Tag: 115647
  - 12
    - Find each text box I want a way for a user to find each text box in the main story of a multi-section document - kind of like 'browse by object' for text boxes - so they can see whether or not the box should be deleted. I don't see the option for searching for shapes in find, and I don't want to do anything with the text boxes except maybe select them if necessary. Any suggestions would be most appreciated, but I'm not an experienced vba writer so comments associate with the code would really help. -- Thanks, Jen Tag: Specify Criteria for Mail Merge Recipients Tag: 115640
  - 13
    - Bookmark REF Field I have a template with several Form Fields. I would like to put in a FormField that is automatically filled in with data that comes form three other bookmarks. this FormField is a Report ID. The Report ID would be made up from three different Bookmarks/Fields that the user fills in, such as UserInitials, FiscalYear and State. The Review ID would automatically update to ELB2008CA after the user enters the data for UserInitials, FiscalYear and State. Does anyone know how I could do this? Thanks -- Eric the Rookie Tag: Specify Criteria for Mail Merge Recipients Tag: 115635
  - 14
    - Form Fields Reset I have a template with several Form Fields, REF Text and a TOC. I have a macro that updates all Fields on the tool bar that allows users to update fields when the Doc is protected. But the Form fields get reset when the user uses this macro. Please help. Sub UpdateFields() ' ' Dim oStory As Range For Each oStory In ActiveDocument.StoryRanges oStory.Fields.Update If oStory.StoryType <> wdMainTextStory Then While Not (oStory.NextStoryRange Is Nothing) Set oStory = oStory.NextStoryRange oStory.Fields.Update Wend End If Next oStory Set oStory = Nothing End Sub -- Thanks Eric the Rookie Tag: Specify Criteria for Mail Merge Recipients Tag: 115634
  - 15
    - How to handle pressing button "Cancel" from InputBox? Hello. How to handle of pressing button "Cancel" from dialogue InputBox? In my code when user press button "Cancel" dispaly Msgbox from cycle Do While. I need to cancel all action. See my code: Sub movePic() Dim Message As String On Error Resume Next If Selection.Type = wdSelectionInlineShape Then Selection.InlineShapes(1).ConvertToShape End If If Selection.Type = wdSelectionIP Then MsgBox "Please select your image" Else Do While Message = "" Message = InputBox("Please enter the number." & _ vbCr & "...", _ "Move image", "") If Message = "" Then MsgBox "Please enter the number" End If Loop Selection.ShapeRange.IncrementLeft MillimetersToPoints(Message) End If End Sub Thank you very much! Tag: Specify Criteria for Mail Merge Recipients Tag: 115630
  - 16
    - Word 2007 formatting from elements/fields disapear L.s, I use the Dutch version, so I hope I translated the menu's fine. Also i wonder if this is the right group for this question? I have made a template for users en put the new "besturingselementen" elements where the user can put in text, in the template. I fount this on the developer tab, group elements and then the new ones (not the old 2003 or really old 1998). I choose the element without formatting and set it up to "disappear" when the user changes the default text. It works fine until here. I want to mark the places where the user need to make changes, I mark the default text which is in the field/element with the "yellow text marker". Now the user can easily see where to make changes. What works really nice is that when the user chances the text, the element AND the marking will disappear. I don't know if this is intended or a "undocumented feature" but it's a great option. And now the big problem: In my documents there are many elements when I change the marking for some of them it's looking fine, but when a save, exit and reopen the file, the marking for other elements is gone. I tested for several hours but can't find some logic in it. I tried: - change the marking in developer mode (yes/no). for the elements. - In developer mode when changing the marking include/exclude the label marking round the element (where the text you can put in as "label" is placed). - Give every element a unique label name - etc. It drives me really nut's, I can't find any logic. Does anyone know a solution for this puzzle Manny thanks Peter Tag: Specify Criteria for Mail Merge Recipients Tag: 115626
  - 17
    - GetCaretPos can't get the correct value When i call GetCaretPos in MS Word Addin, It always return's a same value. When i Enable IME,it can return the correct value. Some one can tell me why? Tag: Specify Criteria for Mail Merge Recipients Tag: 115625
  - 18
    - Formatting seems to pass from Form Fields to repeated fields Hi All Again, I'm using Form textboxes to enable a user to enter repetitive info in one place and then use ref fields to display this info in various places such as textboxes, table cells, etc, when the user tabs out of the relevant form textbox. My problem is that the initial form textboxes are something like 16 pt bold, which they need to be and for some reason this formatting also goes to the repeating fields, which is no good because I want the repeating fields to remain in their pre-set states of 10pt normal, 9pt normal, etc. Any ideas how I stop the formatting coming across? Thanks Tag: Specify Criteria for Mail Merge Recipients Tag: 115609
  - 19
    - How to auto-display the forms toolbar and a macro to click on Hi All Having real trouble finding out how to do this. Basically I have done a Word doc that uses Form fields so that I can auto-copy the contents of say 20 form fields into designated areas of the remaining doc. My problem is that textboxes don't seem to auto-update when the user has tabbed out of a form field (cells in tables do), so I've a little VBA macro function that goes through all of the references and forces them to update - inc the textboxes. My problem is that I need the user to click the padlock icon on the forms toolbar to unlock the doc so that the user can then click on this macro to run it. This 'unclick padlock then click Macro' procedure has to be done for each copy of the Word doc template that they use, but the user is fine with that. My functional problem is that I: a) Can't get the Forms toolbar to be already displayed when the user opens the copy doc from the template. b) Can't get my Macro to appear as a clickable toolbar/item/button when the user opens the copy doc from the template. Although displaying the Forms toolbar isn't too much of an onerous task for the user, ie they go View / Toolbars / Forms, getting the Macro to appear on the menu/toolbar is way too much hassle. Is there no way, either via VBA or something even more simpler, I can get these details to auto-display as the user opens the copy doc? Thanks Tag: Specify Criteria for Mail Merge Recipients Tag: 115608
  - 20
    - Create Table of Changes I have multiple people reviewing multiple copies of the same document. I need to merge all reviewed documents into a final document wich will be created by taking the original document and adding the suggestions / changes added in the appropriate places. I am an excel VBA programmer & so far I can make a table of revisions (using track changes) and a table of comments, but am unsure how to tag their original location so that I can put them all back where they came from. I would prefer to use revisions (needs only to work for inserted revisions) but I could use comments as well. Any insight / help would be appreciated. Tag: Specify Criteria for Mail Merge Recipients Tag: 115605
  - 21
    - save email message I am trying to create the following sub to save an email message as an Excel file. The Sub does search through the outlook folder and saves the message as "Daily Processing Report.xls", but I get an error when trying to open it, "File Format invalid". I am able to do this manually by opening the message and doing a file save as and typing "Daily Processing Report.xls" and it opens just fine. But when I do it manually it also saves a folder with the same name and in it it has two xml files and one file with .thmx extension. I want to be able to do this with a macro if possible. sub extractEmailMessage() Dim olApp As outlook.Application Dim olNs As outlook.NameSpace Dim olFolder As outlook.Folder Dim olItem As outlook.MailItem Set olApp = CreateObject("Outlook.Application") Set olNs = olApp.GetNamespace("MAPI") Set olFolder = olNs.GetDefaultFolder(olFolderInbox).Folders("Folder") dirname = "D:\Emails\" For Each olItem In olFolder.Items If olItem.Class = olMail Then olItem.SaveAs dirname & "Daily Status Report.xls" End If Next End Sub Tag: Specify Criteria for Mail Merge Recipients Tag: 115604
  - 22
    - Date Field Clear sGood Afternoon, After checking the previous posts, I didn't see anything that quite fit what I'm looking to do and I'm hoping someone can still help. The first program below fills in two different ranges in the doc (one with the user id and the other with the date). Unfortunately, it was brought to my attention that someone might be a drooling moron and click on the box by accident which would require a clear function. The second program I tried to set up works to clear the Text Range (BMRange), but will not clear the Date Field (BMRange1). I've tried several variations and the best I can come up with what's below where it only deletes the first text character. Any thoughts on how to get it to delete the whole date line? Thanks in advance - Jenny B. Sub Bookmark() Dim BMRange As Range Dim BMRange1 As Range Application.ScreenUpdating = False With ActiveDocument If .ProtectionType <> wdNoProtection Then .Unprotect Password:="1" End If End With 'Identify current Bookmark range and insert text Set BMRange = ActiveDocument.Bookmarks("Div").Range Set BMRange1 = ActiveDocument.Bookmarks("Divs").Range BMRange.Text = Environ("username") & " " & "Dividends" BMRange1.InsertDateTime datetimeformat:="MMMM dd, yyyy", InsertAsField:=False 'Re-insert the bookmark ActiveDocument.Bookmarks.Add "Div", BMRange ActiveDocument.Bookmarks.Add "Divs", BMRange1 ActiveDocument.Protect Type:=wdAllowOnlyFormFields, _ NoReset:=True, Password:="1" Application.ScreenUpdating = True End Sub __________________ Sub Clearboxes() Dim BMRange As Range Dim BMRange1 As Range If ActiveDocument.FormFields("Check19").CheckBox.Value = False Then Set BMRange = ActiveDocument.Bookmarks("Div").Range Set BMRange1 = ActiveDocument.Bookmarks("Divs").Range BMRange.Text = "" BMRange1.Delete ActiveDocument.Bookmarks.Add "Div", BMRange ActiveDocument.Bookmarks.Add "Divs", BMRange1 End If End Sub Tag: Specify Criteria for Mail Merge Recipients Tag: 115603
  - 23
    - Dialog not opening for selection I have the following code is a test document (.doc) and it opens the dialog box fine for me to select an image folder. ' ' select the folder ' With Application.FileDialog(msoFileDialogFolderPicker) .AllowMultiSelect = False If .Show Then myFolder = .SelectedItems(1) End If MsgBox ("Folder selected is " & myFolder) End With However, when I place that same code in a Word template (.dot) I see the MessageBox displayed but the dialog box never appeared prior to that for me to select the folder. What am I missing? I am trying this in Word 2002 (XP) on WinXP SP2. Mainer Tag: Specify Criteria for Mail Merge Recipients Tag: 115602
  - 24
    - Reading SQL database and retrieving document VBA gerus, I need my macro to read the name of a document from an SQL database on a remote site and retrieve the named document for editing. After editing, I need a macro to write/rewrite the document to the site. Can this be done using VBA? Are there samples of syntax? Thanks. Charlie from Texas Tag: Specify Criteria for Mail Merge Recipients Tag: 115600
  - 25
    - Reading SQL database and retrieving a file VBA Gerus, From a macro, I need to read a document's name from a SQL database on a remote site, and retrieve the document. After editing, a macro needs write/overwrite the file back to the site. Can this be done from VBA? Thank you, Charlie from Texas Tag: Specify Criteria for Mail Merge Recipients Tag: 115599
- Next
  - 1
    - Cloning document content to new docs I'm using the Word Object Model to work with the body of a new e-mail message in Outlook 2007. My goal is to simply clone the active e-mail into one or more copies (the recipients from the source will each get their own copy of the original, which will be trashed). I'm tried using Document.Select, then Application.Copy on the source e-mail, followed by Document.Activate, Document.Select (the Document objects are specific to the cloned item, not the source), Application.Selection.WholeStory and then Application.Selection.PasteAndFormat(wdPasteDefault) on each newly cloned e-mail. However, there are times when I get a locked for editing warning and the cloning fails - empty message body; this occurs inconsistently. Is there a better approach to cloning the contents of a Document object in situations like this where the documents are not file based? -- Eric Legault [MVP - Outlook] MCDBA, MCTS (Messaging & Collaboration, SharePoint Infrastructure, MOSS 2007 & WSS 3.0 Application Development) President Collaborative Innovations -> Try Picture Attachments Wizard 2.0 For Microsoft Outlook <- -> Take your SharePoint content offline <- -> More info: http://www.collaborativeinnovations.ca <- Blog: http://blogs.officezealot.com/legault Tag: Specify Criteria for Mail Merge Recipients Tag: 115593
  - 2
    - how do you automatically generate a letter on certain dates bsd I would like to automatically generate a birthday greeting letter in word2000 to my friends a day before their birthdays wich I have a tendecy to forget Tag: Specify Criteria for Mail Merge Recipients Tag: 115591
  - 3
    - copying each page of a dcument Hello all, Is there any way to copy each page of a document separately from the header and footer? In my code when I use: Selection.Bookmarks("\page").Range.FormattedText it selects both the text in the page and its header and footer. I want to store the formatted text of a page and its header and footer in separete files. thanks mona Tag: Specify Criteria for Mail Merge Recipients Tag: 115590
  - 4
    - Insert pics from folder I am trying to create a template to automate the creation of a word document. I already have the template prompting the user for name, date, etc. It also prompts the user for a filename for this particular case. I am now trying to prompt the user for a folder containing bitmap images for that case. The document consists of two columns containing bitmap images. The problem is one case my have 4 images and the next may have 20 images. I was going to use bookmarks but because I don't know the number of images from one case to the next I'm not sure that is the best way to handle it. I would like the user to be prompted to select a directory and then the code would determine the number of *.BMP files in that directory and insert 4 images in each column with a blank line between each image. In order to fit within the column each images needs to be sized to 2.75" in width. When it gets to the bottom of column two insert a new page and continue on. Your suggestions are greatly welcome and appreciated. Mainer Tag: Specify Criteria for Mail Merge Recipients Tag: 115586
  - 5
    - Problem with highlighting words Hi, I have a word document containing the following sentence. All people in the city =96 big and small had arrived to watch the marathon from start to finish I am running the macro below (adapted from a post in this group) to highlight the words in the vFindText array. Sub HighlightWords() Dim vFindText As Variant Dim sReplText As String Dim sHighlight As String Dim i As Long sHighlight =3D Options.DefaultHighlightColorIndex Options.DefaultHighlightColorIndex =3D wdBrightGreen vFindText =3D Array("big", "small", "start", "finish") sReplText =3D "" With Selection.Find .Forward =3D True .Wrap =3D wdFindContinue .MatchWholeWord =3D True .MatchWildcards =3D False .MatchSoundsLike =3D False .MatchAllWordForms =3D False .Format =3D True .MatchCase =3D False For i =3D LBound(vFindText) To UBound(vFindText) .Text =3D vFindText(i) .Replacement.Text =3D sReplText .Replacement.Highlight =3D True .Execute Replace:=3DwdReplaceAll Next i End With Options.DefaultHighlightColorIndex =3D sHighlight End Sub The problem: Only the words "big" and "finish" are getting highlighted in green. The words "small" and "start" are not. What could be problem? Thanks in advance for the help. Regards, Raj Tag: Specify Criteria for Mail Merge Recipients Tag: 115576
  - 6
    - http://WWW.DAMENKLEIDUNG-KAUFEN-24.INFO + http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INFO http://WWW.UEBERGROESSEN-KAUFEN-24.INFO http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INFO http://WWW.DAMENKLEIDUNG-KAUFEN-24.INFO + http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INFO http://WWW.UEBERGROESSEN-KAUFEN-24.INFO http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INFO +++ MAENNERKLEIDUNG KAUFEN +++ MAENNERKLEIDUNG ONLINE BESTELLEN ++ http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INF http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INF http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INF http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INF http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INF http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INF http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INF +++ DAMENKLEIDUNG KAUFEN +++ DAMENKLEIDUNG ONLINE BESTELLEN ++ http://WWW.DAMENKLEIDUNG-KAUFEN-24.INF http://WWW.DAMENKLEIDUNG-KAUFEN-24.INF http://WWW.DAMENKLEIDUNG-KAUFEN-24.INF http://WWW.DAMENKLEIDUNG-KAUFEN-24.INF http://WWW.DAMENKLEIDUNG-KAUFEN-24.INF http://WWW.DAMENKLEIDUNG-KAUFEN-24.INF http://WWW.DAMENKLEIDUNG-KAUFEN-24.INF +++ UEBERGROESSEN KAUFEN +++ UEBERGROESSEN ONLINE BESTELLEN ++ http://WWW.UEBERGROESSEN-KAUFEN-24.INF http://WWW.UEBERGROESSEN-KAUFEN-24.INF http://WWW.UEBERGROESSEN-KAUFEN-24.INF http://WWW.UEBERGROESSEN-KAUFEN-24.INF http://WWW.UEBERGROESSEN-KAUFEN-24.INF http://WWW.UEBERGROESSEN-KAUFEN-24.INF http://www.back-link.net http://ibm-news.for-um.de/showthread.php?t=1175 http://ibm-news.for-um.de/showthread.php?t=1177 http://ibm-news.for-um.de/showthread.php?t=1177 http://www.back-link.net http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INF http://WWW.UEBERGROESSEN-KAUFEN-24.INF http://WWW.UEBERGROESSEN-KAUFEN-24.INF http://WWW.DAMENKLEIDUNG-KAUFEN-24.INF http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INF http://WWW.DAMENKLEIDUNG-KAUFEN-24.INF http://WWW.DAMENKLEIDUNG-KAUFEN-24.INF http://WWW.DAMENKLEIDUNG-KAUFEN-24.INF http://WWW.UEBERGROESSEN-KAUFEN-24.INF http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INF +++ MAENNERKLEIDUNG KAUFEN +++ MAENNERKLEIDUNG ONLINE BESTELLEN ++ http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INF http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INF http://WWW.DAMENKLEIDUNG-KAUFEN-24.INF +++ MAENNERKLEIDUNG KAUFEN +++ MAENNERKLEIDUNG ONLINE BESTELLEN ++ http://WWW.DAMENKLEIDUNG-KAUFEN-24.INF http://WWW.DAMENKLEIDUNG-KAUFEN-24.INF http://WWW.UEBERGROESSEN-KAUFEN-24.INF http://WWW.UEBERGROESSEN-KAUFEN-24.INF http://WWW.MAENNERKLEIDUNG-KAUFEN-24.INF http://WWW.DAMENKLEIDUNG-KAUFEN-24.INF http://WWW.UEBERGROESSEN-KAUFEN-24.INF + Tag: Specify Criteria for Mail Merge Recipients Tag: 115569
  - 7
    - Question about memory allocation Hi, I defined A as an array in this way: Dim A() as string It is an array with unspecified array size. Somewhere in the programme, I define the array size like this: ReDim A(10) When I redim, does it mean some memory is immediately allocated for this array or does memory is allocated for this array ONLY when I define the elements as well, like, for example, ReDim A(10) A(1)="apple" A(2)="orange" .... ? Thanks. Mike Tag: Specify Criteria for Mail Merge Recipients Tag: 115560
  - 8
    - Word 2003/2007 Prompting to Save Document Hello All. I posted this question last week. Got some suggestions from Doug the MVP (Gracias for you efforts), but was unable to solve the problem. No one else chimed in. Here's the deal. We have an application that creates Word documents by automating Word with VBA and mail merge. All is good, application works as it should, creates the documents just fine and all. Problem is, when the user opens the file with Word 2003 or 2007 and prints the document (they are protected, so they can't change them), the document still prompts the user if they want to save the document. Behaviour does not occur if the file is created with Word 2000 or Word XP, nor does it occur with documents not created in this manner. Behavior continues with file indefinitely, where it will always prompt the user to save the document upon close if the user prints the document. I've posted an example of the document on our website: http://www.databasewhiz.com/tmp/NAS/8000009_Demand Letter.doc Clearly Word thinks something is changing when the user prints the file, but what? I've included part of the Sub that generates the file: Set wrdApp = CreateObject("Word.Application") wrdApp.Documents.Open FileName:=strDoc, AddToRecentFiles:=False, Visible:=True With wrdApp.Documents(strDoc).MailMerge .DataSource.FirstRecord = 1 .DataSource.LastRecord = 1 .Destination = wdSendToNewDocument .Execute End With wrdApp.Documents.Item(1).Activate wrdApp.Documents.Item(1).Protect wdAllowOnlyComments wrdApp.Documents.Item(1).SaveAs "C:\access\NAS\" & intHmnrID & "_" & strDocName wrdApp.Documents.Item(1).Close wrdApp.Documents(strDoc).Close SaveChanges:=wdDoNotSaveChanges wrdApp.Quit Set wrdApp = Nothing Nightmare prompt is starting to cost us lots of time & money. If anybody has a clue as to why this would occur and how to fix it, would really really appreciate it. Thanks In Advance, RJ Database Whiz Consulting Tag: Specify Criteria for Mail Merge Recipients Tag: 115555
  - 9
    - Create macro to replace logo My company has a new logo and I need to replace it in hundreds of templates. It currently resides in the same place in all templates in the footer within a text box. I have recorded a macro, but I get an error when running it on subsequent templates. I am using Word 2003. Thanks for any assistance. Tag: Specify Criteria for Mail Merge Recipients Tag: 115554
  - 10
    - Automating search/replace within a block Hi, At the end of a macro automating the search/replace within a block, how do I answer no to the dialog box asking if I want to search the remainder of the document? Recorder does not record my answer. Sorry, it must be basic, but cannot find the answer. thanks -- John Doue Tag: Specify Criteria for Mail Merge Recipients Tag: 115547
  - 11
    - Formfield wdDateText Hi, I'm having a problem adding a formfield in Word 2000. I'm adding a textbox and want it to be formatted with the DateText setting. I want the formatting to spell out the month day, year when the user enters the date. I've been playing with the TextInput property, but must be missing something. This is the code w/o TextInput property. Set ffield = ActiveDocument.FormFields _ .Add(Range:=Selection.Range, Type:=wdFieldFormTextInput) With ffield .OwnStatus = True .StatusText = "Type Prior Application Filing Date, xx/xx/xx" End With Thank you. jbc Tag: Specify Criteria for Mail Merge Recipients Tag: 115545
  - 12
    - Visual Studio VSTO Projects wants Office 2003?? I just installed Visual Studio 2005 and VSTO. When I try to create a Word Document project it complains that I don't have Office 2003 installed. I do have Office 2007 installed. What's up with that? Tag: Specify Criteria for Mail Merge Recipients Tag: 115541
  - 13
    - Repopulate UserForm from Document I have created a 2003 Word Template [2007 Compatibility Mode] that uses 2 userforms. (The 2 userforms are identical, except for the Name and some of the VBA coding.) The first userform loads when the template opens as a document to which the user enters information in each field and upon clicking OK, the new document populates with the entered information. The second userform was created to appear with the help of a keyboard shortcut macro to appear so that the user has the option of changing the previously entered information. My problem is that I want the second userform to populate with the information that was previously entered. Here is a sampling of my code for the second userform: Private Sub DisplayEditForm1() With ActiveDocument txtProjectDescription = ActiveDocument.Variables("ProjectDescription").Value etcâ?¦.. End With End Sub I have tried some of the other posted suggestions, but I'm still having problems. Does anyone have any suggestions? Thanks bunches!! Tag: Specify Criteria for Mail Merge Recipients Tag: 115539
  - 14
    - Using KeepTogether for paragraph formatting Hi everyone, Here is my scenario: I'm creating a MS Word document using the Interop/Word API. My document consists of multiple "blocks" and I need to ensure that each block does not overflow a page. I have found multiple references to the KeepTogether property but have not been successful at getting it to work. Currently I am treating a document as a collection of paragraphs. In my code, whenever I encounter a new "block", I am creating a new paragraph. I then pull the range from the paragraph object and write out to the document until I detect the end of the block. // New block... Range.InsertAfter("some text"); Range.Collapse(ref end); Range.InsertAfter("most text"); // say I detect end of block here Range.InsertParagraphAfter(); // repeat from top If I try to set the KeepTogether property of a given paragraph, I get a "invalid value for range exception"... I'm setting the property like so: doc.Paragraph[1].KeepTogether = 1; I can't figure out what it is I'm doing wrong here... Thanks for any help! Tag: Specify Criteria for Mail Merge Recipients Tag: 115537
  - 15
    - Error! No document variable supplied. Hi to all I have developed a system in Delphi and want to print into Word some information. I have created the field in Delphi that will print in word (DOCVARIABLE varname, IF{DOCVARIABLE varname}=" " "" ) but I keep having the message "Error! No document variable supplied." when no data is in Delphi database field. It works when there is data. Can any one out there help me in building the intructions to avoid the message mentioned above when the field is blank? Thanks for your valuable help. -- CP Tag: Specify Criteria for Mail Merge Recipients Tag: 115522
  - 16
    - Header usage Hi, I`m not new to code but not an expert with office..is there a way to produce a header only on certain pages?.What I am tring to do is insert our company Logo into some batch processed documents. We do not want to use letterhead so the best would be to insert the logo within the Doc itself. Trying to use headers really isnt an option because every page will have the header and we really dont want that.. I have thought of using a text box and embeedding the image which makes sense but being that I need to do this in batches its hard to do beacuse of the section breaks and so forth.. Would anyone have any ideas on how I could go about insert the logo once per document, keeping in mind that the batch merges can draft many letters onto 1 doucment. Hope that explains it enough.. thanks R Tag: Specify Criteria for Mail Merge Recipients Tag: 115521
  - 17
    - Application.screenupdating = false?? What's going on? Hi, I have the following code: Private Sub RadBtnCI_Click() Dim otable As Table For Each otable In ActiveDocument.Sections(4).Range.Tables Application.ScreenUpdating = False Call HideTableRows_fromRadioButtons(otable) Application.ScreenUpdating = True Next RadBtnCI.Select End Sub The "HideTableRows_fromRadioButtons" subroutine unhides plenty of rows in many tables and calls other subroutines. It takes 15-20 seconds to complete. During this time, despite of the Application.ScreenUpdating = False, the left side of the screen gets filled up with black horizontal lines. Application.ScreenUpdating = False DOES prevent the screen from showing how each table expands and collapses gradually, but I'd like to know whether it's possible to get rid of these annoying black lines that might confuse the user and led him to think that the computer is going to crash. The black lines do dissappear when the subroutine is complete, but 20 seconds of black lines filling up the screen is annoying, unprofessional and makes you think the program is crashing. Any help is appreciated, Thank you Tag: Specify Criteria for Mail Merge Recipients Tag: 115510
  - 18
    - Progress bar that tracks actual progress?? I just finished implementing and testing my first progress bar. I got the code from this link: word.mvps.org/faqs/Userforms/CreateAProgressBar.htm I was dissappointed though!! As far as I understand how the progress bar works and based on my timing results, the progress bar does not track actual progress, it simply fills up a bar independently of the actual progress of a subroutine. In the end, you get a slower program that does nothing to keep the user informed of the actual progress. Is there a way to code a real progress bar, one that actually tracks the actual progress of a subroutine? Even if it does it with an error margin? Thank you, Juan Tag: Specify Criteria for Mail Merge Recipients Tag: 115508
  - 19
    - Use Saveas to convert document to PDF without prompting? Is it possible to use Saveas to convert a Word document to PDF without prompting? I'm using Word 2007 (and Vista), and I have the line: newDoc.SaveAs FileName:=sNewFileName, FileFormat:=wdExportFormatPDF It worked, but I had to answer two promts for each PDF file saved. Is there a way to accomplish this without prompting? Steven Craig Miller Tag: Specify Criteria for Mail Merge Recipients Tag: 115506
  - 20
    - Forming a sentence from a checkbox list Hiya - first post alert! I'm try to get word to form a sentence from user selected checkboxes, for example a user selects the items that they want and then word forms a sentence such as "i want X, Y and Z" So that it inserts commas and the word "and" in the correct place. i tried having a count, for the items and then when the count is > 1 getting word to type ", " but this code never called. any help please? Tag: Specify Criteria for Mail Merge Recipients Tag: 115497
  - 21
    - Re: How to get to email from Word Hi, I am referring to the thread "How to get to email from Word" dated 4/20/2008. Virtually you have made the formatting worked. I'm using Word 2003/Outlook 2003. I copied the whole sub from Gramham's final version dated 04/22/2008, but I am stuck with error 91 - object variable or With block not set) on the statement objDoc.Range.Paste. What do I need to do get around with the this error? Many thanks, Tag: Specify Criteria for Mail Merge Recipients Tag: 115491
  - 22
    - Convert Document object to byte array without using hard drive I'd like to use MS Word as a text editor and store the data as a byte[] within a name in Excel. I'd like to embed a Word document in an Excel file so the user can create rich 'how-to' documentation which gets transported with the workbook. Document's SaveAs and Open methods require a filename to be passed in, and a Document object is not serializable. To save the file, I could save the Document as a temporary file as an intermediary, and then open up that file as a FileStream which I could then convert to a byte array. However, creating the FileStream doesn't work if the Document is still open in Word as it is being used by another process. Outlook seems to be able to use Word as a text editor for composing email messages, I'd like to do something similar. Any ideas? I'm using C# in VS 2008 Professional, and Office 2003. Thanks. Tag: Specify Criteria for Mail Merge Recipients Tag: 115485
  - 23
    - HELP PLEASE My boss is very picky about how he wants this project manual done. Here are his requests that I need assistance with: 1.) He wants the page #s to be on the right side on the front pages and the page #s on the left side on the back of the same paper. How do I do this? 2.) He has each chapter broken up into separate word documents but he wants the page numbers to change in all other chapters if he adds or subtracts pages in other documents. Can this even be done? If so, how? 3.) How do you import all information from Adobe Acrobat to Word? I am in a bind and he is expecting me to be some kind of expert. Please help me. -- LL Tag: Specify Criteria for Mail Merge Recipients Tag: 115480
  - 24
    - Insert sentence only if text field is not null My searching is coming up empty, because I don't know what my intended result is called. Can someone tell me the name of what I'm trying to do, and direct me to the right reading? I want to insert some text if a certain field is not null. I also want to insert the contents of that field in the conditional text, i.e.: ...renew extensions of credit to the BKBORROWER[ and BKBORROWER2, each singly or collectively]. Thanks in advance. Sandi Tag: Specify Criteria for Mail Merge Recipients Tag: 115473
  - 25
    - Find and Replace all occurrences except the first I have a find and replace vba script that can replace what I want, but it does it to all occurrences, and the requirements are to replace all of the occurrences except the very first one in the document. The code is: Sub FindAndReplacewithAcronym() Selection.Find.ClearFormatting With ThisDocument.Application.Selection.Find .Text = "Full name of the item" .Replacement.Text = "Acronym of the item" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With ThisDocument.Application.Selection.Find.Execute Replace:=wdReplaceAll End Sub How can I modify it to do this? Do I have to count the occurrences and then do something while the count is greater than 1? Tag: Specify Criteria for Mail Merge Recipients Tag: 115470

I would like to change the following macro so that it selects only those
people in the data source that do NOT have an email address (ie Email =
blank). Any suggestions? I will also need to know how to change it back to
Email = All.

Thanks!

Sub PrintMerge()
'

With ActiveDocument.MailMerge
.Destination = wdSendToPrinter
.SuppressBlankLines = True
With .DataSource
.FirstRecord = wdDefaultFirstRecord
.LastRecord = wdDefaultLastRecord
End With
.Execute Pause:=False
End With
End Sub

Top

Re: Specify Criteria for Mail Merge Recipients by macropod

macropod
Wed Jul 16 14:37:03 PDT 2008

Hi Lynn,

You can achieve this without a change to the macro, by incorprating a SKIPIF field into your mailmerge template. See Word's Help
file for details.

--
Cheers
macropod
[MVP - Microsoft Word]

"Lynn" <Lynn@discussions.microsoft.com> wrote in message news:B0389BA4-FF67-4AA1-8D26-D2E6ADDFE29B@microsoft.com...
>I would like to change the following macro so that it selects only those
> people in the data source that do NOT have an email address (ie Email =
> blank). Any suggestions? I will also need to know how to change it back to
> Email = All.
>
> Thanks!
>
>
> Sub PrintMerge()
> '
>
> With ActiveDocument.MailMerge
> .Destination = wdSendToPrinter
> .SuppressBlankLines = True
> With .DataSource
> .FirstRecord = wdDefaultFirstRecord
> .LastRecord = wdDefaultLastRecord
> End With
> .Execute Pause:=False
> End With
> End Sub
>
>

Top