Reading text at bookmark field

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - Set Word Options in VBA for Word 2007 I've created a macro to set Word Options to my needs in Word 2007. It includes most of the properties settings for Options object and some properties settings for Application & Window/View object. It runs VERY SLOW. I stepped through each line of codes and found half of the settings take several seconds to finish. The similar macro I created for Word 97/2000/2002/2003 run very smoothly, took just a second to finish all. I've noticed the message "conneting to printer .." shown on the status bar when the macro run and tried to turn off "Application.ScreenUpdating", no difference. Does any one know how to fix this problem? Thanks in advance. Tag: Reading text at bookmark field Tag: 100408
  - 2
    - Find the next blank line Hello from Steved I have a 6 paragraph then a blank line also i have paragraphs from 4 to 22 each with a blank line. Please how do I find the next blank line, Yes I've tried using wildcard but did not help me find the next blank line. Thankyou. Tag: Reading text at bookmark field Tag: 100402
  - 3
    - What is Eclipse Inventory Management & Financial Software? Interviewing with a Company that has the Eclipse Software. Where can I find this? Thanks. Tag: Reading text at bookmark field Tag: 100384
  - 4
    - deselect command in a macro I have created a macro for users to update all the fill-in fields in my document, but it puts me back in with the "WholeStory" still selected. AND the recorder will not let me click on the document, right click and toggle fields or any other way that I know how to deselect the material. This document is going out to the entire company of about 2000 poeple and I know a LOT of them are not computer savvy enough to do it themselves. SO, I want to know what the command is that I can put within the macro to deselect the WholeStory. I don't even know enough about Visual Basic to BE dangerous!!! Thanks! Audrey Tag: Reading text at bookmark field Tag: 100383
  - 5
    - Form field frustration I am having a couple of issues programmatically accessing form fields. I have assigned â??bookmarkâ?? names to these fields and here is how I can use VBA to see what has been entered in the field. Dim FieldText as string FieldText = Word.ActiveDocument.Bookmarks("LastName").Range.Text The problems : A) I cannot detect when the field is empty B) Empty fields have text value of 5 spaces, but return FALSE when compared to being equal to 5 spaces C) Trim seemingly has no effect, as â??trim(FormField)â?? still = FormField = 5 spaces D) Any attempt to erase the text in a form field by setting = â??â?? erases the form field, setting equal to 5 spaces also does not work. I need to be able to detect an empty form field, and be able to erase text in form fields. Any ideas? Tag: Reading text at bookmark field Tag: 100381
  - 6
    - Insert superscripted ordinal date - Word 2000 ?? Hi all :) I'm trying to create a macro that inserts the current date to replace the selected text (not as a field). ------------------ Selection.InsertDateTime DateTimeFormat:="dd MMMM yyyy", InsertAsField:= False, DateLanguage:=wdEnglishUK, CalendarType:=wdCalendarWestern, InsertAsFullWidth:=False ------------------ is easy enough and gives me the date as 18 May 2007 but I need to insert it as 18th May 2007 with the ordinal (st,nd,rd) in superscript. I think that it's something to do with \* ordinal but I can't for the life of me work out how the syntax goes. And I can't even begin to guess how to do the superscripting! Yes, I know it's a silly way of formatting a date - it wasn't my idea ;) Thanks all :) Tag: Reading text at bookmark field Tag: 100376
  - 7
    - PrintDate from Protected document doesn't work I have the following problem with PrintDate which appears only in Word 2000 In Word 2003 everything works OK. My users unfortunately use Word 2000 (9.0.4402 SR-1) 1) Users demand is that the footer contains PrintDate field 2) Second demand is that when approved, document is protected against writing with password . I protect document programmatically with following code Const wdAllowOnlyComments=1 WordObj.ActiveDocument.Protect wdAllowOnlyComments, False, "PASSWORD" 3) PROBLEM IS FOLLOWING: After protecting the document, PrintDate, after document has been printed out, doesnâ??t work any more It is empty = 00.00.00000. I also found out that the same problem with PrintDate appears also if I do everything manually in Word so probably this is a Bug or something. Can someone give me an advice what to do that PrintDate will work in Word 2000 (9.0.4402 SR-1). Maybe there is fix for this or some workaround? Thank you Lojze Tag: Reading text at bookmark field Tag: 100373
  - 8
    - How to remove italic formatting I'm obviously a bloody beginner in Word. I have some text, some of it formatted in the (italic) character style "Emphasis", some of it with "italic" applied as manual formatting. I want to have all the text formatted "not italic". Selection.Font.Italic=False does not work. Am I overlooking an obvious, simple solution, or do I have to write some elaborate code, just to remove the italic formatting? Regards, Klaus Tag: Reading text at bookmark field Tag: 100359
  - 9
    - Excel running Word macro I have a complicated macro which does several things to a series of imported htm files, however it is not working as expected. An excel macro produces a list of htm files within a directory and outputs it to sheet1 and then one by one uses this as a parameter to start a word macro (ww has been defined as the word application object) ww.Documents.Open ThisWorkbook.Path & "\datastage1.doc" runnow = ww.Run("stage1", file) This runs the macro stage1 in the word document datastage1.doc using the file stored in variable "file". Sub stage1(myfile As String) file = myfile folderpath = ActiveDocument.Path & "\inputhtm\" Documents.Open FileName:=folderpath & file This word macro then opens the file and is meant to remove all occurences of a two line text fragment using a word (XXPAEDT) to find the first of those lines: 'DELETE UNWANTED LINES Selection.HomeKey Unit:=wdStory Selection.Find.ClearFormatting With Selection.Find Do While .Execute(FindText:="XXPAEDT", Wrap:=wdFindContinue, Forward:=True) = True Selection.EndKey Unit:=wdLine, Extend:=wdExtend Selection.MoveDown Unit:=wdLine, Count:=1, Extend:=wdExtend Selection.Delete Unit:=wdCharacter, Count:=1 Loop End With This does not work and the lines are not removed, yet if i open the document manualy and then use the macro after removing the above section that opens the htm file (so it starts with the remove unwanted lines comment) it works perfectly!!! Any ideas as to why the different behaviour if the file is opened manually by the user or automatically by the macro Thanks Richard Tag: Reading text at bookmark field Tag: 100349
  - 10
    - Date + 1 Month Hi there, I'm pretty new so bear with me. I have a word document ask a user what a certain date is. Let's call it "DATE A". This date is inserted into the first row of a table. I need to add 1 Month to this date in the next row. 2 Months to this date in the row below, etc. I.E. Let's assume DATE A is January 01, 2007. I need the next date in the table to be Febuary 01, 2007, then March 01, 2007 etc. Any clue on how I would do this? I've looked everywhere, and every thing seems to be a little over my head. Much appreciated. :) Kevin Tag: Reading text at bookmark field Tag: 100332
  - 11
    - Code for Adding Custom Document Property I have revised an existing template to contain a new custom doc property. Since old documents (not containing the new property) will sometimes be attaching to the template, I need to add code that checks the attached document for the existence of the property & if it's not there, create it. I know the code I need to use to add the custom document property(ActiveDocument.CustomDocumentProperties.Add ...) , but I don't know the best way to check for the property & tell it to execute the code if the property is missing. Also ... I read in another email thread that it may not be a good idea to create the customdocument property with ActiveDocument since the property exists in the template but not in the open doc. If the property existing in the template but not in the active document creates a conflict, then what should I use instead to create it? Thanks for your help. -- JoAnn Tag: Reading text at bookmark field Tag: 100331
  - 12
    - Detect if word document is open How can I detect if a word document is open and if it is open how can i do modification from MS access with VBA? Thanks for any suggestion Jose Tag: Reading text at bookmark field Tag: 100329
  - 13
    - Using arrays in a userform I have an Excel file which is a database of names and addresses. It consists of 16 columns of data and 20 rows for each office. In my Word template I have a userform with, among other things, a dropdown list and two command buttons. One button Retrieves the first nine fields in the database and displays these on the form for the user to check the correct details have been selected based on the dropdown list. I have no problems with this part. On retrieval, Fields 10 to 16 are put into an array variant, like this: VarData(0) = rs.Fields(9).Value VarData(1) = rs.Fields(10).Value VarData(2) = rs.Fields(11).Value VarData(3) = rs.Fields(12).Value VarData(4) = rs.Fields(13).Value VarData(5) = rs.Fields(14).Value VarData(6) = rs.Fields(15).Value I have checked and each element of the array is holding its correct information. What I don't know how to do is to pass the data that was in the array under the "Retrieve" button so that it can be put on the paper when I press the "OK" button. Each piece of the array would be concatenated with a vbCr prior to going on the page. Also, if there was no data (Null) in the last field then I would discard it from the operation. Can anyone help, please? Roderick Tag: Reading text at bookmark field Tag: 100326
  - 14
    - Userform is no longer invoked Hi: I am having a problem with a userform that is no longer invoked once the custum button is pressed. What it is call up a template with the userform to enter specific fields and then print two copies. What did I do to cause this issue? Thanks, -- Jo Tag: Reading text at bookmark field Tag: 100322
  - 15
    - closeing only active document Hi. how to write macro for closing only active document not all the word application? in F1 help I found st. like : ActiveDocument.Close SaveChanges:=wdPromptToSaveChanges but when user is asked whether he wants to save changes or not there is also possibility to cancel and when this is done document is not closed. I would like to manage to close active document without possibolity for cancelling (just save or not). regards Peter. Tag: Reading text at bookmark field Tag: 100317
  - 16
    - Re: find last modified file in .file.search Use msoSortOrderDescending instead of msoSortOrderAscending in FileSeach.Execute() -- Krgrds, Perry System: Vista/Office Ultimate VS2005/VSTO2005 SE "Perry" <drumper@gmail.com> schreef in bericht news:... > Don't know what the With Selection/End With block is doing in yr code. > Remove this for the time being. > > As to the searchresults: > > Expand below code example to match yr situation. > Note: the results can be found in the .FoundFiles() array. > The first member in this array will be the full filename of targetfile you > requested against the .Execute() parameters you used. > > Use that one to open your file... > > With Application.FileSearch > .NewSearch > .LookIn = strPath > .SearchSubFolders = False > .FileName = "*.csv" > .Execute (msoSortByLastModified, msoSortOrderAscending) > If .found then > Msgbox .FoundFiles(1) > end if > End With > > -- > Krgrds, > Perry > > System: > Vista/Office Ultimate > VS2005/VSTO2005 SE > > > > "muyBN" <muyBN@discussions.microsoft.com> schreef in bericht > news:6B3C5BA7-C9C5-4F69-8DDB-E270F5BDBF22@microsoft.com... >> In the following code, I need to open the file which has been modified >> last >> but don't quite know how to write it. Your assistance in this will be >> appreciated. >> >> >> strPath = "C:\Data\misc\0PackIt\" >> strFirstFile = ActiveDocument.name >> With Selection >> With Application.FileSearch >> .NewSearch >> .LookIn = strPath >> .SearchSubFolders = False >> .FileName = "*.csv" >> .Execute (msoSortByLastModified) >> intFiles = .FoundFiles.count >> If .Execute(msoSortOrderAscending) > 0 Then >> strFile '= last modifed file >> End If >> End With >> End With >> Documents.Open (strPath & "\" & strFile), AddToRecentFiles:=True, >> Format:=11 >> >> -- >> Bryan > Tag: Reading text at bookmark field Tag: 100316
  - 17
    - how to reference/open last file modified In the following code, I want to search for and open the most recent file modified, but don't know how to write that particular line. Assistance will be appreciated. Thanks. strPath = [path name] strFirstFile = ActiveDocument.name With Selection With Application.FileSearch .NewSearch .LookIn = strPath .SearchSubFolders = False .FileName = "*.csv" .Execute (msoSortByLastModified) intFiles = .FoundFiles.count If .Execute(msoSortByLastModified, msoSortOrderAscending) > 0 Then strFile = [last modifed file] End If End With End With Documents.Open (strPath & "\" & strFile), AddToRecentFiles:=True, Format:=11 -- Bryan Tag: Reading text at bookmark field Tag: 100313
  - 18
    - find last modified file in .file.search In the following code, I need to open the file which has been modified last but don't quite know how to write it. Your assistance in this will be appreciated. strPath = "C:\Data\misc\0PackIt\" strFirstFile = ActiveDocument.name With Selection With Application.FileSearch .NewSearch .LookIn = strPath .SearchSubFolders = False .FileName = "*.csv" .Execute (msoSortByLastModified) intFiles = .FoundFiles.count If .Execute(msoSortOrderAscending) > 0 Then strFile '= last modifed file End If End With End With Documents.Open (strPath & "\" & strFile), AddToRecentFiles:=True, Format:=11 -- Bryan Tag: Reading text at bookmark field Tag: 100312
  - 19
    - Error running Word 2007 Macro- macros disabled I get the error "Macros in this project are disabled" when trying to run a macro. I looked around and went into the Trust Center and set it to allow all macros. It still gives me the same message even after setting that to allow all and restarting word. Any ideas? This was a Word 2003 doc if that makes any difference. Tag: Reading text at bookmark field Tag: 100308
  - 20
    - Auto Clear Picture from Clipboard After I copy paste a picture to a word document, save it and close it, it asks "You placed a picture on the clipboard. Do you want this picture to be available to other applications after you quit word?" and has 3 options for me "yes" , "No" , "Cancel" . How do I make sure it always selects "No"? All help is appreciated. Tag: Reading text at bookmark field Tag: 100305
  - 21
    - Word 2003 I would like to combine 2 pre-installed macros in one macrobutton expression without creating a new macro or editing an existing one. Can I somehow include 2 macros in 1 macrobutton? Tag: Reading text at bookmark field Tag: 100291
  - 22
    - Is range in a field? Is there a way to test whether a Range (or Selection) is in a Field, and if so, to access that field? Tag: Reading text at bookmark field Tag: 100288
  - 23
    - PUTTING A TICK IN A FORM Please help I'm going insane. I want to eaither change the check box form field into a a= ctual tick or get the macro (which is basic) to work in my form. It keeps coming up with a= run time error 4605. Heres the VB for the tick Sub TICK() ' ' TICK Macro ' Macro recorded 2/16/2007 by Megan Dixon ' Selection.TypeText Text:=3D"=C3=BC" Selection.Font.Name =3D "Wingdings" Selection.MoveLeft Unit:=3DwdWord, Count:=3D1, Extend:=3DwdExtend Selection.Font.Name =3D "Wingdings" End Sub Thanks Tag: Reading text at bookmark field Tag: 100283
  - 24
    - Splitting a line of text at commas I have an Excel database and my Word template retrieves data from it quite successfully. One of the lines of data it retrieves is an address, each part of it separated by commas e.g: address1, address2, address3, and so on... For historical reasons, the one line address must remain as it is in the Excel database file. My client has now asked me if I can split that line at each comma and put each component on a separate line. I'm sure it can be done but would not know where to start. Is there a solution, please? Roderick Tag: Reading text at bookmark field Tag: 100280
  - 25
    - Selecting a table in a footer I'm trying to adapt the following code to find out if there is a table in any of the footers: kJunk = ActiveDocument.Sections(1).Footers(1).Range.StoryType 'Iterate through all story types in the current document For Each kStory In ActiveDocument.StoryRanges 'Iterate through all linked stories Do On Error Resume Next Select Case kStory.StoryType Case wdEvenPagesFooterStory, wdFirstPageFooterStory, wdPrimaryFooterStory * * Pseudo-code: If there are any tables in this story then select the third cell in the first row * Next End If Case Else 'Do Nothing End Select On Error GoTo 0 'Get next linked story (if any) Set kStory = kStory.NextStoryRange Loop Until kStory Is Nothing Next Can anyone help with this please? Roderick Tag: Reading text at bookmark field Tag: 100279
- Next
  - 1
    - Word-2003 VBA winword.exe is running under 'processes' but not ope winword.exe is running under 'processes' but not open under application hi, to close the application from VBA i am using the command Application.Quit wdDoNotSaveChanges the application closes, in the application tab of task manager, nothing is there but when i open processes in task manager i can see that the WINWORD.EXE is still running. why winword is still running. it happnes some time not all the time. please suggest how to overcome this problem. The machine in which i am running it contains two processor. let me know if any more information needed. Tag: Reading text at bookmark field Tag: 100276
  - 2
    - Endless loop if macro tries to process text in a table cell, otherwise running fine. Below macro which I recently wrote is supposed to COPY all the text that has been placed between brackets TO the end of the document and list them one below the other. It is running fine with one exception. If text between brackets is found in a table cell, the macro falls into an endless loop. In theses cases, it copies the text between the brackets over and over again and won't stop. Hence, how do I have to re-write this code so that text between brackets located in a table cell is also properly copied and put at the end of the document. Help is appreciated. Thank you very much in advance. Regards, Andreas Dim rng As Range Dim rngEnd As Long Set rng = ActiveDocument.Range rngEnd = ActiveDocument.Range.End With rng.Find .Text = "\([!\)]@\)" .MatchWildcards = True Do While .Execute() rng.Copy ActiveDocument.Bookmarks("\EndOfDoc").Range.Paste ActiveDocument.Bookmarks("\EndOfDoc").Range.InsertAfter vbCr rng.Collapse wdCollapseEnd rng.End = rngEnd Loop End With End Sub Tag: Reading text at bookmark field Tag: 100270
  - 3
    - More help with specific page printing I have a macro set up whereby users are presented with a user form which gives them the choice of printing all pages, current page or first page OR inserting into a text box which pages they wish to print. The form also has a combo box for selecting/inserting the number of copies they wish to print. Here is the code for the cmdOK button of the form dim Specific Pages as String dim NumberCopies as String SpecificPages = txtSpecPages.value (the name of the text box) NumberCopies = cboNumCopies.value (the name of the combo box) If SpecificPages <> "" Then ActiveDocument.PrintOut Range:=wdPrintRangeOfPages, Pages:=SpecificPages, Copies:=NumberCopies ElseIf OptA = True Then (the option button for printing all pages) ActiveDocument.PrintOut Copies:=NumberCopies ElseIf OptC = True Then (the option button for printing the current page) ActiveDocument.PrintOut Range:=wdPrintCurrentPage, Copies:=NumberCopies ElseIf OptF = True Then (the option button for printing the first page) Selection.HomeKey Unit:=wdStory ActiveDocument.PrintOut Range:=wdPrintCurrentPage, Copies:=NumberCopies End If What happens is the following: If specific pages is filled in - prints all pages and prints one copy regardless of how many copies are asked for If Print All - prints all pages (which is OK) but only prints one copy regardless of how many copies are asked for Print Current - prints all pages and only prints one copy regardless of how many copies are asked for Print First - prints all pages and only prints one copy regardless of how may copies are asked for What am I doing wrong???? The printer I am printing to is set up to print duplex at all times, does this conflict with the printing request? I would have thought that it would still print the pages you asked for as duplex. thanks, Tag: Reading text at bookmark field Tag: 100269
  - 4
    - ShapeRange gives error Can anyone tell me why the statement i = Selection.Range.ShapeRange.Count gives error message 5852 if there are no shapes in the selection but works if there are one or more shapes. I can work around the problem using error trapping but it is messy. I am using Word2000 VBA Tag: Reading text at bookmark field Tag: 100262
  - 5
    - Populating & updating Word document from database I am looking for the best solution to meet the needs for a future development project. I think the new Word smart document might be the answer, but I'm not sure of its capabilities. What I need is as follows: My end users frequently create data-intesive proposal documents. The documents are a combination of a standard proposal template of text that they edit/customize for each specific proposal, and inserting data from another application, generally in the form of tables. The data from the application is always grouped together in a set number of tables, say Table A, Table B, and Table C. I would like the end user to be able to open a word document template, choose which tables to insert and where to insert in the document, and be able to modify the formatting of the tables (not the values in the table). Since the end user continues to update the data in the application while developing the proposal in Word, the user needs the ability to automatically update the table values from the application, without overriding any formatting changes that were made to the table. Is this possible? Am I on the right track with smart documents? I am not really a technical person, but am trying to do the initial research on what technology my development staff should use. Any help or advice would be appreciated! Thanks! Tag: Reading text at bookmark field Tag: 100256
  - 6
    - Hide screen while Macro is working I have a template with 16 different forms. There are 16 buttons and when the user double clicks on a button, all other forms are cut leaving only the form they need. This works very well but the flashing screen is annoying. Is there a way not to hide this macro working screen? DJK Tag: Reading text at bookmark field Tag: 100244
  - 7
    - idioms dictinnary I had to recovery the lap system and when i installed microsoft office 2003 i didnt get the idiom dictionary. How can i install it? ty -- XAC Tag: Reading text at bookmark field Tag: 100243
  - 8
    - Textbox.Value to Double won't work Hi, I have a form with a textbox where you can put in a number (or somthing else). I want to convert the textboxvalue to a double. I use somthing like this but it won't work. on error resume next LocalDbl = CDbl(StupidTextBox.Value) if err.Number = not 0 then LocalDbl = 0 ... The types doen't match. I don't understand what I'm doeing wrong. Please give me a hint. Thanks, Marc From Belgium Tag: Reading text at bookmark field Tag: 100241
  - 9
    - Can't edit custom toolbar There is a problem : I have custom toolbar that is situated in a separate .dot file . .dot file is situated in "%CURRENT_USER%\Application Data\Microsoft\Word\STARTUP\" folder and loads on startup. Problem is that I can't edit any prefferences of this custom toolbar (add or delete buttons or change toolbar name or change buttons icon). All other toolbars are editable. Can you give some piece of advice or suggestion of what can be the cause of this behaviour. Tag: Reading text at bookmark field Tag: 100240
  - 10
    - Adjusting the Microsoft Graph colour palette from within Word VBA I'm having trouble setting the colour palette of a Microsoft Graph chart from within VBA. I can create the chart and adjust all the properties and everything, but I want to modify the palette in the chart so the bottom two rows of the palette (default colours for fills and lines) are my own custom colours. I've got the macro, and there aren't any runtime errors, but the palette just doesn't change! I've followed help as much as I can. Has anybody come across this, or have any suggestions. It's driving me crazy! Here's the code I'm using to add the chart and set the colour on the palette: Set oShape = Selection.InlineShapes.AddOLEObject (ClassType:="MSGraph.Chart.8", FileName:="", LinkToFile:=False, DisplayAsIcon:=False) Set oGraph = oShape.OLEFormat.Object With oGraph .Colors(17) = RGB(255, 0, 0) End With Tag: Reading text at bookmark field Tag: 100239
  - 11
    - Delete first page I am replacing the first page of my old document with the first page of our new template. My macro below is not working right. It deletes the old footers and the old first page but it inserts all the pages of the new template. I tried putting a bookmark at the end of the first page of the new template and in my range put in the bookmark so it read as follows but that did not work. I tried the bookmark on both sides of the page break with no success. What am I doing wrong? objRange.InsertFile FileName:="C:\Procedure Master2.dot", _ Range:="bkpg1", ConfirmConversions:=False, Link:=False, _ Attachment:=False The other problem Iâ??m having is on some of the computers here at work when I try to run this macro I get the following run-time error: â??5941â?? The requested member of the collection does not exist. When I run debug it on the following line: Selection.Bookmarks("\Page").Range.Delete When I run this macro on my computer here at work or at home I never get this error. Here is my macro: Dim objSection As Section Dim objRange As Range Dim objHeaderFooter As HeaderFooter ' Delete all footers from each section For Each objSection In ActiveDocument.Sections For Each objHeaderFooter In objSection.Footers objHeaderFooter.Range.Delete Next objHeaderFooter Next objSection ' Create a range for the start of the document Selection.Bookmarks("\Page").Range.Delete Set objRange = ActiveDocument.Range objRange.End = objRange.Start objRange.InsertFile FileName:="C:\Master2.dot", _ Range:="", ConfirmConversions:=False, Link:=False, _ Attachment:=False Tag: Reading text at bookmark field Tag: 100233
  - 12
    - Paste unformatted text with red text Hello, I'm looking to create a macro to paste whatever it is in the clipboard with unformatted text with red font color. How can this be accomplished? Thanks so much! -- Smile...it is good for you! :) Tag: Reading text at bookmark field Tag: 100226
  - 13
    - Button to email a user form. Ok, I'm having a terrible time doing this. Nothing is working like I need. I have a few text box fields to be filled out and a simple button at the bottom of the page to click on and have the document emailed to one email address. The code I have dug up here is using a routing slip or something and every time I send the form, it attaches another email address to the TO: field. Now I have like 12 of the same address all listed each time I send a new email using this form. Here's the code. Private Sub CommandButton1_Click() ActiveDocument.HasRoutingSlip = True With ActiveDocument.RoutingSlip .Subject = "New subject goes here" .AddRecipient "Firstaddress@Mail.com" .Delivery = wdAllAtOnce End With ActiveDocument.Route End Sub The form can be mailed as an attachment, I'm just having a hell of a time getting what seems to be a simple task to work properly. Thanks in advance. Mike Tag: Reading text at bookmark field Tag: 100220
  - 14
    - Is it possible to apply conditional formatting in a Word doc? I am trying to do a mail merge that would include some fields that might not apply on some of the letters. Is there a way to conditionally format the text as I can in Access to leave that area blank if there is no supporting data? Tag: Reading text at bookmark field Tag: 100218
  - 15
    - Auto Date Change Hi, I have a table in Word and I would like one column (C) to show the time the section to its left (A &B) was last updated. So if someone made a change something in Cell 1 , Col A , I would like it to say in Col C : 5/14/2007 automatically. I know how to do this in Excel but i'm completely lost how to accomplish in this in Word. Thank you to anyone that helps. Ben Z. Tag: Reading text at bookmark field Tag: 100215
  - 16
    - Word 2000 fails to open Windows XP SP2, IE 7 with OE 6, Microsoft Works Suite 2000 with Word 2000. I have successfully used Word 2000 from the date of purchase until the recent round of Microsoft's Security Updates (10 May 2007). In fact I successfully produced a letter just prior to updating. Since the updates Word begins to open (gets to the typing page) and then closes with the option to send a defect report to MS. I have used System Restore to return to a date just prior to the Security Updates; No change in the defect symptoms. I have un-installed and re-installed Word; No change in the defect symptoms. Can anyone help me out of this predicament? Derek Tag: Reading text at bookmark field Tag: 100214
  - 17
    - Get web page object through Word VBA? Is it possible in a Word 2003 macro to set objects to the the IE application and the current web page? I'd like to check a checkbox and activate the NextPage link (as long as there's a next page to go to). I found some references to scripts that can do this, but I can't figure them out. I can't find an InternetExplorer library to reference in the VBE. Any help is greatly appreciated. Ed Tag: Reading text at bookmark field Tag: 100212
  - 18
    - How to start Word without templates through VB 6.0 Hi, I am using Word 2003 Visual Basic 6.0. I want to open Word in my VB code without loading the templates (similar to winword/a from command line) I'm using Cretaeobject("Word.Application"). I would like to load Word application without loading the default templates and assign it to an Object variable. Her's my current code Private m_app As Object Set m_app = CreateObject("Word.Application") Or How can I start Word using VB 6.0 without loading templates? Can someone help me on this? Thanks. Tag: Reading text at bookmark field Tag: 100209
  - 19
    - Opening Word without loading templates through VBA Hi, I am using Word 2003. I want to open Word in my VBA code without loading the templates (similar to winword/a from command line) I'm using Cretaeobject("Word.Application"). I would like to load Word application without loading the default templates and assign it to an Object variable. Her's my current code Private m_app As Object Set m_app = CreateObject("Word.Application") Can someone help me on this? Thanks. Tag: Reading text at bookmark field Tag: 100208
  - 20
    - AcceptAllChangesInDoc Hi All, I'm not sure if it's the rite to post my question. Try by luck. I used to write program by VBA. This time, I need to write a program by VB Express that do similar as VBA. I need a program that open a particular Doc files and accpet all change for track change. It can be done by VBA using : WordBasic.AcceptAllChangesInDoc And in VB Express, U can create a word object By: Dim objWord As Word.Application objWord = New Word.Application Open and file: objWord.Documents.Open(strDocFile) Access the activedocument by objword.activedocuemnt... <--- Do whatever u what, just like VBA However, I can access the "WordBasic.AcceptAllChangesInDoc" Because, there is no AcceptAllChangesInDoc in wordbasic. Do any1 have an idea about this Many Thanks Tag: Reading text at bookmark field Tag: 100205
  - 21
    - How do I create a button to reset a form document? Hello! I've created a form document that will be used to fill out some text fields and then emailed. I think I've figureed out how to make the command button send the document as an attachment. My next task is to create a second button to reset all the fields to blank so it can be used again with out re-opening the document. Any ideas on how to do this? I also thought of another question... Whats the code to add text to the message body of the email? Example: "This email containes an attachment for a new client." Thanks in advance. Mike Tag: Reading text at bookmark field Tag: 100202
  - 22
    - Printing Autotext I have a template called "autotext.dot" which has 150 odd autotext entries saved within it. As we do not use global normal.dot, we have to copy the autotext from autotext.dot to our normal.dot. What I need to do is print all of the autotext with the autotext name then the actual autotext underneath so that people have a hard copy of the autotext that can be used. I don't want to have to manually do this. Any ideas? Tag: Reading text at bookmark field Tag: 100201
  - 23
    - Mail Merge relative reference to data source Hi I've been trying to find out over the last few days how exactly create/ fake a relative reference (as opposed to an absolute eg C:\blah\blah \blah) to an Excel spreadsheet I'm using as a data source. It sounds possible from some things I've read online, and I think I understand the theory but unfortunately I'm not proficient in VBA to do it, and nobody has posted the code anywhere (and as this is the only vb I'll be touching it's not worth learning the whole caboodle). It sounds like you have to create an AutoOpen macro (that kicks in on opening the doc) that changes the path of the MailMerge datasource to a combination of the file path of the word document and the file name chosen for the spreadsheet. I cobbled together some code that looked ok, and it seemed to work... but only once. on moving the duplicate folder it reverted to referring to the original again. I'm sure the code must be simple but I'm not having any luck would appreciate some help. typically the project somewhat relies on me finding a fix for this and will be seriously hampered without one! thanks in advance Chris Tag: Reading text at bookmark field Tag: 100198
  - 24
    - In-line shapes - Odd macro behaviour The situation is as follows: I have a document with quite a few sections. In the footer of each section is a table of one row and three columns. The last cell on the right of each table holds a small logo. This logo is an in-line shape Users might need to remove this logo at any time. I have adapted a macro from the Word MVP site (thanks to Doug Robbins et al) and is listed below. It does the job for which it is intended but I have a great feeling that it is not correctly written. Especially so, as at the bottom I've had to use some "sticky tape and string" tp stop the active view from going into split normal view (this is separated by ======= marks. The code: Public Sub DeleteSmallGreenLogos() Dim kStory As Word.Range Dim kJunk As Long Dim kShp As InlineShape 'Fix the skipped blank Header/Footer problem kJunk = ActiveDocument.Sections(1).Footers(1).Range.StoryType 'Iterate through all story types in the current document For Each kStory In ActiveDocument.StoryRanges 'Iterate through all linked stories Do On Error Resume Next Select Case kStory.StoryType Case wdEvenPagesFooterStory, wdFirstPageFooterStory, wdPrimaryFooterStory If kStory.InlineShapes.Count > 0 Then For Each kShp In kStory.InlineShapes If kShp.Height > CentimetersToPoints(1) And kShp.Height < CentimetersToPoints(1.1) Then If kShp.Width > CentimetersToPoints(2.6) And kShp.Width < CentimetersToPoints(2.7) Then kShp.Select kShp.Delete End If End If Next End If Case Else 'Do Nothing End Select On Error GoTo 0 'Get next linked story (if any) Set kStory = kStory.NextStoryRange Loop Until kStory Is Nothing Next ================================ If ActiveWindow.View.SplitSpecial = wdPaneNone Then ActiveWindow.ActivePane.View.Type = wdPrintView Else ActiveWindow.View.Type = wdPrintView End If ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument If ActiveWindow.View.SplitSpecial = wdPaneNone Then ActiveWindow.ActivePane.View.Type = wdPrintView Else ActiveWindow.View.Type = wdPrintView End If ================================ End Sub Can anyone advise, please? Roderick Tag: Reading text at bookmark field Tag: 100197
  - 25
    - Using the cancel button to end a macro I read that the inputbox does not have a cancel button? However, when I use an inputbox, it has a cancel button on it. My question is, how do I exit a macro if cancel is pressed? -- Hth Kassie Kasselman Change xxx to hotmail Tag: Reading text at bookmark field Tag: 100194

