attaching a document to email

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - How to include macros in .doc file HI, I am using Word 2003. I wrote template lets call it "test.dot" which uses macros. When I create .doc file using test.dot on my PC I can use macros. In Tools->Template and Add-ins->Document Template is path to the template the .doc is based on. For Example C:\\...\test.dot But when I created .doc on my PC and send it via email as attachment the user in the other site can not use macros while the path to the template the .doc is based on is not actuell. My Problem is how can I include macros to the .doc document that it works on every machine without having information about template. Is it possible? Tag: attaching a document to email Tag: 87607
  - 2
    - Strange Print Error With VBA Created Doc - Solution The solution was in the Word Application itself. Tools->Options->Print->Hidden Text. Selecting this option fixed it. Seems on some machines, Word treats vba created text in text boxes as hidden by default. hals_left Hi This may or not be vba related. Has anyone ever encountered a prioblem like this before, Or know a solution A table cell in a word doc contains multiple address lines, created using the code below in a template. The address loooks just fine in Word and even in print preview, but on the actual paper on the first line appears. Also intermittent , works ok on some printers. Users have found a workaround, cut the address then paste it back before printing. Any thoughts ? Thanks hals_left Set objRS = objConn.Execute(strSQL) If Not objRS.EOF Then strAddress= objRS("BusinessName") strAdd1 = objRS("Add1") strAdd2 = objRS("Add2") strAdd3 = objRS("Add3") strTown = objRS("TownCity") strCountyLine = objRS("County") & vbTab & objRS("PostCode") If strAdd1 <> "" Then strAddress = strAddress & vbCrLf & strAdd1 If strAdd2 <> "" Then strAddress = strAddress & vbCrLf & strAdd2 If strAdd3 <> "" Then strAddress = strAddress & vbCrLf & strAdd3 If strTown <> "" Then strAddress = strAddress & vbCrLf & strTown strAddress = strAddress & vbCrLf & strCountyLine ActiveDocument.Tables(2).Rows(1).Cells(1).Select Selection.Text = strAddress Tag: attaching a document to email Tag: 87604
  - 3
    - Count files Part of my Word macro is using for counting files in a folder. The problem is that result of counting also includes all open files in that folder. So the number of files is correct only if no documents are open in that folder. This worked well in Office 2000 (Word 2000). Result didn't include open files. The macro is the same and it doesn't work correctly in Office 2003 (Word 2003). The code: Dim stevec As Integer With Application.FileSearch .FileName = "pr????.doc" .LookIn = "\\_server_\_folder_\" .SearchSubFolders = False .Execute For stevec = 1 To .FoundFiles.Count Next End With MsgBox Stevec Regards, Iztok Tag: attaching a document to email Tag: 87603
  - 4
    - how can I set tab stops for only fill-in areas of the document? I want to be able to tab to different areas of my document where a blank needs to be filled in, and ONLY those areas. I want to start at the top of the document and have my tabs go to the next blank that needs to be filled in, and so on. Tag: attaching a document to email Tag: 87599
  - 5
    - esoteric Word VBA run order issue - not trying to scare off anyone I created a form and some VBA code behind it in a Word doc file. Under the ThisDocument (Microsoft Word Objects) for Document_Open() I have the following code: Private Sub Document_Open() form1.Show End Sub That kicks off the form but I get a Run-time error '5852': Requested object is not available. I did a line by line execution run and found that the error occurs in this line strPatMasterID = ThisDocument.MailMerge.DataSource.DataFields("PatentMasterID").Value The problem is order in which the code is executed. The mailmerge (based on msquery) is kicked off after the form opens (or in this case because of the error, when I click "end" to stop the code)... so obiviously it cannot retrieve the mailmerge.datasource.datafields if the mailmerge doesn't run first. So, does anyone how now I can manipulate the run order of the VBA code or explicitly force the msquery to run first before I retrieve the data? Would setting a timer work? thanks in advance for your help Tag: attaching a document to email Tag: 87594
  - 6
    - Formatting in endnote to text macro? I've just come across a Word macro Doug Robbins posted on Google Groups some time back to convert endnotes to text (below). I'm grateful for this, which will be useful as I and a co-author have a lot of endnotes to convert before submitting a book. When I run it, however, I lose all the formatting in my endnotes, which is a problem for all the italicized book titles in my notes. Is there any way to retain this formatting? Thanks for any help you can provide. Yours, David. -- From: Doug Robbins- view profile <http://groups.google.com/groups/profile?enc_user=n5ytSBIAAADLukhUwkIQqTf lNRzxM-TQII73Nnd8MGuFrQYThHx-nw> Date: Wed, Jan 19 2005 3:41am Email: "Doug Robbins" <d... <http://groups.google.com/groups/unlock?msg=a80683a23dc18ad5&_done=/group /microsoft.public.word.formatting.longdocs/browse_frm/thread/e186d433d465 8f5/a80683a23dc18ad5%2523a80683a23dc18ad5%3F> @NOmvpsSPAM.org> Groups: microsoft.public.word.formatting.longdocs ' Macro created 29/09/99 by Doug Robbins to replace endnotes with textnotes at end of document ' to replace the endnote reference in the body of the document with a superscript number. ' Dim aendnote As Endnote For Each aendnote In ActiveDocument.Endnotes ActiveDocument.Range.InsertAfter vbCr & aendnote.Index & vbTab & aendnote.Range aendnote.Reference.InsertBefore "a" & aendnote.Index & "a" Next aendnote For Each aendnote In ActiveDocument.Endnotes aendnote.Reference.Delete Next aendnote Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find.Replacement.Font .Superscript = True End With With Selection.Find .Text = "(a)([0-9]{1,})(a)" .Replacement.Text = "\2" .Forward = True .Wrap = wdFindContinue .Format = True .MatchWildcards = True End With Selection.Find.Execute Replace:=wdReplaceAll Tag: attaching a document to email Tag: 87589
  - 7
    - how do i get the paragraph symbol out every time i create a page? every time i get into a word office to type something i get a paragraph sign and i can't delete it. it's not temporary either it's every time i get in Word and my space isn't a space they are dots. like this.....but a little higher.so it's not on the line. am i confusing people more now? please help it's driving my nuts!!!!!! thank you Hope Tag: attaching a document to email Tag: 87586
  - 8
    - WHERE IS A SAVE OPTIONS LOCATED AT? Hello dearest, Today I am posting these questions, because I really do not know how to find out how to work of problems. That why I really need help from all of you people, please help me to solving out, Thanks. PS. I have open an application forms, and when I get into an application forms trying to filling out, however I cannot typed. Is because of the hand have showing and it will not let me type. I cannot figure out how to solving problem. Could you please helping me to solving out of those problems please? Thanks. My e-mail address is (tolovingyouforever4@yahoo.com); please reply an answer back to me, Respectfully yours, A.H.K. Tag: attaching a document to email Tag: 87585
  - 9
    - How can I design form templates to give textbox on checkbox click I am trying to create a form template so that when you click on a checkbox, another form field will appear. For example: I want to give someone the option to put recommendations and the number 1) But if they have more than 1 recommendation I want to be able to have them click a checkbox and another (Number 2) textbox will appear. Does anyone know how to do this or where i can go for some answers? Thansk, Tag: attaching a document to email Tag: 87578
  - 10
    - value for record at EOF (Using Word 2003) I have 20 records in a database and the ID of the 20th record is 24. Whenever I attempt to extract the ID# of the last record, it only shows the count (in other words, returns 20 instead of 24), using this code: jbID = ActiveDocument.MailMerge.DataSource.DataFields("jbID").Value If someone can show me an example of what should go before this so as to return the value of the last record, I'd appreciate it. I've tried different things with recordsets and EOF but I keep getting errors, even after setting up all the references for ADO and DAO. I'm connecting to the database since it's returning the record count, but I can't seem to pull up the actual value of the ID field in the last record. Many thanks in advance for your help. -- Bryan Tag: attaching a document to email Tag: 87566
  - 11
    - Search and Replace This is probably a crude, brutish way to attack my problem, but given my limited knowledge, that is all I have. My question is: Is there a way to search for particular text and replace each instance with a blank Text Form Field? Background: I have made a merge document to fill in data from our client(s). There are some areas of the document that are not worth tracking in our database and will need to be filled in manually. I have found that mergefields and form fields do not play well together because of the locking requirement for form fields. Our secretaries are not well-versed in Word, and I am trying to make it as easy and error-free as possible to complete these documents. My idea was to complete the merge and then have them run a macro (from a custom menu) that unlinked the mergefields, replaced "**" throughout the text with a Text Form Field, then locked the document for the remaining data entry so that they could tab from area to area and fill in the required missing information. Like I said probably crude and brutish in an attempt to be efficient and helpful. Thanks for any pointers. Tag: attaching a document to email Tag: 87557
  - 12
    - Please Help with My Document ASAP Hello, I need help with my document. The date on one page needs to be on two lines, not one. I need to add an extra page so I can finish my notes for my job. Information is confidential as far as contents. I'm using Microsoft Word and have Windows XP. Susie ncirisgal@gmail.com Tag: attaching a document to email Tag: 87555
  - 13
    - Create custom toolbar controls How do you create toolbar controls (besides ordinary buttons), e.g. similar to the default highlight control, font color control, etc. Visual basic does not seem to be able to create these. Tag: attaching a document to email Tag: 87550
  - 14
    - Outlook object not being created When I ran the following code the first couple of times it created the object, but now it won't. My objective is to create an e-mail with variables defined previously in macro, and not sending it right away. Any suggestions? (The reference library Outlook item is check-boxed in the menu.) Dim objOutlookApp As Outlook.Application, objItem As Outlook.MailItem With objItem .To = strEmail .Subject = strCo & ", " & " " & strJ .Body = "message" .Display End With Selection.InsertFile FileName:=strNew, Range:="", ConfirmConversions:=False, Link:=False, Attachment:=True Set objItem = Nothing Set objOutlookApp = Nothing -- Bryan Tag: attaching a document to email Tag: 87549
  - 15
    - Fonts for Word "Fields" when setting values We have a java application in which we create custom fields in MS Word using JACOB. On user initiation the fields are populated with values. If after creating the fields and change the FONT to a BARCODE font and when the fields are getting replaced with values, the BarCode font is not retained. The values are shown in original font. This happens only in Word 2003. The Bar Code font is retained for field values in Word 2000. Is there any setting or property to be set so that Bar Code fonts are retained for field values. The machine has Bar Code fonts installed. Thanks in advance for any suggestion. Tag: attaching a document to email Tag: 87546
  - 16
    - Multiple styles in a selected range I'm using Word 2000 on XP Pro. My problem arises when I select a range that contains multiple paragraph styles, and attempt to determine whether or not all the styles are the same. Any code like objRange.style results in this error: Run-time error '91': Object variable or With block variable not set The MSDN Library says: When you return the style for a range that includes more than one style, only the first character or paragraph style is returned. Why doesn't this happen? Am I reading this wrong? Is it a Word 2000 thing? Bear Tag: attaching a document to email Tag: 87544
  - 17
    - Designate Path when using SaveAs How do I designate the path when using SaveAs. I found that it saves it to My Docs. How do I change the Path, while telling word that it's a text file format at the same time? Thanks. Tag: attaching a document to email Tag: 87543
  - 18
    - TOC helper - replace hidden paragraph with style separator I work at a help desk with a large number of Word users and occassionally run into the problem where users either are not familiar with using the style separator (to assist in creating run-in headings so that only the heading, not the body text, shows up in the TOC) or are older documents that used hidden paragraph marks. Since multiple people can work on a document, we sometimes end up with documents that partly use style separators and partly use hidden paragraph marks - VERY confusing. So I created the following script to replace the hidden paragraph mark with the style separator (for Word 2002 & above). Although this code has been working well for the past several days, we are still testing it. If you would like to use it, PLEASE PLEASE PLEASE save the document you are going to try it on first. Although I cannot imagine why it would cause any problems, it is designed to replace items in the document, so there is always the chance I may have overlooked something. Mike Sub HiddenParaToStyleSep() Selection.HomeKey Unit:=wdStory ' Find hidden paragraph With Selection.Find .ClearFormatting .Text = "^p" .Font.Hidden = True .Forward = True While .Execute ' If hidden paragraph is Style Separator, do not replace If Selection.Paragraphs(1).IsStyleSeparator = False Then ' Replace hidden paragraph with auto color, unhide With Selection.Font .Hidden = False .Color = wdColorAutomatic End With ' Insert style separator Selection.InsertStyleSeparator End If Wend End With End Sub Tag: attaching a document to email Tag: 87542
  - 19
    - Find and Replace only once using .Find Can you only find and replace once using .Find? If I have multiple words to find and replace, is there a better way? Here is my code: Option Explicit Set myrange = appWord.ActiveDocument.Content With myrange.Find .Text = "SiteIn" .Execute replacewith:=SiteInfo & "." & SiteScheme .Text = "SiteBad" .Execute replacewith:=SiteInfo & "_" & SiteScheme & "bad" .Text = "SiteDiscard" .Execute replacewith:=SiteInfo & "_" & SiteScheme & "dis" .Text = "SiteNum" .Execute replacewith:=SiteInfo End With Tag: attaching a document to email Tag: 87539
  - 20
    - Macro to detect manual style overrides (e.g. StyleName + Bold) Hello, I need a diagnostic macro that detects manual style overrides in a document. These style overrides are shown in the Styles and Formatting task pane as "<StyleName> + Bold", for example, if 'Formatting in use' is selected. Apparently, they do not belong to the Styles collection, but I don't know how to address them. Does anybody know how I could list them using a macro? Thanks in advance Heike Tag: attaching a document to email Tag: 87538
  - 21
    - Inserting "notes to pages nn to nn" in endnote page headers Is there any way of inserting "notes to pages 32 to 55" in the header for the endnote pages (where the first endnote that appears on the page occurs in the text at page 32 and the last to appear on the page occurs in the text at page 55)? 1. Is there any way to do this without writing VBA code to do it? 2. If the answer to 1 is no, does anyone have some sample VBA code to do this? Thanks! Tag: attaching a document to email Tag: 87537
  - 22
    - Inserting HTML into Word (Word 2003) Hi, I have a situation in which I need to copy the contents of an HTML, complete with its CSS files and images, into a Word document. The simple solution is to use the command Selection.InsertFile which is equivalent to choosing File / Insert from the menu. However no matter what parameters I give to Selection.InsertFile, I keep getting the same message: "Recording Clipboard style sheet will require copying many styles. Do you want to use Normal style instead?" The correct answer to this question is NO because it preserves all the formatting. However I can't find any switch to make this dialog disappear and answer NO. How can I close this dialog while answering NO programmatically? Thanks, Arie Tag: attaching a document to email Tag: 87536
  - 23
    - Find & Replace Iâ??m using Windows XP and Word 2003. Word has a Find and Replace feature. How do I implement this to find all sequences of letters, symbols, and numbers between a specific word ,â??Startâ??, to the end of the line so that it can be replaced with a new set of letters, numbers and symbols. Example: Start <Appendix 12A> Tag: attaching a document to email Tag: 87530
  - 24
    - I had Microsoft Office 2000. Can I get it back? Last year my computer crashed so I had to buy a new one. I lost my Microsoft Office 2000. Is there a way of redownloading this software without having to repay for it a second time? Tag: attaching a document to email Tag: 87527
  - 25
    - Exporting This Discussion Is there anyway to export all the content of these discussions for offline reading/printing? Thanks! Tag: attaching a document to email Tag: 87521
