Tabstops

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - Creating secured word "Viewers" Has anyone built or came accross a way to share documents by creating a "viewer" type application. Issue: We sell a tool that produces high value documents. We have automated a complex sales process: ROI to the point that a large sales force can get by with only one user liscense. I am attempting to account for all of the true users of the documents. One solution would be to create a vba application that the user must sign into before opening the document. The sign in data gets validated against a web database server. The users must buy the viewer. We already have the technology in place to link the activated application to the cpu to prevent multiple users from sharing one sign on. Any thoughts, examples, etc..?? -- anthony sarno Tag: Tabstops Tag: 54189
  - 2
    - can't open word documents all of a sudden my word documents open up with a grey screen and microsoft word blinking at the top of the screen,also just above the task bar it says-running virus scan.when this happens nothing will get rid of the screen without rebooting.Any suggestions would be greatly appreciated thanks bob Tag: Tabstops Tag: 54188
  - 3
    - Unlocking a Protected Form Template Am working on "protect-unprotect method without losing form field data" macro to allow the user to insert documents, use tools that are normally not available in a Word2000 protected document, etc. I already have code written to do most of this. Once unlocked, is there an easy way to designate sections of the document, that when "clicked in", would automatically lock the document down again? Does VBA see "File-Close" and "clicking the "X" in the upper right corner of the active window as the "same thing"? And would an AutoClose macro cover both instances? ...your thoughts please Tag: Tabstops Tag: 54170
  - 4
    - Building a VBA Dropdown list I have a requirement to create in a form template a dropdown list. The items in the list, not only exceed the number of items, but the number of characters that the built-in dropdown field can hold. White building the list, is there code or a switch that can be used to make or allow the text to wrap or break? Tag: Tabstops Tag: 54169
  - 5
    - Line feed in wdDialogFileSummaryInfo.Title field? I'm building a template for documentation. I'm using a tree control on a user form to allow the user to select from a list of products. I'm storing the product name in the Title field. I'm using the contents of the Title field for the title on the cover page of documents based on my template. Sometimes the text I have to put there is too long for the available space and the line wraps. I want to be able to control the point where the line wraps. For example, rather than having something like: "Product Family Product Variation Name" I need to have: "Product Family Product Variation Name" Right now I'm populating the tree control from an extensive collection of Add statements but I wrote those before I realized the line wrapping would be problematic. The tree control doesn't care about line wrapping... it just puts horizontal scroll bars in place to allow me to see the whole text string. So now, I've got the text that I want to use in a spreadsheet in two columns... Line One and Line Two. What I figure I'm going to have to do is examine the contents of the Line Two column and if there's text there, I want a line break before it. I wouldn't mind being able to populate the tree control out of the same spreadsheet file but that's not a dealbreaker. So what's the best approach I can take to make this happen? Do I need to abandon the concept of using the Title field? Is it possible to both populate the tree control (without line breaks) and create the value to insert in the Title field (with line breaks) from the same spreadsheet? Thanks for the help Mike Starr Tag: Tabstops Tag: 54167
  - 6
    - Aligning Decimals in Table I have numbers such as the following in some cells in a Word 2000 table which are pt\ut there by VBA. The numbers are in cells in column 1, in rows 5, 6 and 7 $40,000.00 for the first period $75,000.12 for the next period $100,000.19 at age 89 I would like to execute some VBA which would align the numbers by the decimal point so that the above would appear as $40,000.00 for the first period $75,000.12 for the next period $100,000.19 at age 89 I tried the following VBScript (see below) (which applies to the entire column) and all it does is move numbers such as 3. in other cells of column 1 off to the right but has no effect on the dollar amounts mentioned. How does one do it?? Thanks Jim Sub DecimalTabStopInTableColumn() Dim tbl 'As Word.Table Dim col 'As Word.Column Dim cel 'As Word.Cell Set tbl = objWord.ActiveDocument.Tables(1) Set col = tbl.Columns(1) For Each cel In col.Cells cel.Range.ParagraphFormat.TabStops.Add 40,wdAlignTabDecimal,wdTabLeaderSpaces 'Alternative: ' cel.Range.Paragraphs.Style = "TableColumnDecimalAlign" Next End Sub Tag: Tabstops Tag: 54166
  - 7
    - AutoCheck text to another document. What I'm trying to accomplish is to control electronic controlled documents in our company. People keep pulling the word files from the Quality folder to their desktop thus created extra uncontrolled documents. What I would like to do is create a macro or vba code that would autocheck a date on the document located in the quality folder to the one that is open. If its the same then fine if its not then it would stop them from using it. Any help, suggestion, sample code, website, etc.. would greatly be appriciated. TIA Tag: Tabstops Tag: 54162
  - 8
    - Pausing Macro, Returning to Pause Point I am working on automating a document compilation task. The number of potential documents to be included in the single document number in the hundreds, and eventually each document will be automated as well before inclusion in the final compilated document. It is unlikely a user would be able to complete the process in a single sitting, both because of the number of documents involved but also because the user may not have all of the information needed to complete the task and may have to look something up. On a userform, I would like to be able to give the user the option to quit and return to the project later where they left off. Basically, I have one userform where the user selects the documents to be included in the project. When the user selects "OK", the documents selected begin compiling. When a document is reached that is automated, a userform for that document appears, the user makes the appropriate selections and that document is then added. The process continues when the user closes the userform until the last document selected has been added. I can save the values of the userform so that if the user quits he can return to the userform with the values he selected saved. The problem is that if a user quits, he quits in the middle of a macro that is running. Is it possible to not only return the values entered on the userform, but to also be able return to the point in the macro where the macro quit running when the user quit? Thanks for any help John Tag: Tabstops Tag: 54159
  - 9
    - Macro doesn't perform I am trying to insert preformatted frames in a document. First just recorded a macro of inserting a frame, but then I was unable to record the steps for selectiong and altering the size and fill color. Next I formatted a frame the way I like and created an AutoText entry "AddFrame". I can use Insert>Autotext to insert the frame and I can recorde a macro of preforming that step. The recorded macro looks like this: Sub Macro1() Application.DisplayAutoCompleteTips = True NormalTemplate.AutoTextEntries("AddFrame").Insert _ Where:=Selection.Range End Sub For some reason when I fire this macro nothing happens. Can anyone explain? Tag: Tabstops Tag: 54158
  - 10
    - Differentiating in the Dictionary Hi all, I have a brilliant question. Is it possible to distuinguish between proper nouns and regular words using the Word Dictionary in VBA? I mean, I am looking for a function that will give me a result like this: IsItName("John")=True IsItName("Anything")=False IsItName("Kerry")=True Thank you for your time. Vince Tag: Tabstops Tag: 54157
  - 11
    - Tiff multi page image in word Hi, Can anyone tell me how to insert Tiff multi page image file in Word Thanks in advance Ravi Tag: Tabstops Tag: 54152
  - 12
    - Using OR condition in findtext Hi all, I would like to know if it is possible to search for more than 1 text using find. I mean something like, Selection.find.execute findtext:="A" or "B" and so on... I know I could use an array to do the search for each findtext string, but something like this would make my life easy! Please let me know. Thanks a lot. Vince Tag: Tabstops Tag: 54149
  - 13
    - Macro not always works I have a macro in a Word document, which works okay except that the last 2 lines sometimes execute and sometimes don't. They are ActiveDocument.Save ActiveDocument.Close What might the reason for this be, since the rest of the macro always works! -- Les Tag: Tabstops Tag: 54148
  - 14
    - Document.PrintOut2000() This is a multi-part message in MIME format. ------=_NextPart_000_001E_01C47594.4EE2C2F0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable HI, I am trying to convert a word document into pdf using the code below. If = i provide the OutputFileName i.e. is my oDestinationPath then the word = document is converted to the pdf, but when i try to open the same i get = a message "Acrobat could not open '_h0071.pdf' because it is either not = a supported file type or because the file has been corrupted". Although = if I provide oMissing to the OutPutFileName then the file is created on = the desktop and opens fine. I want to control where the file is placed. object oDestPath =3D @"c:\ZZZZ\_h0071__.pdf"; wordApp.ActivePrinter =3D "Acrobat Distiller"; // Print wordApp.ActiveDocument.PrintOut2000(ref oBackground, ref oMissing, = ref oMissing, ref oDestPath, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref = oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing); Please tell me what am i doing wrong. Thanks in advance Rahul ------=_NextPart_000_001E_01C47594.4EE2C2F0 Content-Type: text/html; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <META content=3D"MSHTML 6.00.2800.1400" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY> <DIV><FONT face=3DArial size=3D2>HI,</FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2>I am trying to convert a word document = into pdf=20 using the code below. If i provide the <FONT=20 size=3D3><STRONG><EM>OutputFileName  </EM></STRONG></FONT><FONT= =20 size=3D2>i.e. is my oDestinationPath then the word document is converted = to the=20 pdf, but when i try to open the same i get a message "<STRONG>Acrobat = could not=20 open '_h0071.pdf' because it is either not a supported file = type  or=20 because the file has been corrupted</STRONG>". Although if I provide = oMissing to=20 the OutPutFileName then the file is created on the desktop and opens = fine. I=20 want to control where the file is placed.</FONT></FONT></DIV> <DIV><FONT face=3DArial size=3D3></FONT> </DIV> <DIV><FONT face=3DArial size=3D2>   object oDestPath =3D=20 @"c:\ZZZZ\_h0071__.pdf";<BR></FONT><FONT face=3DArial=20 size=3D2>   wordApp.ActivePrinter =3D "Acrobat=20 Distiller";</FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2>    //=20 Print<BR>    wordApp.ActiveDocument.PrintOut2000(ref = oBackground, ref oMissing, ref oMissing, <STRONG>ref oDestPath</STRONG>, = ref=20 oMissing, ref oMissing,<BR>     ref oMissing, = ref=20 oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref = oMissing,=20 ref oMissing,<BR>     ref oMissing, ref = oMissing, ref=20 oMissing, ref oMissing);</FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2>Please tell me what am i doing = wrong.</FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2>Thanks in advance</FONT></DIV> <DIV><FONT face=3DArial size=3D2>Rahul</FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2> </DIV></FONT></BODY></HTML> ------=_NextPart_000_001E_01C47594.4EE2C2F0-- Tag: Tabstops Tag: 54143
  - 15
    - Document variables I am having problems assigning the value of document variables to a text box in VBA. It seams that the active document index for a document variable changes every time I create a document variable. For example, when I start creating variables the first one is usually indexed as 1 then the next would be 2 and then I find that it jumps a few, then when I create a few more variables the active document index goes wild and I am unable to access the variables. The question: How do I find out what active document variable index number each of the document variables is at and is there another way of getting the value of the document variables in VBA. Before the document variable idea, I was using the includeText field to map to external files. The problem with the includeText field feature is that it is not portable. What I would like to do is make the path changeable in VBA. If anyone can help, it would be appreciated. Thanks in advance. Tag: Tabstops Tag: 54137
  - 16
    - Forms On a form is there a way that you could set the tabs to tab in an order that you choose???? Tag: Tabstops Tag: 54133
  - 17
    - Creating Auto Section Headers I use Word 2000 to create time lines of criminal investigation, which often exceed 50 pages in length. Because of the extensive detail in which each event is described, it is not uncommon for several pages in a row to be without a section heading. This results in reader often loosing track of where they are chronologically in the document. Therefore, I am trying to figure out a way to print the most recent Level 1 section heading, which is the date, as a header atop each page. This would allow the reader to see where they are at anytime, just as one can do by referencing the top of a page in a dictionary and seeing the first and last words listed on the page. Any help would be greatly appreciated. Christian Tag: Tabstops Tag: 54131
  - 18
    - How to remove AutoOpen macro Hi! Using VBA I try to develop a procedure that will loop a folder and will remove the AutoOpen macro from every file. Due to an error in a template every file built from that template contains the macro. Thank for any help! Aline Tag: Tabstops Tag: 54127
  - 19
    - How to identify 1st blank row in an Excel spreadsheet? Anyone know how to do this via VBA? I'm using a macro to define a print area by specifying columns but I'm pulling blank rows in the resulting printout. Is there a way to get Excel to ignore blank rows in a print area? In this case, the blanks are at the bottom of the spreadsheet so if I could tell me the last row containing data (or the first blank row), it would work. But I may also need to find a way to skip blank rows within a spreadsheet for another situation. Thanks, JoAnn Tag: Tabstops Tag: 54125
  - 20
    - The Next Level Hi, I am applying some of my limited skills to create a macro that will tally checkboxes in a Table column. The following is working good. I became interested in the line Sub TallyColumnOfCheckboxes() Dim cTotal As Integer, i As Integer cTotal = 0 For i = 1 To ActiveDocument.Tables(1).Rows.Count On Error Resume Next cTotal = cTotal - ActiveDocument.Tables(1).Cell _ (i,1).Range.FormFields(1).CheckBox.Value On Error GoTo 0 Next i ActiveDocument.FormFields("Total").Result = cTotal End Sub I became interested in the line: (i,1).Range.FormFields(1).CheckBox.Value and was wondering how would I extend this macro to count each checkbox in a cell if the cell contain multiple checkboxes. I deduce that this would require replacing .FormFields(1) with something like .FormFields (j) creating a For j = to .... but I can't get my head around it. Ideas? Thanks Tag: Tabstops Tag: 54124
  - 21
    - Selecting and Printing Text Across Multiple Bookmarks Let's say I have a document with 6 bookmarks, bm1 through bm6. Between bm2 and bm4 are 2 section markers. I need to print from bm2 up to bm4. How do I select across multiple bookmarks and print that range, which may include multiple sections? Thanks. Tag: Tabstops Tag: 54121
  - 22
    - Table and Picture in Word Header Using VBA, I insert a file with tab delimited fields into a Word header and then use "ConvertToTable" and it works fine. Now I'd like to have a logo picture ABOVE the table but it keeps putting it INTO a cell of the table. It seems as though the table insists on taking up the entire space of the header no matter what I do. In VBA, How do you get a bmp logo to appear in the header above the header table??? Thanks Tak Tag: Tabstops Tag: 54117
  - 23
    - Search macro I need the simplest macro in the world -- to do a Find of the next instance of Heading 1 (any character). The following, which was generated by keystrokes and not edited, will not work. The search either does not take place or it is unsuccessful. Can you see what might be wrong with this code? Thanks. Selection.MoveRight Unit:=wdCharacter, Count:=1 Selection.Find.ClearFormatting Selection.Find.Style = ActiveDocument.Styles("Heading 1") Selection.Find.ParagraphFormat.Borders.Shadow = False With Selection.Find .Text = "" .Replacement.Text = "" .Forward = True .Wrap = wdFindContinue .Format = True .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute Selection.MoveLeft Unit:=wdCharacter, Count:=1 Tag: Tabstops Tag: 54112
  - 24
    - How to disable one of the page from Multipage ? I have such a formula: If CheckBox1 = False Then I'd like to Disable One page from Multipage Form named Page3 I have one Multipage1 (Page1, Page2, Page3). How to do that ? Thanks for your help Peter Tag: Tabstops Tag: 54107
  - 25
    - updatable link to MS Access field ? Hello, BRIEF DESCRIPTION: How can I insert in Word a 'dynamic' link to a particular field in an Access Database? LONG DESCRIPTION: We're faced with the following issue for a big documentation project. Basically, the project would consist of maintance documentation which would be stored in: - several hundreds of Word files, containing descriptions, removal procedures, etc. - an Access database containing (among other things) a table with 2 fields: ToolNumber and ToolDescription. In the Word documents, we would like to insert one or more tool numbers and tool descriptions, as retrieved from the database. For example, through some Word VBA form, the author would selected tool number "T103" and at the current position in his document this tool number "T103" and corresponding description "Torque wrench M=30 Nm" would be inserted. The problem is that we want this to be 'dynamic': if the description of the tool is changed in the Database, then the description should change in the Word document as well. Either upon opening of the Word document or after some kind of command (e.g. F9 or VBA macro, or ...) My idea is upon inserting in Word to put the tool number text and description text in a specific style (e.g. "ToolStyle") and write a Word VBA application that will: - scan the document for this style, - look up the toolnumber in the Access Database, - retrieve the (new) description, - and (if changed) replace the old description in Word. I'm not sure this is the best possible solution. Does anybody has some easier or/and more bulletproof or/and non-VBA solutions, that will do the job? Maybe a special Word field exist to link Database fields? Really appreciating any thoughts and ideas, Ward Tag: Tabstops Tag: 54106
