Creating a new word document

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - How to find duplicate data in an array I have a string arrary Schedule(Names, Info) There are about 100 names in the array, but some of them are duplicates. How can I debug.print each Name, then the info that goes with it, and if it has a duplicate Name in the array, the info from that part also. The array is not sort in any way thanks, ck Tag: Creating a new word document Tag: 81006
  - 2
    - Macro Director Won't Display I can create macros which are automatically stored in the templates directory but I can't view this directory from Windows Explorer. Does anyone know why? Tag: Creating a new word document Tag: 81001
  - 3
    - DSO Framer Questions I now am using DSO Framer control, now wants to control for this increases one method, but this method is wants to realize in the current documents inserts one picture, now does not know how wrote thanks! Tag: Creating a new word document Tag: 80999
  - 4
    - Delete text in first cell of table in footer My situation has changed a bit since my last post. Issue: I may have several sections in a document that may have a different first page footer and additonal sections that may not. Every footer however will have a table consisting of 3 columns and one row. The first column will always contain Page ? of ? field code, a date and time field and document path and file field plus some text. The second column will have a page number. I want to delete everything ONLY in the first cell in every section in every footer. I think I am complicating the issue with my old code. Here is my new code which is not even selecting in a footer but rather stays in the document text. Here is my simplified code (which certainly does not work!) Dim oSec As Section For Each oSec In ActiveDocument.Sections With oSec.Footers(wdHeaderFooterPrimary)'I want this to be all footers not just primary Selection.EndKey Unit:=wdLine, Extend:=wdExtend Selection.Delete Unit:=wdCharacter, Count:=1 End With Next oSec I am using Word 2003. Thanks for any help -- CLG Tag: Creating a new word document Tag: 80990
  - 5
    - How do I remove Redaction form my word program? I want to delete the "redactio"n upgrade from my word 2003 program. Does anyone know how to go into the registry? Thank you, Jay Tag: Creating a new word document Tag: 80983
  - 6
    - Including graphics in Access to Word merge I have a routine that creates a standard letter to a variety of people. The routine uses a Word template that contains doc properties to receive the content of fields such as â??nameâ??, â??addressâ??, â??Todaydateâ?? etc. At the end of the routine, the fields are unlinked. I would like to insert a signature .jpg file that would vary according to whether I have addressed the recipient by their first name or their title and surname. I have experimented with INSERTPICTURE, but only managed to create an empty graphic box. Is there a work round? Help gratefully received. Tag: Creating a new word document Tag: 80964
  - 7
    - Macro to remove date field, page number field as well as file and path name field. These fields are located in the first cell of a one row table located in every footer in every section (also first page footer exists). How can I delete all of these fields in a macro? I appreciate any help regarding this. Using Word 2003 -- CLG Tag: Creating a new word document Tag: 80955
  - 8
    - VB to Insert Thumbnails I'm trying to develop a macro that will insert all images into a Word Table to allow comments to be entered for each image. I plan to resize the images to thumbnail size, and hope to be able to have two columns of photos, with a comment column next to each (4 columns total). I assume this is not too complicated, but am hoping someone can give me a head-start. I just want something that will grab a copy of all JPEG files in a given folder, and insert them one at a time into the table. I'm thinking that I would got right to left, then down, so the first image would go in cell A1 (using Excel nomenclature), the second in cell C1, the third in A2, and so on. I assume there's a collection I could use to cycle through all files with an exention of JPEG, right? Can anyone give me any tips on doing this. If possible, I'd really love to get a shell of a program that I can then tweak. Thanks in advance for any ideas. Todd Tag: Creating a new word document Tag: 80948
  - 9
    - Module 1 v New Macros Hello I've just noticed that in my doc with my macros, they seem to be in two places, Module 1 and New Macros. Besides solving the mystery of how they got themselves separated, I'd like to know if I can get them back together while keeping the links between macros and my special toolbar. Thanks in advance Dave Neve Tag: Creating a new word document Tag: 80945
  - 10
    - Need help sizing table columns correctly I need some help getting a macro working exactly the way I want. I've looked in the Help but can't quite figure out what I need to do. I'm creating a series of small tables, that will appear one after the other. Each table will have two rows. The first of the two rows will have 4 columns, the second row will contain only one column. I'd like each table to use all of the available width between the left and right page margins, which are set at 60 points each. I want the first three columns of the first row of each table to have a specific fixed width. I'd like the fourth column of the first row of each table to get whatever space is left over after the first three columns have been written. The second row of each table should get the full available width between the left and right page margins. This is my current sub for creating the table and setting the desired column widths: ================================================================= Sub createTable() 'Create a two row, four column table. Set newTable = ActiveDocument.Tables.Add(Range:=Selection.Range, NumRows:=2, NumColumns:= _ 4, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _ wdAutoFitFixed) 'Format the table. Set the column widths and merge the cells on the second row into a single cell. With newTable If .style <> "Table Grid" Then .style = "Table Grid" End If .AllowAutoFit = False .PreferredWidthType = wdPreferredWidthPercent .PreferredWidth = 100 .ApplyStyleHeadingRows = True .ApplyStyleLastRow = False .ApplyStyleFirstColumn = True .ApplyStyleLastColumn = False 'Set widths of columns (in inches) .Columns(1).Width = InchesToPoints(1.1) .Columns(2).Width = InchesToPoints(1.2) .Columns(3).Width = InchesToPoints(1.7) .Columns(4).Width = InchesToPoints(3.2) 'Merge the cells on the second row into one cell .Rows(2).Cells.Merge End With 'Make sure table isn't split across pages. Selection.Tables(1).Select With Selection.ParagraphFormat .KeepWithNext = True End With End Sub ================================================================= This _almost_ does what I want but there are two things that I don't like: a. "AutoFitBehavior:=wdAutoFitFixed" in the 'set' statement and ".AllowAutoFit = False" seem to contradict one another; the 'set' seems to be saying that I should use AutoFit while the 'with' seems to turn it off. Should the 'set' be written differently to prevent the columns from ever having had the ability to resize themselves? b. I want the widths of the first 3 columns on the first row of each table to be fixed at the sizes shown. I want the 4th column to automatically get whatever space is left between the 3rd column and the right margin without first having to calculate an actual length in inches. I thought that by leaving the width of the 4th column unspecified, it would get all of the remaining space but, in fact, it gets quite a bit less than the available space, with the result that the table is narrower than it needs to be and the right margin is much bigger than I want in the area where the tables are written. How can I get that behavior? I've looked in the Help but I must be searching on the wrong keywords because I can't find a clear answer to either problem. I was going to do some 'trial and error' with the width of the 4th column. I erased the line after the "=" on the line that sets column 4's width but the other options never appear. I was hoping to see something like "UseRemainingSpace". Shouldn't I be getting a list of options when I do that? If yes, I must have something wrong in my VBE settings; can someone tell me what I need to turn on? If you can help me solve these last two problems, I think my document will be absolutely perfect instead of just 98%. -- Rhino Tag: Creating a new word document Tag: 80943
  - 11
    - Identify the page you are on Hi, I'm trying to write a bit of code that will obtain the page number that the cursor is currently on. Can anyone help? Thanks. Tag: Creating a new word document Tag: 80941
  - 12
    - Offer Word with "manual" type mode option without auto format The auto format is very aggravating to me an many people I talk to. We used to use word perfect which was much easier to use , at least in its earlier versions. Most of us (older users) do not have time to spend learning a lot of how to use what should be a simple program that we can just use instead of spending a lot of time learning how to program a typed in document. A full "manua" option should be offered so that we can type in what we want without the program changing or "correting it for me ." Because of limited funds, I often do not have access to a secretary that might know how to format a Word document. I often have to do my own typing of documents and I am ( along with others) extremely frustrated with the Word auto formating and how it changes something back after I try to change it or it won't let me change something on the document. I learned to type in the 1960's and I would like to be able to just type. The program should have a very simple method of programing features such as "auto return" etc. I would be more than happy to discuss this in greater detail. I believe you would have a lot more happy users if this would be offered. As I said, many people I talk to are frustrated with Word. We use it because it seems to have become the standard format for most users. When I have to stop and try to go into help to try to figure out what to do, I waste time that I don't have and often can't easily find what I need. Again I mention the high levels of frustration me and many of my coworders have with Word. We had a hard time getting several staff members in my office to switch from word perfect to word. Anything you can do soon to make this an option would be greatly 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=34ea0d5b-9ccd-4825-a5b7-487eea09c806&dg=microsoft.public.word.vba.general Tag: Creating a new word document Tag: 80936
  - 13
    - starting VBA fron any of the MS office app cause this app to end Hi, I have beed suggested to post my problem here. I have recently done a fresh install of MS Windows XP SP2 with all the last windows update I have installed .Net Entreprise 2003 and MS Office 2003 Pro Every time i am trying to launch the VBEditor for any of th office app, i return on my desktop without any warning :( Any idea about this problem ? Any help will be greatly appreciated. Thanks for your help Tag: Creating a new word document Tag: 80931
  - 14
    - Need to refine simple code ending in Wend Hello Helmet gave me some code as usual and I have managed to create a second macro from the original to handle characters instead of words (one small step for man, one gaint leap for nevekind) The macro is a follows _____________________________________________ Sub GOL() ' GOL Macro (Go one letter) ' Macro créée le 11/02/2006 par Dave Neve ' Dim l As Long Application.ScreenUpdating = False ActiveWindow.View.ShowHiddenText = True l = 1 With Selection.Cells(1).Range While .Characters(l).Font.Hidden = False l = l + 1 Wend .Characters(l).Font.Hidden = False End With ActiveWindow.View.ShowHiddenText = False Application.ScreenUpdating = True End Sub _____________________________________________________________________________________________ The problems comes when I reach the end of the last word but don't necessarily know as I can't remember how many words are in the cell. I click on the macro again and nothing happens, probably cos there is a space character. But the next click is 'fatal'. There is an error that the 'collection object'(not sure of exact term in English) can't be found and worse still, this seems to trigger Word to activate 'show masked text' in the whole table which I then have to untick manually. Can anyone help please? Thanks Tag: Creating a new word document Tag: 80928
  - 15
    - macro effect on browse control button I have created a macro that runs through the sections of a document and adds a footer to each page. A side effect has been that the "browse" control that is located just below the vertical scroll bar changes from "previous page / next page" to "previous section / next section". This is a minor annoyance for users since they can change it back again, but I am wondering if there is any way to reset this programmatically to its default, since it does not appear to be a customizable option that can be set anywhere in Word - tools - options thanks, -- Steve Paul Tag: Creating a new word document Tag: 80921
  - 16
    - Copy all styles starting with certain characters? Generic user na I can record macros, but know zero VBA. Instead of a macro that copies certain styles from a template into a document, how can I indicate copy all styles that start with certain letters - in this case BP? Also, since the template will be stored in the user's emplate path, how can I indicate some sort of generic user name? I don't want to have to edit the macro for every user . Thank you in advance, I know these are basic questions. Boy, do I feel dumb!! Tag: Creating a new word document Tag: 80915
  - 17
    - All search & replace lines needed? I am doing a long Word search-and-replace macro in 14-line chunks exemplified as follows: With Selection.Find .Text = "del^13" .Replacement.Text = "delivery^p" .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = True .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute Replace:=wdReplaceAll Of those lines above, these never change: .Forward = True .Wrap = wdFindContinue .Format = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False Am I allowed to expunge those lines from each of the 14-line blocks since they are always the same and, presumably, are at default values? Or do I at most just have to keep the .Wrap statement? Tag: Creating a new word document Tag: 80908
  - 18
    - Using Nested If expressions in field codes I am trying to find a way to use Nested If expressions within a field code to limit a document property that displays the document name from appearing only on the last page of the last section of a document. The first If expression cehcks the current page number against the n umber of pages within the current section of the document. The second If expression checks the current section number against the number of sections in the document. If both If expressions are true, then the fild is supposed to display the document name, otherwise it should display nothing. I am able to get the result to come out correctly using the code shown below to generate the field code. I had to create a custom document property named SectionsCount in order to get the number of sections in the docuemnt to display within the field: Private Sub BuildIndentifierField() On Error GoTo Err_Handler With Selection ' Begin the First IF expression: .Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:="IF ", PreserveFormatting:=False .MoveRight Unit:=wdCharacter, Count:=5 .Fields.Add Range:=Selection.Range, Type:=wdFieldPage .TypeText Text:=" = " .Fields.Add Range:=Selection.Range, Type:=wdFieldSectionPages .TypeText Text:=" " ' If the First IF expression is TRUE then use the Second (NESTED) IF expression: .TypeText Text:=Chr(34) .Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:="IF ", PreserveFormatting:=False .MoveRight Unit:=wdCharacter, Count:=5 .Fields.Add Range:=Selection.Range, Type:=wdFieldSection .TypeText Text:=" = " .Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:="DOCPROPERTY ""SectionsCount"" " .TypeText Text:=" " ' Add the result to display if the Second IF expression is TRUE: .TypeText Text:=Chr(34) .Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:="DOCPROPERTY ""Identifier1"" " .TypeText Text:=Chr(34) ' Add the result to display if the Second IF expression is FALSE: .TypeText Text:=" " & Chr(34) & Chr(34) .MoveRight Unit:=wdCharacter, Count:=2 .TypeText Text:=Chr(34) ' Add the result to display if the First IF expression is FALSE: .TypeText Text:=" " & Chr(34) & Chr(34) End With Exit Sub Err_Handler: MsgBox Err.Number & ": " & Err.Description, vbOKOnly + vbCritical, "Error" ActiveWindow.View.ShowFieldCodes = False application.ScreenUpdating = True I always get a message saying "Error! Missing test condition." within the nested If expression of the field. For example, I get this to display whenever the document is saved: { IF 1 = 6 "Error! Missing test condition." "" } If were to toggle the field code over the error message, I can see that my second If expression is being read correctly by the code, as shown here: { IF 1 = 6 " { IF 1=2 "{ DOCPROPERTY "Identifier1" \* MERGEFORMAT }" "" }" "" }. Thanks. Tag: Creating a new word document Tag: 80907
  - 19
    - Revealing hidden words Hi I've written the following simple bit of code (to reveal the first hidden word in a cell) but as usual, it doesn't work as expected ______________________________________________________ GetOneWord() ' ' Macro enregistrée le 10/02/2006 par Dave Neve Selection.MoveRight Unit:=wdWord, Count:=1, Extend:=wdExtend With Selection.Font .Hidden = False End With End Sub _______________________________________________________ It reveals all the hidden words in the cell and not just the first one. Why is this please? Thanks Dave Neve Tag: Creating a new word document Tag: 80904
  - 20
    - Macro to diplay printer list Hello, We have Word 2003. I'd like to create a macro that would pull up a userform and allow my users to choose which printer they want. I know some visual basic and I know how to create the userform. What I need is the code to be able to select the printer. We have HP Laserject printers. Thanks! Tag: Creating a new word document Tag: 80900
  - 21
    - Transferring macros and toolbars Hello A little question about copying macros and toolbar from one .dot to another .dot I have a "normal.dot" and a "special.dot" with my macros. I needed to create a new .dot which I will call "test.dot". Firstly, when I tried opening "special.dot" and "test.dot" and using the tools>macro>organise option, I could not manage to transfer the macros from "special.dot" to "test.dot" directly. I had to send the macros to "normal .dot" and then to "test.dot" Is this a limitation of Word? Secondly, I finally managed to copy my special toolbar from "special.dot" to "test.dot" also. But the link between the macros and the toolbar seems to have been broken.(the macros can not be found) How can I relink the macros with the toolbar? Both are certainly present in special.dot. Thanks in advance Dave Neve Tag: Creating a new word document Tag: 80897
  - 22
    - Macro to change style based on style of current paragraph Hi! Though I've made a couple of attempts at this, I have yet to figure out how to create a macro that does the following. 1. Determine the style of the paragraph in which the cursor is sitting. 2. Compare the style determined in step 1 to a short list of style names. If the style = A, change the style of the paragraph in which the cursor is sitting to A1;if the style = B, change to B1, and so on. 3. If the style is not equal to one that is on the list, return an error message. ANybody have something liek this I can look at or some suggestions about how to create this macro? Thanks! Beth Tag: Creating a new word document Tag: 80892
  - 23
    - Userforms and bookmarks Hi! For my template, I've created an autonew macro that displays a userform prompting the user for a title, code, and date. The responses are displayed in the file via bookmarks. I've also created an autoopen macro that prompts the user for a new date. The problem is that the new date gets added to the bookmark in front of the existing date (entered when the file was created. I end up with this: 10 Feb 200609 Feb 2006 Any suggestions on how to fix this would be welcome! Thanks! Beth Tag: Creating a new word document Tag: 80891
  - 24
    - Hide X button on VBA forms Hello All, I am just wondering if it's possible at all to disable or hide the X button on the top right hand corner of a word VBA windows form? The form in question is a sub form of the main form in my application, I want the user to be able to open the form, click off some options and then close the form, when the form closes however (via the cmdbutton close) it hides the form so that if they go back into it the options they chose are still clicked off, if the user however clicks on the X it disposes of the form and the options are gone.. so i don't want them to be able to click the X at all... Thanks in advance for your time!! Erin Tag: Creating a new word document Tag: 80882
  - 25
    - find current page number I'm sure this is fairly simple, but for some reason I can't seem to find it. Does anyone know the code to find the current page number? This is what I am using it for: I have code that will run on exit of all the fields on my word form. However, I need the code to vary slightly depending on the page the field is on. If I can find the page number, I can have the code run the necessary changes. Thanks in advance! Tag: Creating a new word document Tag: 80881
- Next
  - 1
    - Tick instead of cross I am using Word in Office XP. Can anyone assist me, please? I am wanting to create a form which has 'tick boxes instead of 'cross' boxes. Thanks in anticpation. -- Mark Tag: Creating a new word document Tag: 80878
  - 2
    - Identifying the button that activated the macro Is there a way tell tell what the .ID of the button was that started a macro? I have several toolbar buttons running the same code, doing slightly different things determined by their .ID Tag: Creating a new word document Tag: 80873
  - 3
    - Get numbering text when several ListNum on same line Hi, I'm having trouble getting the numbering text of a ListNum field when it is not the first numbering field in a paragraph. I usually use the ListFormat.ListString property, but it doesn't work in this case, as this property (and ListFormat in general) always gets the first list entity in a paragraph. So if I had this in the document: "It happens fbecause: a) reason1, b) reason 2, c) reason 3" the ListFormat.ListString for any range in this line (including the listnum "Result" and "Code" ranges for any listnum field) would be "a)". The same happens if I have a listnum field after a bullet (don't ask me why anyone would this, it's not my document :)), the code character for the bullet is returned (whatever it is). So, how can I get the resulting text of a listnum field, or the listnum field immediately before the current selection (I have no trouble finding the field, just getting the text)? Hope you can help Thanks Tag: Creating a new word document Tag: 80867
  - 4
    - VB cant find bookmark in Header Hello again I have bookmark in Header, When I try to get to it in VB with the code -- objWord.ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader Selection.GoTo What:=wdGoToBookmark, Name:="HeaderPlanName" I get the error 5678 "Word cannot find the reuested bookmark." even though the above is generated by word it self (by recording macro). Help please!!! You guys have been great so far Tag: Creating a new word document Tag: 80866
  - 5
    - How can I make all text between '/' and '/' bold? I'm writing something about phonetics and pronunciation. I've been cutting and pasting all the symbols. It's too much trouble to make them bold as I go through. I'd like to find all the things like this '/s/' in a document and make them bold. I think this must be possible, but I have no idea how to do it. I'm using MS Word 2002. Thanks for any help. Tag: Creating a new word document Tag: 80864
  - 6
    - Pure Virtual Function Call R6025 Can any one help please. I keep getting this error Program: C:\Program Files\microsoft Office\Office 11\Winword.exe R6025 -Pure Virtual Fuction Call On a XP machine SP2 Office 2003 SP2. No other programs. Have tried reinstalling the service packs and making sure printer drivers are XP. Have aslo tried installing office 2002 but still get error. Happens on different word documents.Many thanks -- Ades Tag: Creating a new word document Tag: 80863
  - 7
    - Pure Virtual Function Call R6025 Can any one help please. I keep getting this error Program: C:\Program Files\microsoft Office\Office 11\Winword.exe R6025 -Pure Virtual Fuction Call On a XP machine SP2 Office 2003 SP2. No other programs. Have tried reinstalling the service packs and making sure printer drivers are XP. Have aslo tried installing office 2002 but still get error. Happens on different word documents.Many thanks -- Ades Tag: Creating a new word document Tag: 80862
  - 8
    - Bridge documents....Red Hearts and Diamonds, Balck Clubs and Spade How do I write tutorials for Bridge so word can type, autocorrect or insert the proper character with its proper color? Red Hearts and Diamonds, Balck Clubs and Spades are typed many many types, how can this be automated? Tag: Creating a new word document Tag: 80858
  - 9
    - BuiltInDocumentProperties Hello I created a Word document template from a document created at another institution, and stupidly didn't notice that before there were hundreds of documents in my organization's file system with the other company's name in the "Company" BuiltInDocumentProperties. I wrote the routine below to traverse the file tree and update each file. I change the system time to the original modified time for each file so I don't end up setting every file to be modified now. HOWEVER, (A) this is insanely slow (even if I turn off Application.ScreenUpdating; and (B) I noticed that from Windows Explorer, you can modify these properties without opening the file. Does anyone know either: 1) How I could improve the performance in general; or 2) Achieve the same result without having Word open each document? Tx & rgds Bongo Sub Traverse(folderspec) Dim fs, f, fl, fc, s, company Dim realdate, realtime, filetime realdate = Date realtime = Time() Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.GetFolder(folderspec) Set fc = f.Files For Each fl In fc If fl.Type = "Microsoft Word Document" Then filetime = fl.DateLastModified Documents.Open FileName:=fl.Path company = Documents(fl.Name).BuiltInDocumentProperties("Company") If company = "OTHER COMPANY" Then Time = filetime Date = filetime Documents(fl.Name).BuiltInDocumentProperties("Company") = "MY COMPANY" Documents(fl.Name).BuiltInDocumentProperties("Keywords") = "" Documents(fl.Name).Save End If Documents(fl.Name).Close End If Next ' RECURSIVE PART, DISABLED FOR TESTING ' Set fc = f.subfolders ' For Each fl In fc ' Traverse (fl.Path) ' Next Time = realtime End Sub Tag: Creating a new word document Tag: 80856
  - 10
    - Removing blank lines in report Hi, I have a report that produces a text file. When I open it in Word its about 3,000 pages long. This is because 60% of the report is blank lines. Is there a way to take out the blank lines using VBA? Once the file is reduced I hope to import it into Excel. Regards Garry Tag: Creating a new word document Tag: 80852
  - 11
    - Using forms to collect information Hi, Thanks for your time. I'm using Word 2003. Wondering if there is a way to have users fill out a form in Word and then be able to collect the data somehow. I know conceptually there is, I've heard of it being done but I was wondering if anyone could point me in the right direction. For example if I wanted to create a survey for my users, create a form using the form toolbar in Word and then collect and analyze the data in a table or something like that. I believe you can do this in Adobe also, but I'd rather use Word if I can. Thanks! Tag: Creating a new word document Tag: 80842
  - 12
    - how do I remove a line when a mergefield has no value Tag: Creating a new word document Tag: 80840
  - 13
    - example code for Would someone have some example code for renaming a button on a custom toolbar called "schedule"? Tag: Creating a new word document Tag: 80829
  - 14
    - Linking word Userform to excel using word vba I am trying to populate an excel workseet using a word Userform that I have developed. Everthing that is entered into the userform needs to be exported to excel. The problem that I ma having is trying to figure out to get the two programs to talk. I imagine that this is a basic thing to do if you know what your are doing, I do not. Please help Tag: Creating a new word document Tag: 80828
  - 15
    - Normal.dot I'm just coming over from Office 97 to XP with Word 2003. Word's VBA macros used to be stored in Normal.dot. What's the deal with "Normal" now? And, why doesn't it prompt for module save confirmation when closing after a modification? Thanks, -- Trent Argante [DC.J(125)] Tag: Creating a new word document Tag: 80823
  - 16
    - Delete a line which has a unique Style with a macro Hello, I am trying to find a way to delete many lines in a document, which all have a unique paragraph style. How can I do that? Thanks Octavee Tag: Creating a new word document Tag: 80822
  - 17
    - Paper Tray Bin Selection macro I need to get the number assigned to paper trays on laser printers and copiers to add this to a macro for bin selection. I believe there may be a macro to find this out but not sure what this is. Have tried choosing File, Page Setup whilst running a macro and whilst this gives me the bin number on the copiers we use, when I put this code in my current macro, it doesn't select correct bin - just picks from the default tray. On our HP laser printers, when I select File, Page Setup, I just get Upper or Lower Tray in the code. I actually do have the numbers for the printers from our consultant who wrote the macro, but as we will probably be getting new models, I would like to know where/how to get the actual bin numbers. Thanks in advance. Tag: Creating a new word document Tag: 80816
  - 18
    - Capture ALL movements...event? Currently I am trying to create my own StatusBar because the Word StatusBar doesn't display when you are using it with Internet Explorer. My question is what event do you use to capture every movement of the cursor(pointer) so I can display the current line, section, column, etc...? I've tried Me.SelectionChange but it only captures some of the movements. It doesn't capture when I hit the Enter button, etc... Any ideas? Thanks for your time! -- Brenda Tag: Creating a new word document Tag: 80814
  - 19
    - Headers, Footers inserting text... Hi, I hope this is the correct forum for this question... Is there some trick to programmatically inserting text in the header and/or footer of a Word document? I'm working with Word 2003, and the documents are XML format. I created a schema and a XML data file and a XSL transform file. I pull the XML file into Word with the schema and XSL attached and everything gets formatted and populated correctly except the header and footer. The header and footer have the XML tags but the data that pops them isn't present. I need to be able to pop those header/footer tags programmatically but, they don't get populated even when I open the files manually. Any ideas? TIA! David Tag: Creating a new word document Tag: 80813
  - 20
    - is it possible to create sequentialy numbering templets in word? I am creating work order templets and I am wondering if there is any way to generate a numbered identifier that will increase sequentialy as the work orders are generated? Tag: Creating a new word document Tag: 80812
  - 21
    - Launch VBA form from toolbay buttom I have made a VBA program & exported it out to a .frm. Is there a way to create a toolbar button to run the .frm which in turn would run the code in the background? Tag: Creating a new word document Tag: 80801
  - 22
    - Renaming a toolbar button Is there a way to programatically rename a toolbar button? Can I then access the name of that button as a string in another sub code? thanks, ck Tag: Creating a new word document Tag: 80800
  - 23
    - Template Creation When creating a template for another user to fill in the blanks, how do you format and fix template only allowing for the answers to be put in the underlined blanks? Tag: Creating a new word document Tag: 80796
  - 24
    - Identify Capital Paragraphs with VBA for word. Hi, How can I identify a paragraph that has all word in captial letters in Microsoft Word. For example: ROAD SAFETY SHOW We had a road safety show and we were walking along the road. Suddenly we started to dance and we got to know that a new ice cream shop has opened up. In the example above, I want to be able to identify "ROAD SAFETY SHOW" and then have the text formatted as shown below. #TITLE#ROAD SAFETY SHOW#/TITLE# We had a road safety show and we were walking along the road. Suddenly we started to dance and we got to know that a new ice cream shop has opened up. Can someone please help me with this? Thanks, Yash Tag: Creating a new word document Tag: 80792
  - 25
    - Speed in opening word documents and executing the word application I work in an office with 25 users which were all "refreshed" with new computers and upgraded to Windows XP Professional. All the applications open immediatly with the exception of "Word". It takes around 20 seconds to execute the application and about 45 seconds to open documents no matter how small the size. This is frustrating as the previous version "Windows 2000" was much faster. Most docs opened immediatly. Excell, Access, PowerPoint, in XP, all execute upon a click of the icon so why is Word different. I have called our helpdesk for assistance and believe they cannot figure this out or my request has been buried. Does anyone have a clue as to why this is happening?? Tag: Creating a new word document Tag: 80790

If I'm running code from a word doc. how do I create a new word document
(Word XP). Then how would I copy strData to that document. Sometimes I need
to make strData Bold
Thanks,
ck

Top

Re: Creating a new word document by Charles

Charles
Mon Feb 13 07:58:02 CST 2006

Uhm... What is StrData?
You create a new document with the Documents.Add function.
--
Charles Kenyon

Word New User FAQ & Web Directory: http://addbalance.com/word

Intermediate User's Guide to Microsoft Word (supplemented version of
Microsoft's Legal Users' Guide) http://addbalance.com/usersguide

See also the MVP FAQ: http://word.mvps.org/FAQs/ which is awesome!
--------- --------- --------- --------- --------- ---------
This message is posted to a newsgroup. Please post replies
and questions to the newsgroup so that others can learn
from my ignorance and your wisdom.

"Charlie" <Charlie@discussions.microsoft.com> wrote in message
news:004707F6-9A9D-4A6F-9D86-64A6E0B04F3C@microsoft.com...
> If I'm running code from a word doc. how do I create a new word document
> (Word XP). Then how would I copy strData to that document. Sometimes I
> need
> to make strData Bold
> Thanks,
> ck

Top