Hi All,

Bascially i have a bookmark "Claim_No", i want to be able read the data that
has been entered against it. I have had one of those days and i know it is
simple, but i just can't seem to remember how to do it.

Can someone please show me an example so that i can store it again in the
memorybank.

TIA

Justin

Top

RE: Reading text at bookmark field by lf

lf
Sat May 19 06:34:06 CDT 2007

The following will return the text within the bookmark named "Claim_No":
activedocument.Bookmarks("Claim_No").Range.Text

--
Regards
Lene Fredborg
DocTools - Denmark
www.thedoctools.com
Document automation - add-ins, macros and templates for Microsoft Word

"Justin" wrote:

> Hi All,
>
> Bascially i have a bookmark "Claim_No", i want to be able read the data that
> has been entered against it. I have had one of those days and i know it is
> simple, but i just can't seem to remember how to do it.
>
> Can someone please show me an example so that i can store it again in the
> memorybank.
>
> TIA
>
> Justin

Top

RE: Reading text at bookmark field by Justin

Justin
Sun May 20 19:43:00 CDT 2007

Hi Lene,

Excellent - thank you for quick responce.

As soon as i read it the penny dropped again.

Regards

Justin

"Lene Fredborg" wrote:

> The following will return the text within the bookmark named "Claim_No":
> activedocument.Bookmarks("Claim_No").Range.Text
>
> --
> Regards
> Lene Fredborg
> DocTools - Denmark
> www.thedoctools.com
> Document automation - add-ins, macros and templates for Microsoft Word
>
>
> "Justin" wrote:
>
> > Hi All,
> >
> > Bascially i have a bookmark "Claim_No", i want to be able read the data that
> > has been entered against it. I have had one of those days and i know it is
> > simple, but i just can't seem to remember how to do it.
> >
> > Can someone please show me an example so that i can store it again in the
> > memorybank.
> >
> > TIA
> >
> > Justin

Top