- Next
  - 1
    - Highlighting, then typing - AND IT DOESN't DELETE!!! Something mad has suddenly happened to my Word - when I highlight a bit of text, then type something else to go over it, it now keeps the highlighted bit. I didn't realise how annoying this is until I realised how much I use the highlight/ delete facility, by not being able to use it. HELP! Tag: Tabstops Tag: 54105
  - 2
    - Section TOC Hi I am using Word XP. I would like to automate my procedure of inserting a table of contents relating to an individual section. Currently I highlight the section, name it as a boomark, insert a table of contents at the top of the section (underneath the heading)and then modify the field code to only look for data in the bookmark:-see below {TOC \h \z \t "Section Sub Heading,2" \b SectionTwo} Section Sub Heading is the name of my style I wish to be listed in my Section TOC. \b is the switch, followed by the name of the bookmark SectionTwo What I would like to be able to do is automate the whole procedure. Here is my idea, I would really appreciate some advice on whether you think this is a good way to go about it and also some advice on a couple of commands I have been unable to find information about. I have the code for finding the number of sections in my document, I will then loop through each section in the document highlighting each section and naming it as a boomark. I would like the name of the bookmark to be the number of the section (Section2,section7 etc..) How do I find out the number of the section I have highlighted?? I can then insert an extra paragraph after the first paragraph then insert a TOC. How is best to automate the insertion of a TOC and then add the switch \b followed by the name of the current section bookmark. I am really trying to decide whether automating this procedure will be worthwhile. I would be grateful fo any input. Thanks very much for your time. Kerry. Tag: Tabstops Tag: 54104
  - 3
    - Incrementing an invoice number every time the template is printed Hi all, I was wondering if someone could help me with the below problem I am having. I would like to create a template with an invoice number incrementing. I have the coding to do this via a macro that the invoice number increments every time you open the template. What I would like to do instead is after having created a bookmark for the invoice number, that every time I print the template (for example ... 20 pages), the invoice number increments, saves to the bookmarked area and to a text file. If I was to open and print the template again (for example ... another 20 pages) then the invoice number will continue to increment (I.e. 21, 22, 23 etc) from the previous time the template was opened. I am hoping I can have this problem solved as soon as possible. I thank you in advance for any help you can offer me. Tag: Tabstops Tag: 54101
  - 4
    - Converting to Number using VBA This is a multi-part message in MIME format. ------=_NextPart_000_0008_01C474AA.9B597510 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable I have a cell which gives the warning "The number in this cell is formatted as text." Using VBA, I change the format of the cell to a number format. However, Excel still shows the warning.=20 I look at the cell using Format | Cells ... which says it has the number format set by my VBA code. Is there some VBA function I have to use on the cell to make it convert to a number? Thank you for your help. ------=_NextPart_000_0008_01C474AA.9B597510 Content-Type: text/html; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <META content=3D"MSHTML 6.00.2800.1400" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY> <DIV><FONT face=3DArial size=3D2>I have a cell which gives the = warning</FONT></DIV> <DIV><FONT face=3DArial size=3D2>"The number in this cell is formatted = as=20 text."</FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2>Using VBA, I change the format of the = cell to a=20 number format.</FONT></DIV> <DIV><FONT face=3DArial size=3D2>However, Excel still shows the warning. = </FONT></DIV> <DIV><FONT face=3DArial size=3D2>I look at the cell using Format | Cells = ... which=20 says it has</FONT></DIV> <DIV><FONT face=3DArial size=3D2>the number format set by my VBA = code.</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>Is there some VBA function I have to = use on the=20 cell to make it</FONT></DIV> <DIV><FONT face=3DArial size=3D2>convert to a number? Thank you for your = help.</FONT></DIV></BODY></HTML> ------=_NextPart_000_0008_01C474AA.9B597510-- Tag: Tabstops Tag: 54086
  - 5
    - bookmark I'm using Visual Studio 6 to write a Visual Basic app that opens an existing word document template and makes a number of changes and additions to it. I'm having a difficult time in trying to, among other things, move the cursor (the insertion point) to the end of the file or to a bookmark. Here's the code: Set CurrentDoc = GetObject("C:\data\SSATemplate.doc") CurrentDoc.ActiveWindow.Visible = True ' Move cursor to a bookmark CurrentDoc.ActiveWindow.Selection.Goto What:=wdGToBookmark, Name:="PathDataStart" / Move cursor to the end of the document CurrentDoc.ActiveWindow.Selection.Endkey Unit:=wdStory, Extend:=wdMove The document opens with no problems but when I try to move the cursor to the bookmark (the only bookmark in the entire document), I get the error message: Error 5102: You entered multiple destinations for a page, line, footnote, endnote, or comment. When I try to move the cursor to the end of the document, I get the error message: Error 4102: Bad parameter I've tried everything I can think of to fix the problem, to no avail. Any help would be appreciated. Thanks in advance. Tag: Tabstops Tag: 54082
  - 6
    - How to prevent editing on a merged document based on a dot templa Does anyone know how to prevent the user from editing a merged document created by an application? We use a dot net application to create a mail merge and when the user chose so can view the merged document with all the bookmarks populated with appropriate data. The user does not want to be able to edit the merge document. Is there any way to control that through the word object model in dot net or through IE? After the document is composed it is displayed to the user through a browser redirection. So if we can't disable editing in Word can we do in Internet Explorer? Thanks -- KnowledgeSeeker Tag: Tabstops Tag: 54075
  - 7
    - Win/Word XP *always* asks for Enable - any help? Ever since I was "upgraded" to Windows XP Pro and Word XP, I've tried unsuccessfully to get Word to recognize my macros on opening. I can not get a digital signature to stick. I've tried various methods from this NG and the KB, but no go. Besides just wanting to hit a custom button without having to enable macros, this really hampers automating from VB6. Any code trying to open Word for the first time gets hit with the Enable Macros box. If I have to be there to hit Enable, I've defeated half my automation! Any suggestions? Ed Tag: Tabstops Tag: 54074
  - 8
    - Problem with SendKeys and first Capital letter Hi when usign sendkeys in my vba programs I often run into ptoblem that the first capital letter that sendkeys types comes out twice. I suspected many things but my best guess it's somethign to do with AS YOU TYPE options that auto correct soem thigns, since mimics user typing. However I have not been able to find the actual option responsible for this. Has anyone else had simular problem? If it has to do with AS YOU TYPE what should I do so that the program works perfectly in any word no matter the AS YOU TYPE settigns? If that's not what to blame, then what is? Tag: Tabstops Tag: 54069
  - 9
    - Getting Project name from properties? HI Folks, Can anyone tell me how I can get the Project name from the properties of the project? e.g. say my project is called myproject and I want to add a ref, my current code says Project1.ThisDocument.VBProject.References.AddFromFile RefName Any pointers? Cheers J Tag: Tabstops Tag: 54062
  - 10
    - Using VB.Net or C#, utilizing the clipboard object, how to copy an MS Excel graphic from the clipboard to an image control and obtain its source reference Hello, Here is what I'm trying to do: -- Make sure both MS Excel and MS Word are running -- Create an Excel chart -- Save the Excel file -- Copy the Excel chart onto the clipboard using Ctrl + C -- Go to Word and look under Edit > Paste Special -- Note there is a source reference and an option to paste the chart as a metafile, etc. -- I would like to take this same information and make it available in a C# or VB.Net app For example, create a simple Windows application with a userform, an image control, a label and a single command button. Let's say that after the Excel chart is on the clipboard, one clicks the Windows application command button and Voila!, the imate control now contains a copy of the Excel chart and the label contains the reference information. I can make this work utilizing older technologies (i.e. WIN API to access the clipboard, etc.). Using the WIN32 API, there is a clipboard format called "OwnerLink". Similarly to the .Net clipboard, one would register this format, check for it on the clipboard and then retrieve using several API calls. There are also clipboard formats called "Link Descriptor" and "Object Descriptor" under WIN32. It appears that, under .Net, there are currently no methods or properties available to extract a source reference when a user places an Office object / graphic on the clipboard. If there is a workaround, by all means, please share. Any assistance would be appreciated. Best Regards, Todd Tag: Tabstops Tag: 54055
  - 11
    - Form on top I can see how to make a form stay on top in VB, but not in Word VBA (Word 2002). The call might be: Call SetWinPos(SortForm.hwnd, True) wirh the appropriate API code. But VBA does not seem to support the property .hwnd Can anyone help? Tag: Tabstops Tag: 54054
  - 12
    - Referencing Macros Hi All, Basically my problem is this - I have created a mail merge document from an access database and want to date stamp the records each time they are printed from the mail merge (i.e. some printed one day and stamped with that date, others on another day). The only way I can think of doing this is to create a macro in Access to stamp a field with the current date but how do I reference this from word and can I stamp specific records or will I need to stamp them all? Cheers Dunner Tag: Tabstops Tag: 54051
  - 13
    - Images are not displayed in Word2003 Running Win2KSP4 & all patches - Word2K3SP1 Since a while now I can't see images anymore in some documents which were generated as WordML (through xslt transformation). I can't remember when this problem exactly occurred for the first time and thus heave no idea what could have caused it. In the near past these documents have been displayed succesfully on my machine. When I open these documents on another machine (same setup) the images are still visible though. Remark1: I have the option show imageplaceholders disabled in Word (checkbox = empty) Remark2: When I make a new document on my machine and put some images in I can see them normally. Thanks for your time. Romain Tag: Tabstops Tag: 54049
  - 14
    - STORING VARIABLES UNTIL YOU CLOSE WORD I store values in a Access database (company details) and want to use it throughout word but I do not want to use: activedocuments.variables.add Name:=CompName Value:=CoName Obviously activedocument isn't open as yet when you open word and it must also be available when you create new documents. I have tried the option abovementioned as well as: Thisdocument.variables.add etc but to no avail. Tried placing it in the AutoNew, AutoExec etc. macros but no go. I use the whole template as an add in. All the above options work but not as well as I want it to. What I am trying to find out if it is possible to use a program variable or field instead of a docvariable or perhaps the registry entry but word must keep the values until you exit word. Tag: Tabstops Tag: 54043
  - 15
    - Workflow designer OnExpire Event I'm using SQL Server 2000 with OfficeXP Developer in order to create workflows. I'm trying to manage expire transition; the OnExpireValidate and OnExpire events work fine, but the OnEnter event on the ending state of the expire transition is never raise. It seems that the expire transition don't cause the status change even if start and end state are configured ok. Anybody can help me? Tag: Tabstops Tag: 54042
  - 16
    - Word 2003 Temporary macro storage could not be opened. Using W2K- Word2K3 both fully patched Whenever I open a template containing VBA code I get an error message stating that "the temporary macro storage could not be opened" (Isn't the exact message though, I'm using a dutch version of Word so the error message is in Dutch. Exact frase is: "De opslagruimte voor macro's kon niet worden geopend"). - I have thrown away the normal.dot file - I removed all tmp-files I could find. - I put the template on a local drive - I tried to open the template on another Pc (also running Word 2K3) which was succesful. All this didn't solve the problem. Any clue? Thanks for your time. Romain Tag: Tabstops Tag: 54040
  - 17
    - Using DocVariables I am monkeying around with a template that will let me make documents to show/hide details, instructions, etc. I am using an IF field (e.g., {IF {DOCPROPERTY ShowHide1} = "Show"{Autotext Event1}} It is working OK, but I need some advice on the macros. The basic problem is that as I add events I need to define the docvariables on first use. My first stab was the following without the amplifying directions and the result of course was an error indicating the Object (ShowHide3) had been deleted. The real truth is that it had never been created. The solution was to create it once using hte immediate window as incidcated: (Please read on) Sub ShowHideEvent3() Dim Toggle As String 'This macro is simplified. Create the initial document variable by using the following code 'in the immediate window: 'ActiveDocument.Variables.Add Name:="ShowHide3", Value:="Hide" Toggle = ActiveDocument.Variables("ShowHide3").Value If Toggle = "Show" Then ActiveDocument.Variables("ShowHide3").Value = "Hide" Else ActiveDocument.Variables("ShowHide3").Value = "Show" End If ActiveDocument.Fields.Update End Sub Next, with some earlier help from Dave Lett, I adapted the above to use an error handler: Sub ShowHideEvent1() Dim Toggle As String 'This macro uses a error handler and resume command to create the variable on first use. Dim err_handler On Error GoTo err_handler Toggle = ActiveDocument.Variables("ShowHide1").Value If Toggle = "Show" Then ActiveDocument.Variables("ShowHide1").Value = "Hide" Else ActiveDocument.Variables("ShowHide1").Value = "Show" End If ActiveDocument.Fields.Update End err_handler: ActiveDocument.Variables.Add Name:="ShowHide1", Value:="Hide" Resume End Sub Dave Lett not to settle for such an ugly solution suggested something like: Sub ShowHideEvent2() 'This macro searches for the variable name and if not found creates it. Dim bExists As Boolean Dim Toggle As String Dim oVar As Variable For Each oVar In ActiveDocument.Variables If oVar.Name = "ShowHide2" Then bExists = True End If Next oVar If bExists = False Then ActiveDocument.Variables.Add Name:="ShowHide2", Value:="Hide" End If Toggle = ActiveDocument.Variables("ShowHide2").Value If Toggle = "Show" Then ActiveDocument.Variables("ShowHide2").Value = "Hide" Else ActiveDocument.Variables("ShowHide2").Value = "Show" End If ActiveDocument.Fields.Update End Sub Each method seems to work, but doesn't feel right. Am I looking for something that just isn't there?Please advise. -- Greg Maxey A peer in "peer to peer" support Rockledge, FL To e-mail, edit out the "w...spam" in gmaxey@whamspammvps.org Tag: Tabstops Tag: 54030
  - 18
    - Automatically running a macro when printing Hi, folks. In WORD XP Microsoft has disabled the function that had allowed the user to automatically update links and fields in a document before printing. The option seems to be available (it is included in the tools/options/print screen) but it does not work. After an exhaustive session with Microsoft support, it transpires that this function has been disabled as a security measure. The workaround is to create a macro (eg AutoOpen) that updates links and fields when you open a template. However, I want to update links and fields as I print. Is there a VBA command that will automatically run a macro prior to printing? Tag: Tabstops Tag: 54028
  - 19
    - Need a Macro-Removing Check Boxes I have a spec sheet that is very long but below is just an example of it. What I am in need of is a macro that will automatically remove any check box that is uncheck along with its label. And then remove any spaces between the check boxes. This is first an example with everything: (The " 0 " are checkboxes but that is how it pasted) Interior Frames: 0 No; 0 Yes; 0 Standard; 0 Custom Steel; Construction: 0 Welded; 0 Knocked-Down; 0 Knocked-Down Now this is how I want it to look if the "Standard" and "Knocked-Down" check boxes are the only ones checked. Interior Frames: 0 Standard; Construction: 0 Knocked-Down; Can anyone help with this macro text. Thank you, Sean Tag: Tabstops Tag: 54024
  - 20
    - macro to save doc as contents of a specified field I would like to save my doc named as the contents of a bookmark which will change with each use. Tag: Tabstops Tag: 54021
  - 21
    - F1 (help) does not work for ADODB in Object Browser Problem: F1 (help) does not work for ADODB in Object Browser Office 2003, Windows XP Professional ADODB is contained in MSADO15.DLL. It appears in the References dialog box (available from the Project menu) as "Microsoft ActiveX Data Objects 2.7 Library". I have it checked and its' functions are working. However, when I am in the Object Browser and use F1 on any of the ADODB objects, the Help window comes up but is blank. The F1 works fine on other library modules like VBA, Excel, etc.. Is there something somewhere that needs to be installed using the References dialog box to make the help work for ADODB. Thank you for your help. Tag: Tabstops Tag: 54016
  - 22
    - Answering a MsgBox with VBA code? The following recorded keystroke macro: Sub Macro1() ' ' Macro1 Macro ' Macro recorded 7/27/2004 by xxxxx ' Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "^p" .Replacement.Text = " " .Forward = True .Wrap = wdFindAsk .Format = False .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute Replace:=wdReplaceAll End Sub Fails to record the last user action, clicking on the "No" option of the MsgBox that inquires "Word has finished searching the selection, would you like to search the remainder of the document?" Is there a vba statement that I can manually add that will automatically answer "No" to that MsgBox? Thanks, Fred Holmes Tag: Tabstops Tag: 54014
  - 23
    - Field code: NumPages I did this once before in Word '97, but can't remember exactly how! When inserting the Page and NumPage fields into a header or footer, how do I have the NumPage field show something other than the "real" total number of pages, in other words, I don't want it to count the two pages preceeding it. I used something like: "Page {PAGE} of {= (StartingNumber -2) + {NUMPAGES}} in a Word 97 proposal and it worked, but only get an error message in my 2000 document. Any assistance would be greatly appreciated as always...best regards Tag: Tabstops Tag: 54006
  - 24
    - Current page number How can I define a variable (zz) equal to the page number of the current page of the document in VBA. I already in the macro place the cursor on a specific page and now I need that the macro determine the page number to compare it to no if it's a odd or event page with Mod fonction. Thanks for help Mario Tag: Tabstops Tag: 54005
  - 25
    - Counter/Invoice Number How can i produce a counter in Microsoft Word, that adds 1 to the previous printed copy. Thanks Tag: Tabstops Tag: 53996

Using VBA how to move to the next Tabstop ?

I have 4 tabstops, and I want to type something at each of those tabstops. Using Selection.TypeText("\t") works only if the string in the previous tabstop is long enough to push it to the next tabstop. Any ideas anyone?

Top

Re: Tabstops by Doug

Doug
Sat Jul 31 05:58:59 CDT 2004

Selection.InsertBefore String1 & vbTab & String2 & vbTab & String3 & vbTab &
String4 & vbTab & String5

--
Please respond to the Newsgroup for the benefit of others who may be
interested. Questions sent directly to me will only be answered on a paid
consulting basis.

Hope this helps,
Doug Robbins - Word MVP
"TechieGator" <> wrote in message
news:BC906E9B-231B-49E9-9C24-3648FF980B13@microsoft.com...
>
> Using VBA how to move to the next Tabstop ?
>
> I have 4 tabstops, and I want to type something at each of those tabstops.
> Using Selection.TypeText("\t") works only if the string in the previous
> tabstop is long enough to push it to the next tabstop. Any ideas anyone?
>
>

Top

Re: Tabstops by Helmut

Helmut
Sat Jul 31 13:53:28 CDT 2004

Hi,
you don't have 4 tabstopps. You have defined the position of
4 possible tabstopps, but the tabs aren't yet there. I'd say,
create a line, which might be a paragraph in your case, with
the 4 tabs and jump from one to the next, maybe using a macro
"GotoNextTab", like "collapse", selection.find "^t", plus
"collapse" again.
---
Greetings from Bavaria, Germany
Helmut Weber, MVP
"red.sys" & chr(64) & "t-online.de"
Word XP, Win 98

Top