- Next
  - 1
    - Delete Table Rows (Blank) Macro Question Hi all, I have this macro delete table rows blank which does not work on a table after I make changes to a row such as split cell 2 columns or insert rows using CTRL ALT I - am I missing something? Is there a macro that can delete blank rows regardless of how they are inserted. If you just create a blank table using Insert Table, ie drag mouse across number of colums rows and type in some rows it is fine and deletes blank rows. The moment you add rows or split cells on a row it gives this error: Runtime error 5941 the requested member of the collecton does not exist (after running). Can I refine it to acknowledge blank lines inserted using CTRL ALT I and split cells in a blank row? Is it viable? What am I missing? Thank you to whomever can assist. Public Sub DelTableRowsBlank() Dim flag As Boolean, I As Long, j As Long, atable As Table Set atable = Selection.Tables(1) With atable For I = .rows.Count To 1 Step -1 flag = False For j = 1 To .Columns.Count If Len(.Cell(I, j).Range) > 2 Then flag = True Exit For End If Next j If flag = False Then .rows(I).Delete End If Next I End With End Sub Tag: attaching a document to email Tag: 87515
  - 2
    - OutPersonals OutPersonals http://outpersonals.com/go/g671669 Tag: attaching a document to email Tag: 87510
  - 3
    - Deleting bookmarks I am inserting some text via vba from Acces into a Word doc. It is working well except afterwards teh book mark is deleted. Any thoughts?? TIA Bob Tag: attaching a document to email Tag: 87509
  - 4
    - OutPersonals OutPersonals http://outpersonals.com/go/g671669 Tag: attaching a document to email Tag: 87508
  - 5
    - =?utf-8?B?Rm9yIGVhY2ggYml0IG9mIGRvY3VtZW50IGRvID8=?= Hi Marc In a general sort of way, you can For each para in ActiveDocument paras 'Your code here Next To "walk" the paragraphs in a document "Story". Use para.Range.Information(wdWithinTable) to determine whether you're in a table. Look up "StoryRanges" and all related/linked in the VBA Help if you need to deal with anything besides the main body of the document (or look it up anyway, to get an understanding of what it means). -- Cindy -----Original Message----- From: Marc Hillman [mailto:7owsx1j02REMOVE@sneakemail.com] Posted At: 24 June 2006 15:35 Posted To: microsoft.public.word.vba.general Conversation: For each bit of document do ? Subject: Re: For each bit of document do ? I'm trying to check that certain elements appear in a certain order, for instance that every table is preceded or followed immediately by text of style "Caption". I feel I should be able to iterate through something and hit a table and then a paragraph (and check its style). It causes me to wonder, if I wanted to render a word document in some strange way (eg I wanted to write my own HTML exporter) how could you do it? I don't understand how I could find all the different pieces sequentially and export them. (Delete REMOVE from my e-mail to reply direct) Tag: attaching a document to email Tag: 87505
  - 6
    - Web formated calendar to unformated Word text Ops! Perhaps I should have posted this here instead of on 'microsoft.public.word.programming' (Not sure what the diff is) Reqd: a Word version of part of a calendar on a club website for those without web access The following pastes the copied section of the four column calendar Sub PasteUnformatedText() Selection.PasteAndFormat (wdFormatPlainText) End Sub but I now need to do something to make dates stand out A hanging indent is no good unless there were some way of identifying and changing the paragraph marks which do not precede the dates and changing them to manual line breaks Is there some way of identifying the dates and adding a second paragraph mark before them? A separate issue is to add a semi-colon between cells (the four columns are 'Date', 'Venue', 'Event/Name' and 'Info'. Without some break the line runs into one and does not read well If the date/time could be identified it could be emboldened - it is always dd.mm.yyyy hh:mm Here are a few lines of the unformatted text - any help you gan give will be much appreciated Francis Hookham Date Venue Event/Name Info 25.06.2006 10:15 Castle Camps Sunday Walk Sunday Walking Group - 4.5 mile walk from/to The Cock, Castle Camps, nr Haverhill Contact: Bernard Townshend 27.06.2006 13:00 University Arms Hotel Lunch meeting Lunch and The Cambridge Club's Presidential Handover followed by Stephen Kay, managing director Cambridge Water Company speaking about 'Developments at CWC' Host: Charles Hewitson Cashier: Robert Raywood Reception 1: Robert Ransom Reception 2: David Ridgeon 01.07.2006 Coventry RIBI handover RIBI Presidential handover in Coventry 02.07.2006 Cambridge District handover District 1080 Handover hosted by the Rotary Club of Cambridge at Wolfson College - Nigel Neville is due to become the District Governor Contact: FEC 04.07.2006 13:00 University Arms Hotel Lunch meeting Host: Paul Auton Cashier: Victor Bugg Reception 1: Francis Hookham Reception 2: Roger Asbury 04.07.2006 18:00 CUP Council meeting Council Meeting at CUP, Shaftesbury Rd Tag: attaching a document to email Tag: 87503
  - 7
    - For each bit of document do ? How can I go through a Word document sequentially, by paragraph, field, table, etc ? I'm looking for the construct Paragraph followed by Table followed by Paragraph. I can iterate through the paragraphs collection, or through the tables collection, but how do you iterate through all pieces in order ? Delete REMOVE from my e-mail address to reply direct. _______________________________________ Marc Hillman, Melbourne, Australia web: http://users.bigpond.net.au/mhillman/ Tag: attaching a document to email Tag: 87497
  - 8
    - File properties Hi folks I want to change the "Hyperlink Base" in the File -> Properties window programatically. How can I do this? I am using the word interop in C#, but information on how to do it in any other way would be great. Thanks Will Tag: attaching a document to email Tag: 87490
  - 9
    - How to find style separator code through VBA? In our company, we have a number of older documents that used hidden paragraph marks instead of style separators. The purpose of both is to separate headings from body text for easier generation of TOC. I am finding a number of documents that have a combination - hidden paragraphs marks & style separators - and it gets confusing to view these documents when hidden paragraph marks turned on (pagination will change). While my routine works, I do not like the fact that hidden paragraph marks & style separators do not appear to be distinguishable programatically; visually you can tell the difference because style separators have a light dotted frame around them. I was wondering if there is a way to distinguish the style separator from other codes. TIA, Mike Sub HiddenParaToStyleSep() Selection.HomeKey Unit:=wdStory ' Find hidden paragraph With Selection.Find .ClearFormatting .Text = "^p" .Font.Hidden = True .Forward = True While .Execute ' Replace hidden paragraph with auto color, unhide With Selection.Font .Hidden = False .Color = wdColorAutomatic End With ' Insert style separator Selection.InsertStyleSeparator Wend End With End Sub Tag: attaching a document to email Tag: 87486
  - 10
    - Reset Graphic Image I am using Word 2003 and am inserting a *.jpg file into the footer of a document. I'd like to "reset" the picture to it's original size because it is being scaled down to 93% because of the 1" margins. Thank you for your assistance. Tag: attaching a document to email Tag: 87485
  - 11
    - List of available Printers Hi, I am running Word 2000 on Windows XP Professional SP2. I have followed the recommendation to call the Windows API enumprinters as per example. However I am getting runtime error 9 subscript out of range. How can I resolve this? Thank You! Tag: attaching a document to email Tag: 87478
  - 12
    - Microsoft word window Tabs I would just like to suggest that you have each new word document open in a tab format like you have on the new IE7. The tabs should preferrably open at the bottom of the word interface and be approximately where the properties bar is (the bar that tell you the size and all the other info about something wehn you run the mouse over it). This would definately give you guys a edge over anything google is planning. Thank you. ---------------- This post is a suggestion for Microsoft, and Microsoft responds to the suggestions with the most votes. To vote for this suggestion, click the "I Agree" button in the message pane. If you do not see the button, follow this link to open the suggestion in the Microsoft Web-based Newsreader and then click "I Agree" in the message pane. http://www.microsoft.com/office/community/en-us/default.mspx?mid=a7992f03-df90-4362-a78a-58f31aa9b945&dg=microsoft.public.word.vba.general Tag: attaching a document to email Tag: 87477
  - 13
    - Identify a formula field I have code to delete bookmarks and unlink fields in a document once the document is completed, as follows: For Each Mark In .Bookmarks .Bookmarks(Mark).Delete Next Mark For Each Field In .Fields .Fields.Unlink Next Field End With I need to NOT unlink a field if it contains a formula, only unlink the field if it is a bookmark type field, but I don't know how to write this code. Thanks for any help. -- singeredel (Julie) Tag: attaching a document to email Tag: 87475
  - 14
    - attaching document to an email Hi I am attaching a doucment to an email using Options.SendMailAttach = True ActiveDocument.sendmail if I want to add the email address and a subject line, is this possible please? J Tag: attaching a document to email Tag: 87471
  - 15
    - Opening Access Database from Word Hello, I have Word 2003 and Access 2003. I'm trying to write VBA code to open a database from within Word. Can anyone explain why this code works (see below) ... Sub OpenDatabase() ' Opens the Northwind database Dim MyAccess As Object Set MyAccess = GetObject("C:\Program Files\Microsoft Office\OFFICE11\SAMPLES\Northwind.mdb", "Access.Application") End Sub And this code does not work (see below) ... Sub OpenDatabase() ' Opens the MyDatabase database Dim MyAccess As Object Set MyAccess = GetObject("C:\Program Files\Microsoft Office\OFFICE11\SAMPLES\MyDatabase.mdb", "Access.Application") End Sub My database named MyDatabase.mdb resides in the same path as the Northwind.mdb database so I can't figure out why this code won't work. Any assistance would be greatly appreciated. Tag: attaching a document to email Tag: 87466
  - 16
    - global variables for whole project not just when user form is runn Can anyone help me. I've got a template project with 2 user forms. Code has to stop running between using the two user forms to enable the user to add unique information and check statements created to that point, before calculating of each statement occurs. Then the user re-starts the programme, so I'm trying to find a way to retain the variable information contained in the first user form, to be utilised in code for the 2nd user form. I already know about declaring global variables within modules, but I'm talking about retaining variable input for the whole project, over all modules. Tag: attaching a document to email Tag: 87458
  - 17
    - Adding values in formfields I am trying to create a function that will add the values of 2 text boxes based on if the checkbox is true or false. I am using Word 2003 but it needs to work on Word 2000 also. If the checkbox is true then I want the value of Copy divided by Pages If False then I want the value of Copy times the value of Sheets. Currently: Copy, Pages, and Total are all textbox form fields If CheckBox1.Value = True Then ActiveDocument.FormFields("Total").Result = ActiveDocument.FormFields ("Copy" / "Pages") Else ActiveDocument.FormFields("Total").Result = ActiveDocument.FormFields("Copy" * "sheets") Endif Can this be done somehow? Would I have to use something other than textboxes? The users needs to be able to update the formfields with their data. Thanks for looking. Josh Tag: attaching a document to email Tag: 87455
  - 18
    - Version related issue Hi I am trying to pen a file generated by Word 2000 with Word 2003 and I get an error that file may be corrupted etc. This normally shouldn't happen because the Word can certainly read previous versions Additionally, the same program that was able to generate a document is not able to do that any more (this machine has Word 2003 installed and the program was compiled using Word 2000) Any suggestions will be appreciated, Samuel Tag: attaching a document to email Tag: 87438
  - 19
    - Macro Definition on other computers Hi All, I have a macro "TestData" which is created on my machine. I want this macro definition to be available in other machines where word application is installed. Basically other users who are using word documents need to have this macro definition on their computers. How can I port my macro on to their machines? Thanks, satya Tag: attaching a document to email Tag: 87437
  - 20
    - page How can i know the number of page in which i found a selection text? I have to copy from beginning till the page -1 of the currentpage. Tag: attaching a document to email Tag: 87435
  - 21
    - link text field from Word to Access field in database My boss has a Word table where she updates the status of each matter in our office on a regular basis. Although I have explained to her that I have an Access database where it would be more efficient to keep that data, she refuses to learn anything about Access or to do it any other way. Therefore, although it seems backward to me, is there a way to link the text field in Word to automatically insert itself into a particular field on my access database? Any help is appreciated. Thanks. -- S Tag: attaching a document to email Tag: 87434
  - 22
    - Deleting and Recreating a Numbered List I am attempting to create a technical document to consolidate UML use case diagrams within a document. This document has multiple sections, including a section which actors for the use cases are listed. In order to automate the document, I am attempting to protect the document from changes, except via a custom toolbar. The problem I have run into (probably the first of many) involves a simple numbered (outline) list of the Actors listed in the Use cases. When a new actor is added, I want to recreate the list and add the new Actor (or add the new Actor to the end of the existing list). I have inserted a bookmark at a section which will have a numbered list, named "ActorNames", and move the cursor there by calling: ActiveDocument.Bookmarks("ActorName").Select However, I need to be able to select the entire numbered list (if it exists, if not, create a new one), delete it, and recreate it when a new actor is added to the list. Any help would be appreciated. Tag: attaching a document to email Tag: 87431
  - 23
    - How to get Word Header String from within Excel VBA? I have a macro that pulls information from a word file but can't get to the Header string. In word2003, I can get the following vba command to pull the text from the header. The question is how to run this command from within Excel. Working Word VBA Command test = ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary).Range.Text Failed Excel VBA Command test = oWord.Sections(1).Headers(wdHeaderFooterPrimary).Range.Text Excel VBA Error: "Compile Error. Methood or data member not found." For reference, I've used the following other commands to run Word from Excel: Dim oWord As Word.Application Set oWord = GetObject(, "Word.Application") oWord.Selection.Find.ClearFormatting With oWord.Selection.Find .Text = "Product/DRD FAM" .Wrap = wdFindContinue End With oWord.Selection.Find.Execute 'Finds Start of EWO Body oWord.Selection.MoveRight Unit:=wdCell Thanks! Tag: attaching a document to email Tag: 87430
  - 24
    - How to pull Word Header string from Excel VBA? I have a macro that pulls information from a word file but can't get to the Header string. In word2003, I can get the following vba command to pull the text from the header. The question is how to run this command from within Excel. Working Word VBA Command test = ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary).Range.Text Failed Excel VBA Command test = oWord.Sections(1).Headers(wdHeaderFooterPrimary).Range.Text Excel VBA Error: "Compile Error. Methood or data member not found." For reference, I've used the following other commands to run Word from Excel: Dim oWord As Word.Application Set oWord = GetObject(, "Word.Application") oWord.Selection.Find.ClearFormatting With oWord.Selection.Find .Text = "Product/DRD FAM" .Wrap = wdFindContinue End With oWord.Selection.Find.Execute 'Finds Start of EWO Body oWord.Selection.MoveRight Unit:=wdCell Thanks! Tag: attaching a document to email Tag: 87429
  - 25
    - Change header StyleRef exec timing? You can use StyleRef fields in a header to detect, say, the first and last names on a page of regular text, but if you use the same header on a page containing endnotes, you get only error field results. This is odd because you can, for instance, use Find to search through endnote text. Why is it that StyleRef in a header fails to do essentially the same thing? Is there a way to force the interface to evaluate a StyleRef field in a header on a page containing endnotes? -- J. M. Unger East Asian Langs & Lits Ohio State Tag: attaching a document to email Tag: 87420

Hi, I am sorry for reposting, but i have lost original thread

I am attaching a doucment to an email using

Options.SendMailAttach = True
ActiveDocument.sendmail

i have been trying to use mailEnvelope to add the to: field and the Subject:
field. but cant get the correct syntax. Can someone help please

Thanks J

Top

Re: attaching a document to email by Doug

Doug
Wed Jun 28 13:21:55 CDT 2006

See the article "How to send an email from Word using VBA" at:

http://www.word.mvps.org/FAQs/InterDev/SendMail.htm

All SendMail does is open a message window into which you can manually enter
the email address.
--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

"John" <JG453@hotmail.com> wrote in message
news:ejghI8pmGHA.4064@TK2MSFTNGP02.phx.gbl...
> Hi, I am sorry for reposting, but i have lost original thread
>
> I am attaching a doucment to an email using
>
> Options.SendMailAttach = True
> ActiveDocument.sendmail
>
> i have been trying to use mailEnvelope to add the to: field and the
> Subject: field. but cant get the correct syntax. Can someone help please
>
> Thanks J
>
>

Top