A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - Feasability of using VBA for project? Hi! I have been asked to produce a solution for a business. At present I have limited knowledge of VBA and macros. I was wondering if someone might be able to advise me whether what I'm wanting to achieve is possible and perhaps direct me to the best sources of information? Is it possible: 1. For a form to appear in Word, user chooses options, then pages/tables/text can be inserted into the current document from other word documents according to what the user has chosen? 2. To have validation checks on word VBA forms? 3. For command buttons to exist on word documents (eg, to launch forms) which don't show up when printed? Would info on how to achieve this be possible to find on the internet or would I need to invest in an appropriate book on the subject? Any advise much appreciated, Ben Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70197
  - 2
    - Header Disappear after i remove 2nd page Header disappear after i remove 2nd page. whereby 2nd page header is set to Different from fist page? Is Word bug or limitation or ....? Is it possible to make it stay in vba? Hope some one can help. Thanks alot. -- Message posted via http://www.officekb.com Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70187
  - 3
    - Routine to simulate keystrokes passing from keyboard Is there a VBA routine that would allow me to pass keystrokes into an active document -- as if they had been entered by a user? I'm trying to create a routine that creates (automatically) a PDF copy of the currently active document. The goal is to produce a PDF image of the active document that (1) bears the filename of the active document (without the ".doc", of course) and (2) is written in the currently active document's folder - just by having the user invoke a hotkey or press a custom button on the button bar. My problem is getting VBA to pass the current document's name into the PDF-creation system's dialog box. I can't find a PDF creation system (at least one that I can afford) that will let me pass the document name to it as an argument. So I propose to "brute force" around this by simply sending the same keystrokes a user would type into the dialog box as if they were generated from the keyboard. I know. This is old-fashioned DOS macro programming.... I'll let you laugh at me if you can tell me how to get VBA to do the same thing [grin]! Rick Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70177
  - 4
    - What is the VBA for protecting a document We have created a document thatputs in demographics automatically. In order to make this work, the document cannot be protected. After the demographics are fed in, I need to protect the document to make the rest of the form usable to our staff. I would like to enter VBA code into an autoopen macro that already feeds the demographics into the doc. My boss does not want staff to be able to touch anything but the fields. Thanks for any assistance. Patti Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70174
  - 5
    - create custom toolbar to open personal templates How do I : Create a macro that will create a new file based on a personal template (not like one that will simply open the .dot file)? Add these macros to my personal toolbar? Thanks! Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70173
  - 6
    - create a combo box I am having a lot of trouble. I have a word doc that is created with tables. I am trying to add a combo box which holds names of people. When the user selects a certain name I want it to display a certain picture....their signature. I have been playing around with this for house and i still can not get it. Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70170
  - 7
    - Word takes 30 or more seconds to open Words takes 30 or more seconds to open. First it gives a "Document in use Dialogue Box" "the Preparing to Install" and it seems to be searching and will eventually open, sometimes after a minute!! It ismost frustrating. Copy & Paste used to give me the same message, however, Tech Support fixed that. But this they cannot fix. It is making me crazy. HELP HELP Thank you. Awong Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70169
  - 8
    - Building a date field on a form I would like to make a form field that holds a date. I would like the format to be mm/dd/yyyy. When you tab into the field, I would like a response box to ask "today" yes or no. If the answer is yes, I would like the field filled with today?s date in the format above. If no, I would like a calendar to appear and the date can be chosen form the calendar. The chosen date will go in the field in the format above. once filed in, the macro will tab to the next field and exit. Can anybody help with any of this or am I hoping for to much? Regards to all, Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70162
  - 9
    - Wizard for Documentation that works with ReqPro. I am a technical writer supporting around 20 software engineers, each of whom write their own series of tests. How can I write a wizard that will assist them in laying out their documentation in a standard fashion? Having a template, alone, did not seem to do the job. As an aside, we recently started using Rational Requisite Pro for Test Requirements Traceability. I don't know how that will come into play with the wizard. Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70144
  - 10
    - Append Documents I am trying to appending word documents that are in memory, that are not on the file system. I have seen the examples of appending multiple files that reside on the file system, but that is not what I am trying to do. I will receive a collection of word files and I need to append them together into a master document without having to write each one to the file system. The other issue that I will have is that each document will have different headers and footers. Can this been doen without too much hassel? Thanks for any input Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70142
  - 11
    - Creating a table from an Access Query How can I go about creating a table in a Word Document at a specific place from a query. The number of rows will vary based on how many records were input that matches that specific queries criteria. I would imagine the bookmark in Word would come into play in the Word document, but I have been unsuccessful in creating separate rows in the table. The columns would not change. Thanks, Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70141
  - 12
    - Run-time error 91: Object variable or With block variable not set Ð?Ñ?Ð¸ Ð·Ð°Ð¿Ñ?Ñ?ÐºÐµ Word Ð¿Ð¾Ñ?Ð²Ð»Ñ?ÐµÑ?Ñ?Ñ? Ñ?Ð¾Ð¾Ð±Ñ?ÐµÐ½Ð¸Ðµ:"Run-time error 91: Object variable or With block variable not set." Ð§Ñ?Ð¾ Ð´ÐµÐ»Ð°Ñ?Ñ?? Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70132
  - 13
    - Using DataObject type for clipboard What is wrong with this code ? Thank you (suggested to me by J.W. at this useful page : http://www.word.mvps.org/FAQs/MacrosVBA/ManipulateClipboard.htm ) Type DataObject Toto As Object End Type ________________________ Sub MyTest() Dim MyData As DataObject Dim strClip As String Set MyData = New DataObject (compiler error here : incorrect use of the â??newâ?? keyword ) MyData.GetFromClipboard strClip = MyData.GetText MsgBox (strClip) End Sub Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70131
  - 14
    - Iterating Through Checkboxes Hello, I have a Word doc with many textboxes and checkboxes that are part of the fields collection. I'm having trouble with getting the value from the checkboxes. The result property doesn't contain the value and I've tried other ways of getting it, like referencing the associated formfield object using the bookmarkid on the checkbox field. Two types of sample code is below. Niether is correct because when iterating through the fields collection, both lines of code will reference text boxes. I've tested this by using the .select method so I could see which objects are being selected. If it helps, the text boxes and check boxes are set inside Word tables. ------------------------------------------------------------------------------ Dim oField As Field For Each oField In Me.Fields If oField.Type = wdFieldFormCheckBox Then If oField.Code.BookmarkID > 0 Then ' SAMPLE 1 MsgBox Me.FormFields(oField.Code.BookmarkID).CheckBox.Value ' SAMPLE 2 MsgBox Me.FormFields(Me.Bookmarks(oField.Code.BookmarkID).Name).CheckBox.Value End If End If Next --------------------------------------------------------------------------------- Any help with what I'm doing wrong and the proper way of getting the checkbox True or False value would be great and much appreciated. Thanks Jack Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70130
  - 15
    - Transferring Bookmark Contents Between Files I have a Form Template that I distribute for use by our sales force. They complete the form and return, but also keep a copy for future use when creating documents for the same customer. The template allows them to open a document and re-use the content. The problem comes when the template is updated and new fields (and bookmarks) are added. The "old" forms become useless unless I can get the contents of the bookmarks from the "old" docs to a new doc created from the updated template. I am limited to using Word 2003 VBA. What is the best way to handle this problem? -- Thanks in advance! Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70128
  - 16
    - Class not initialised when Word started by opening doc for IE Using Class module to control document change/open events. This works great if Word is opened normally, or started by opening a document on the PC or network. However if Word is started by opening a document from a hyperlink from an HTML page on web/intranet page then the class is not initialised. Is there a way around this? Many thanks Caroline Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70124
  - 17
    - autoopen macro in word and outlook (2003) A document that is sent, containing an autoopen macro, doesn't run this macro when you open the attechment. However when you first save the document and then reopen it, everything works fine Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70116
  - 18
    - How to: delete sections pagebreak? Hi all I am trying to automate deletion of sections pagebreaks in a Word document. I have tried this: With ActiveDocument .Sections For i = 1 To .Count .Item(i).Range.Delete Next i End With but to no avail since this will delete the entire pages of my merged document where I only want to delete the pagebreaks. TIA Cordially Pascal Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70111
  - 19
    - Distributing macro's Hello, I made a few macro's and i wan't to share them with other people. The macro's are on a server. How can I do this? Greets, Jan Willem Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70110
  - 20
    - create multiple envelopes from outlook contacts My code is as follows:I am able to retrieve contacts but print only 1 envelope not multiple please help me...I have been struggling over this ... can u suggest some modifications...thx Set myOlApp = CreateObject("Outlook.Application") Set objWordApp = CreateObject("Word.Application") Set objWordDoc = objWordApp.Documents.Add objWordDoc.MailMerge.MainDocumentType = wdEnvelopes For i = 1 To fldFolder.Items.Count Set Contact = Outlook.Session.GetDefaultFolder(10).Items(i) a = Contact.Email1Address If bb = True Then For k = 0 To List1.ListCount - 1 If a = List1.List(k) Then r = Contact.FullName v = Contact.BusinessAddress 'addr has the size of envelope addr = Combo1.Text ice = Left(addr, Len(addr) - InStr(addr, "(")) sp = Trim(ice) objWordDoc.Envelope.DefaultSize = sp objWordDoc.Envelope.Insert Address:=r & Chr(10) & v, ReturnAddress: =txtAddress.Text With objWordDoc.MailMerge .Destination = wdSendToNewDocument .SuppressBlankLines = True End With objWordDoc.ActiveWindow.View.Type = wdPrintView objWordApp.WindowState = wdWindowStateMaximize End If Next k End If Next i -- Message posted via http://www.officekb.com Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70107
  - 21
    - how to extract text and toc out of a word doc ussing VBA I want to extract the text (next to or belonging to the chapter) and toc data ( ex. chapter 5.1.1.2 ) and store it to a sql server db using VB6 and or VB.NET Extracting the complete toc would be usefull to Thanks Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70106
  - 22
    - Bookmark with overwrite function? Hi all, I've an Access db that writes to a Word document using bookmarks. I have the template lined up just the way I want it; when the db writes info to the template, the lines become offset by the difference in text length between the bookmark and the data replacing the bookmark. For example, if "McCracken" replaces "Last", the rest of the line is adjusted 5 places to the right for the extra characters in "McCracken". If at all possible, I'd very much like to have the system account for the extra spaces and delete them during the process. I was playing around with Word.Options.AutoFormatAsYouTypeInsertOvers and Word.Options.Overwrite, but couldn't get them to work. Are one of these the way to go? Or do I have to programmatically use the Len() function to calcuate the difference in the text strings and then add/delete spaces? If so, how exactly would that look? I hope this made sense and thanks very much for your time and help. Paul Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70105
  - 23
    - VBScript Alignment I am writing a VBScript to report on some AD stuff. I got the code working great but I am unable to center the text. Here is what I pulled from a macro: Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter It does not work. I'm guessing because VBScript does not have a value for wdAlignParagraphCenter. Anyone know where I can find the correct value or pull them from Word? Scott Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70099
  - 24
    - Create style if not already present Hello all I am trying to work out the VBA code to see if a style (FaxHeader) exists in a particular document, and if it does not, create the style. I can work out the code for creating a new style, it is just the code to check if it already exists that is giving me problems. Any help would be much appreciated. Thanks in advance, MMH. Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70098
  - 25
    - Finding parents dimensions Hi all, I have a paragraph or range that I need to know the dimensions of its container. How can I do this? .. I know I can get "range.parent" ..but then what? .. Please, advice Jeremy Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70096
- Next
  - 1
    - word 2000, 2002 I print a word doc in word 2000 and it prints ok. But in word 2002, some portion of the doc is not printed even though we can see the portion when doc is open. Is this related with template? Also replace command is working in word 2000. But it is not working properly in 2002. In 2002, search is done within a table cell, not the whole document? Any help would be appreciated. Thanks Daniel Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70088
  - 2
    - checking replace was successful Is there a way to check whether replace command was successful? Thanks Daniel Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70086
  - 3
    - save file wihout vba macros When I create a new file from a template and save it as a document, (.doc) and then close & re-open it, word still warns me that the .dot file contains macros. And Project explorer shows all the elements in the .dot file that creatd it. How can i save the document created without the vba,macros and userforms? thanks hals_left Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70079
  - 4
    - can you reference a check box? I am creating a form that uses the same information multiple times throughout the lengthy form, such as customer information, phone, etc. I have set it up so this information is repeated when needed by entering REF fields {REF Text1} for the text. One of the items that is required throughout the form is the "program' for which they are enrolled and I have inserted check boxs next to the first mention of the program choices and I would like this information to be repeated throughout the document. However, I tried to repeat it the same way as the text {REF Check1}, but when I test this application, nothing shows up in the cell. Make sense? Is there another way to do this so that if "Program 1" is checked in the first place, "Program 1" will automatically be checked throughout the form? Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70073
  - 5
    - Headers & Footers I need to take two documents that each their own header & footer & merge them together w/ out disrupting each others headers/footers. Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70072
  - 6
    - documents w/ footers & headers I have about 25 different documents that I want to merge into one. They all have their own headers & footers, but when I just do a select all, copy, paste, the footer gets all weird. It is continuing the counting of pages numbers from the prevoius document, but I don't want that. It is going to be a manual & each chapter should have their own set up numbers. Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70065
  - 7
    - How do I get my Word-created web form to export to Excel? I have a form I've created in Word, and saved as a web page. Mailto actions for the Submit button won't work, because the target users don't have Outlook, and from testing, it looks like it simply brings up a blank email without the selected information anyway. The server is not going to be set up to allow SMTP. ASP or Perl are not options either, since Word is the only app I have to work with. Can I configure the form to send all the information to my email without SMTP, or perhaps just shoot it into a designated Excel spreadsheet? Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70064
  - 8
    - Remapping hyperlinks I have a Word document that has hyperlinks to a CDROM drive (E drive). Is there a way to change all of them to the C drive? Thanks Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70062
  - 9
    - Clear text between specified characters Hello, i am new to Visual Basic and I am trying to make some macros for automated dictionary reversing. What I must do is find all ranges between characters "=" and "\" , and then clear them including ending sign "\". I tried few methods and it always turns out wrong. Can anyone help ? Thanks Tom Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70060
  - 10
    - Forms I'm creating a form that will be multiple pages. I would like to find a way that once a person completes their name on page one, that it will auto fill in the additional places for name on the rest of the form. Ideas of how to do this? Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70059
  - 11
    - Locate the My Documents folder with VBA I need to save files in "My Documents" regardless of where it is. How can I use vba to locate the "My Documents folder" being used and save the file to it? Thanks in advance Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70056
  - 12
    - Word scrolled over text? Can I insert hidden text in a Word document "behind" a visible word or phrase that is hidden and not displayed until the text is scrolled over? It's similar to a web page that has roll over text - move the cursor over highlighted text to see a description. thanks Please respond to bruce.smith@metriscompanies.com Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70055
  - 13
    - Word Forms and Macros Question I have created a template form in Word 2002 (XP). In my form there is a table. One of the table's columns contains a checkbox in each row. What I would like to have happen is that when the user checks the checkbox the row that it is in will become highlighted/shaded. I am assuming that I will need to do this with a macro, but I am not sure. If there is an easier way that would be great! I am a macro novice so any assistance would be greatly appreciated. Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70049
  - 14
    - Specifying a range within a header Hi all Iâ??m using VB to produce a Word document. Is there a way to specify a Range within a header, or can you only specify the Range that represents everything in the header? The VB editor will now allow me to use: MyDocument.Sections(1).Headers(wdHeaderFooterPrimary).Range(Start:= something, End:= something else) Is there another way? Thanks again David Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70044
  - 15
    - 'Select active table where cursor is' command????? Hi Someone gave me this macro recently but I have to change it every time I use it on a different document. Is there a way to get the macro to work on the table where the cursor is no matter where the table is in the document. A type of 'select active table where cursor is' command??? Thanks in advance. Sub RandomPick() ' ' RandomPick Macro Dim i As Long Dim j As Long i = ActiveDocument.Tables(3).Rows.Count ' table 3 Randomize j = Int((i * Rnd) + 1) ActiveDocument.Tables(3).Cell(j, 1).Select ' table 3 End Sub Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70043
  - 16
    - How to create pie chart from linked CSV file in Word? Hi, I am trying to create a Word document which should contain a couple of charts (pie, bars, etc.). The source for the charts´ data should be a couple of csv files I have on harddisk. I would like to "link" the csv file to the Word document (or the chart) so I don´t have to do a manual import. Instead the charts should show the data from the current file every time the Word document is opened. So far I have tried to do this with a combination of Excel and Word which does not work for me. Basically the problems are as follows: - when I create the chart in Word only, I can not link it to the CSV file/s - when I create multiple charts in one Excel file, I can use a small VBA script to automatically read the CSV files and adjust the graphs (each char on a differen sheet). Unfortunately I have not found a way to link specific sheets in Excel to specific objects in the Word document so this won´t work either. Anyone have any idea how to do this? Thanks in advance! Regards, Emre -- http://www.emre.de UIN: 561260 PGP Key ID: 0xAFAC77FD I don't see why some people even HAVE cars. -- Calvin Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70042
  - 17
    - PDF tool needed I know there are many tools that let you "print" a Word document to a PDF file (for example, CutePDF). The problem is that all these tools that I have seen require user input to specify the output file name and possibly output options as well. THis makes it impossible to completely automate the process from VBA code. Does anyone know of a PDF "printer" that can operate with no user input, completely under VBA control? The only one I have found is PDF Creator but it is $500. Thanks -- Peter Aitken Remove the crap from my email address before using. Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70041
  - 18
    - Macros & hyperlinks & buttons does not work into headers ??? please help Hi ! I want symply to put something like a hyperlink or button or .... to go to index, or page 1 ( for example ). Because headers seems 'locked' i think macros, buttons, hyperlinks also are locked Some idea ??? Thanks , Antonio Pérez Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70040
  - 19
    - Find text with different font. Hi, I have a word document containg text with diffrent font. I need divide that document into blocks, where each block will have the same font. In other words, when the font is changed then new block should begin. I can do that by getting font of each character, and when font is diffreent, then just make a new block. But this is extremely slow. I takes 30 seconds on document with 2 pages. Do you think there is some faster way of doing this? PS: I'm accessing Word using OLE objects. But this shouldn't be different from VBA. -- Jiri Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70038
  - 20
    - How to unlink headers/footers correctly without using ActiveWindow Hey As a start I ran a macro with application visible. From the macro recorder I learned to use the following statement to unlink header/footer: Selection.InsertBreak Type:=wdSectionBreakNextPage ' Cut link between herder/footer on page x and page x+1 ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader Selection.HeaderFooter.LinkToPrevious = False ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument BUT it didn't work when I changed to run the application invisible :-( In an earlier Q in this NG I was told that the ActiveWindow object only worked correctly when application was visible. I have tried to rewrite the script to the following: Selection.InsertBreak Type:=wdSectionBreakNextPage ' Cut link between herder/footer on page x and page x+1 With ActiveDocument.Sections(ActiveDocument.Sections.Count) .Headers(wdHeaderFooterPrimary).LinkToPrevious = False .Footers(wdHeaderFooterPrimary).LinkToPrevious = False End With As far as I can see it does not work. When I manually enters the header on the new page (doubleclicking on the new header), it is STILL linked to previous page. What am I doing wrong? Ebbe Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70036
  - 21
    - How to move cusor after inserting some OLEControlObject to a specified place? hi! I have inserted an OLEControlObject into word document using vba as following Selection.InlineShapes.AddOLEControl(ClsType) No after inserting it I tried to move cursor to the next line after the Control. using Selection.TypeParagraph() it deleted the Control. So what should I do to avoid it. furthermore if i want to move cursor one space after the Control. Thanks in advance. Ahmad Jalil Qarshi Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70035
  - 22
    - Connectors In Excel, there is a ConnectorFormat property in Shape object. We did not find such object in Word API. How to get the ConnectorFormat object from shape object? Thanks Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70031
  - 23
    - Export filter to convert a word picture to CGM Is there any CGM export filter to convert a picture object in word document to CGM? If its not there, is there any way to convert a picture object in word to CGM. Thanks Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70030
  - 24
    - Event to run some code when a VBA template is loaded into Word XP In Word 2003 there is the Document_Open which I have used to load a command bar, etc. when a document is opened with an attached VBA template. I think that I read of an event to accompish the same thing for Word XP but I don't remember and can't find. Is there an event that will allow me to run startup VBA code? THANKS! Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70029
  - 25
    - Extract data from word to access? Hello, I am going to recieve about 250 word docs for a land survey project that are all the same format. The document will have 4 main sections, and then inside those, there will be details which will need to be captured (or harvested) and then saved as delimited text (or whatever will work best) for insertion into an access database. The problem is that most (80%) of the word doc is not formatted into any kind of tabular structure, at least from what I can tell. (As a side note - is there a way to check using something like reveal codes, as was in WP)? The only thing in common that each doc file has is that each file has the same keywords preceding the desired data value. MY QUESTION: Is there a way to have a VBA routine go through, and identify (which would be embedded in the VBA routine) keywords, and then based on that keyword, trigger a "copy" to action? There is always a consistent keyword preceding the desired data value. For example, here is a typical sentance (with the desired data value in {}, and the keyword in caps: EXAMPLE 1) That certain tract of land CONTAINING {105.899}acres, more or less... EXAMPLE 2) or another example in tabular format, separated by tabs (but shown here with commas and no separation); 1st line: *Surface,Mineral,Net 2nd line: Owner,*Interest,Interest,Mineral Acres 3rd line: John H. Smith,100%,50%,52.9495 * TO CLARIFY: The words Surface and Interest go together (like Surface Interest), just one on top of each other. Same for the words Mineral and Interest, as well as Net and Mineral Acres. In sum, I just want to know what are the ways that you can go into an existing word doc and extract the data that you need, that's all. I really don't know where to begin asking this, but if there is a better NG than this one, I'd apprieciate your direction on where I should post this. TIA. Phil Tag: A better Starter see http://www.elmawrid.com/winsurf/winsurf.htm Tag: 70026

see:
http://www.elmawrid.com/winsurf/winsurf.htm

Product Description:
WinSurf is a productivity utility that runs on Windows XP
and helps the user to quickly find files ,shortcuts, documents,
favourites, music files and all sort of items stored on their PCs in
various locations such as the Start Menu, Internet Explorer Favourites,
Documents, the Desktop, Admin Tools or any other folder.

Any feedback will be appreciated

----------------
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=1b725bc9-b4f3-441a-93ec-882f9a50abb7&dg=microsoft.public.word.vba.general

Top