Hidden Word Instance Grabs Focus Whist Runnng VBA Code

Tutorials Win: Microsoft Windows Forum

- Previous
 - 1
 - Database vs. shared drive Hi Iâ??m about to develop at system, where the user can create a standard document, by choosing among hundreds of standard paragraphs (documents). Right now, all the documents (Word) are placed on a shared drive, and only the filename, path and description is stored in a database â?? and that solution works fine. But why not save all the documents in the database as well? I donâ??t knowâ?¦. Do you? I need some advice. Will I gain anything by saving the document in a database? Thanks in advance Jan Amdi Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79478
 - 2
 - Mark text of document for extraction Have a large documnt about 6700 pages long, am basically trying to figure out a way to extract certain pieces of info out. I have tried Finding the text and copying it to another document, which works for a while, but it is too large, and crashes eventually. I have tried Finding the text, and marking it with special characters, thinking I could then sort the document, but it says the document is too large for sorting. Does anyone have any ideas? Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79474
 - 3
 - Speeding up large documents I have adocument with 6700 pages. When it opens, it ties down the computer because it is trying to spell check everything and paginate. Can I turn these things off with VBA Code in an Auto_Open sub? I have unchecked the spelling and grammar boxes in options, but I still see the book and pencil icon on the bottom indicating it is still checking the document. Using Version 2002 Sp-2 on XP Professional. Thanks. Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79470
 - 4
 - Row cursor position in Word via VBA Hi, How can I get row number at the Cursor position in VBA Word XP? Thanks ken Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79467
 - 5
 - Underlining words like the speelc-hecker/smart tags Hello, I am implementing a VSTO-based Word customization that must validate some part of a document. When a given range is not valid, I would like to underline it with a squiggle, just like how it is done by the spell checker, or by the smart tag engine when it recognizes words. I want to retain the style of the parts that are marked as invalid, so I am looking for a way to do this without changing the underline and underline color properties. Does anyone know if there is an alternate way to do this ? Thanks a lot. -- Cyril Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79465
 - 6
 - API GetCommandLine in Word XP returns empty string Hi, We developed a macro in which we read out the commandline. We use the API call "GetComandLine" for this. It works great when we use Windows 2000 with Office 2000, but when we run the macro under Windows 2000 with Office XP, the API call returns an empty string. Is there a difference between Office 2000 and Office XP? Thanks, Hendrik Jan Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79464
 - 7
 - Option Explicit Before my hard drive crashed, whenever I opened a new document and then went to the VBE, Option Explicit was listed as the first entry on a New Project. That is the case on my PC at work as well. After reinstalling Word on my new PC, I can't seem to get Option Explicit to appear as the default first line. I have checked Tools>Options>Editor>Require Variable Declarations, but I still have to manually type in Option Explicit at the start of each new project. Any ideas how to make Option Explicit appear as default? Thanks Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79463
 - 8
 - How do I remove ..."with Plain Text format." message in word ? Hi, We installed Office 2003. We have an application that uses Word as an editor. However since the installation of Office 2003 we repeatedly get this annoying message: "<filename.doc> may contain features that are not compatible with Plain Text format. Do you want to save the document in this format ?" followed by instructions. This message is not wanted, how do we disable it ? remove or nuke it - our users are very annoyed with it. Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79461
 - 9
 - Finding and Replacing using macro Hi, I have had a working macro that search a text for a string, then selects the other part of the same sentence and change its font and size. The code is as follows: Sub mac2() For Each myStoryRange In ActiveDocument.StoryRanges myStoryRange.Find.Execute FindText:="%%%", Forward:=True myStoryRange.MoveEnd Unit:=wdParagraph, Count:=1 While myStoryRange.Find.Found myStoryRange.Font.Name = "David" myStoryRange.Font.Size = 12 myStoryRange.Find.Execute FindText:="%%%", _ Forward:=True, Format:=True myStoryRange.Font.Name = "Times New Roman" myStoryRange.Font.Size = 1 myStoryRange.Find.Execute FindText:="%%%", Forward:=True myStoryRange.MoveEnd Unit:=wdParagraph, Count:=1 Wend Next myStoryRange End Sub ------------------------------ The enclosed macro worked on Windows98SE / Word97. But it doesn't on XP/Word2003. Please help me adjust the macro so it will work on the new program. Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79456
 - 10
 - Using VB to place pictures behind text Hi all I give up! How do I set a picture to go behind text using VB? It doesnâ??t seem to be one of the WrapFormat.Type constants. Z-Order doesnâ??t seem to work either. Many thanks David Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79449
 - 11
 - error checking I have created a macro which uses a userform to retrieve data to create a folder on the network. That works fine. I have added error check to see if the folder already exists and this works fine. The problem is getting the macro to go back to the userform for them to amend the folder name for it to be created. The code follows, if anyone can help me out that would be great. I am quite new to VBA Private Sub cmdOK_Click() Dim MyFilePath As String Dim TestFolder Dim TestAlphaFolder If cboDept.Value = "Stourport" Then MyFilePath = "w:\data\_Clients\" If cboDept.Value = "Worcester" Then MyFilePath = "w:\data\_Clients\" If cboDept.Value = "Kidderminster - Business" Then _ MyFilePath = "w:\data\Business\_Clients\" If cboDept.Value = "Kidderminster - Civil" Then _ MyFilePath = "w:\data\Business\_Clients\" If cboDept.Value = "Kidderminster - Crime" Then _ MyFilePath = "w:\data\Business\_Clients\" If cboDept.Value = "Kidderminster - Family" Then _ MyFilePath = "w:\data\Business\_Clients\" If cboDept.Value = "Kidderminster - Probate" Then _ MyFilePath = "w:\data\Business\_Clients\" If cboDept.Value = "Kidderminster - Property" Then _ MyFilePath = "w:\data\Business\_Clients\" TestFolder = Dir(MyFilePath & txtMyFolderName) & "\" If Len(TestFolder) = 0 Then Handler: MkDir MyFilePath & Left(txtMyFolderName, 1) & "\" ClientFolders: MkDir MyFilePath & Left(txtMyFolderName, 1) & "\" & txtMyFolderName MkDir MyFilePath & Left(txtMyFolderName, 1) & "\" & txtMyFolderName & "\Bills" MkDir MyFilePath & Left(txtMyFolderName, 1) & "\" & txtMyFolderName & "\Documents" MkDir MyFilePath & Left(txtMyFolderName, 1) & "\" & txtMyFolderName & "\Correspondence" MsgBox (MyFilePath & txtMyFolderName & " created!") Else txtMyFolderName = InputBox("File " & txtMyFolderName & _ " already exists" & Chr(10) & Chr(10) & "Please type another folder name:", "File Exists", txtMyFolderName) End If frmFolderCreation.Hide End Sub Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79446
 - 12
 - Check if macro is present? Is there some way i can check if a macro is present. We are on the way to deploying a global template, which contains some macro code. Next step is then to integrate some code in our templates that calls code in this global template. But.... If someone for some reason hasn't received this global template, Word will fail, complaining about the missing resource since it doesnt have access to the function it calls. Are there any way I (in the code) can test if the global template is present, and then execute if present, and just cancel if it is not present. My goal is to letting people be aware of the missing global template, but not get any errors that opens the debug editor and so forth... /Anders Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79442
 - 13
 - How to split one document into two separate documents? I am working with very large Word 2003 Documents and am hoping that there is a method (maybe macro) of splitting the final document in two (e.g. From one â??LogReportâ?? document I will be left with one â??Logâ?? document and one â??Reportâ?? document). The pages I require for the â??Logâ?? document are intertwined with those for the â??Reportâ?? document. Unfortunately I can not have these documents split at the start due to the way each section compliments each other whilst engineers are conducting the required testing. I am not looking to view two sections of one document (split screen editing). Many Thanks, Damon Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79441
 - 14
 - In WORD: How do I set up topic LINKS? In WORD, I will create a menu of link topics. Once clicking on one of the links, I want to be routed to a paragraph (located further down in the WORD document) about that topic. Please advise. Please send the response to my work email address: Brentmunnings@spherion.com Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79432
 - 15
 - determine table cell value I have done vba in access and excel but in word I can't seem to get this right probably because it is right in front of my face. How do I use the value from a word table cell in a macro? The value of cell (1,1) will determine an action on cell(1,2) of table(1) and the value of Cell (1,1) needs to be displayed in a msgbox. -- JerryB Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79431
 - 16
 - create an email from a word form I have an Invoice Form which is filled in and printed from Word, I would like to add some code so this can also be emailed via outlook. Any Help Appreciated!!! Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79418
 - 17
 - How to secure Word VBA / macro? I need to create a word macro / VBA code that will open a separate Word document, print it and then delete the file printed. I need to make this reasonably secure. I have some experience with Excel VBA but not in Word. 1. Can / how do I create a macro / VBA that can only be executed by the user but not viewed or edited? 2. Can a user interrupt a macro / VBA (for example Ctrl-Break) while it is running? Is there any way to prevent that? If not, is there anyway to at least run some cleanup code if they do? 3. How secure are password protected Word documents? Does the password automatically encrypt the contents? 4. Do Word macros created from a Windows computer work when opened from a Mac? Thanks in advance. Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79415
 - 18
 - "Find this, insert page break": what approach? A report generated by an old database program dumps everything out in one long continuous file. That can not be changed. The resulting text file is opened in Word, and the users run a macro I wrote that finds the first line of each new record in the report and inserts a page break, so each new record begins on a new page. All runs well - until someone changes that first line! It's hard-coded into the macro as the string for "Find.Text = strFind". Then, of course, it's my macro that's broke! The header for each new record in the report has four lines. Each line is a separate paragraph. Each line will report the same item of information, such as: ITEM NO: SER NO: COLOR: BIN NO: The information at each label may or may not change, but these labels will remain fixed at their character positions in each line at each report header. (For instance, whether COLOR: is "blue" or "chartreuse", the BIN NO: label will always be at the same character position.) Is there an easy way to tell the macro to "find three or four paragraphs with these labels at these character positions", while disregarding whatever information may be presented at the label? Ed Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79410
 - 19
 - Creating Folders help I have written the below code. The code creates a folder dependent on the information from a form. That bit works fine but I can't get it to check whether the folder already exists and if so prompt the user to change the name. I have tried it with an inputbox, message box and with another form. Any help would be greatly appreciated. Private Sub cmdOK_Click() Dim MyFilePath As String Dim TestFolder Dim TestAlphaFolder If cboDept.Value = "Stourport" Then MyFilePath = "w:\data\_Clients\" If cboDept.Value = "Worcester" Then MyFilePath = "w:\data\_Clients\" If cboDept.Value = "Kidderminster - Business" Then _ MyFilePath = "w:\data\Business\_Clients\" If cboDept.Value = "Kidderminster - Civil" Then _ MyFilePath = "w:\data\Business\_Clients\" If cboDept.Value = "Kidderminster - Crime" Then _ MyFilePath = "w:\data\Business\_Clients\" If cboDept.Value = "Kidderminster - Family" Then _ MyFilePath = "w:\data\Business\_Clients\" If cboDept.Value = "Kidderminster - Probate" Then _ MyFilePath = "w:\data\Business\_Clients\" If cboDept.Value = "Kidderminster - Property" Then _ MyFilePath = "w:\data\Business\_Clients\" TestFolder = Dir(MyFilePath & txtMyFolderName) & "\" 'If TestAlphaFolder = Dir(MyFilePath & Left(txtMyFolderName, 1) & "\") Then GoTo ClientFolders If Len(TestFolder) = 0 Then Handler: MkDir MyFilePath & Left(txtMyFolderName, 1) & "\" 'ClientFolders: MkDir MyFilePath & Left(txtMyFolderName, 1) & "\" & txtMyFolderName MkDir MyFilePath & Left(txtMyFolderName, 1) & "\" & txtMyFolderName & "\Bills" MkDir MyFilePath & Left(txtMyFolderName, 1) & "\" & txtMyFolderName & "\Documents" MkDir MyFilePath & Left(txtMyFolderName, 1) & "\" & txtMyFolderName & "\Correspondence" Else txtMyFolderName = MsgBox("File " & txtMyFolderName & " already exists" _ & Chr(10) & Chr(10) & "Please type another folder name", vbOKOnly, "File Exists") End If frmFolderCreation.Hide End Sub Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79407
 - 20
 - Formfield data cleared when unprotect/re-protect doc When I unprotect (Activedocument.unprotect) and then reprotect (ActiveDocument.Protect wdAllowOnlyFormFields) a document with formfields, existing data in the formfields is cleared. Is there any way of stopping this from happening? Thanks, Seamus Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79403
 - 21
 - Free mp3's <HTML> <HEAD> <META NAME="GENERATOR" Content="Microsoft DHTML Editing Control"> <TITLE></TITLE> </HEAD> <BODY> And much more that that! <A href="http://forum.saait.net/">http://forum.saait.net/</A> This site offers free and legal mp3's, software, movies, games. They also have a listing of free item that are given away on the internet. It's the best forum on earth if you ask me. Their homepage is here http://www.saait.net </BODY> </HTML> Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79402
 - 22
 - how to calculate string width Hi All I need to calculate string width(NOT length) to determine if it takes one or more lines.The linked topic below does not meet my requirement.Anyone please help! http://groups.google.com/group/microsoft.public.word.vba.general/browse_frm/thread/ed8c125812b59a04/7993922c5d111b10?q=word+vba+calculate+string+width&rnum=2#7993922c5d111b10 Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79399
 - 23
 - Remove "Paste" symbol In your next updates to Word, you should strongly consider removing the paste symbol (icon) after a paste action has been performed. I don't see where its value compensates for its annoyance. ---------------- 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=f0b71c20-20c6-4736-ad4e-5a45cf9f6677&dg=microsoft.public.word.vba.general Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79396
 - 24
 - north west passage hey yo man get my keys here now i need them for my new range rover. Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79395
 - 25
 - How to add an IF statement to Macro I have a Word 2002 document produced from an external application with many Equation editor objects. However, the equations do not properly line up with the other text on the line. If I select an equation and open the Equation editor then close it without making any changes, the misalignment gets corrected. I need a macro to go through the document and for each Equation Editor object, open Equation Editor and close it. I recorded a macro to do this with Find ^g. (I did get help with the SendKeys to close the application). It works OK until it finds a graphic which is not Equation Editor then halts. I think I need to add something like this: If .Type = msoLinkedOLEObject Then If .OLEFormat.ClassType = "Microsoft Equation 3.0" Then But I cannot figure out where and how to do this. Your help is greatly appreciated. Sub OpenCloseEqEd() ' ' Macro recorded 2/4/2004 Application.DisplayAlerts = wdAlertsNone Selection.Find.ClearFormatting With Selection.Find .Text = "^g" .Replacement.Text = "^&" .Forward = True .Wrap = wdFindContinue Do While .Execute Selection.InlineShapes(1).OLEFormat.DoVerb VerbIndex:=1 With Selection.Application SendKeys "%fx", True End With Loop End With End Sub Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79394
- Next
 - 1
 - Rights Managment issue Hi, pardon my ignorance, but in updating to office 2003, I now get a pop-up message regarding Rights Managment. I am unable to even print preview the document. Can this managment be turn off ? Thank you Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79391
 - 2
 - Parsing Fields in VBA code I have a document that will have fields inserted by the user. Somehow I need to allow the user to insert text in these fields that is freeform, the only way I guess this can be done is via the fields add method. Assuming I can do this in code, and set the user text as the QUOTE section of the field, is there some means that I can later parse the document for a given field code, and then strip out the QUOTE text in code? Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79389
 - 3
 - Convert WP .frm with Perfectscript to Word file I have several WP .frm files with Perfect script code and I need to re-create them as Word files that will do the same thing. I don't really know where to start in Word. Any suggestions/recomendations on how to go about this? Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79388
 - 4
 - Automation Error Small Business Edition I have a client running Office 2003 Small Business Editon. I loaded Payne Metadat Assistant. Got automation error. Their tech support says Small Business edition does not support automation. Is this true? How am I supposed to know this - is there a document somewhere that says which versions support automation? Is there any way to install automation? Thanks! Jeffrey M. Gagen Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79385
 - 5
 - Modify Filename Field I'm trying to pull only a portion of the document filename field, but I would like it to remain in Feild format so that it remains dynamic. Basically we have a document managment system that assigns numbers automatically. I would like to capture just the document number and version which is placed into the wdFieldFileName information, not the entire filename. This way if the User copies to a new document number, the number doc number will be displayed dynamically. ~Lori Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79378
 - 6
 - Sum calculation Hello, I am using Word 2000, and I have a protected document that I use as a cheque requisition form. I would like the total box at the bottom to auto sum the amounts being entered in the boxes above without having to right click on it, and click on 'Update Field'. It always used to work like this, but when I unprotected it once to change the year, it has never worked since. Can this be done and if so, how? Many thanks, Chris Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79377
 - 7
 - Can't see my macro in toolbar on some machines Hi. I have a .doc file (word 2002) that basically creates a copy of itself with a module I have created. Some fields have been merged with a database. I'll refer to the copy as B. BUT ... in doc B, I get the macros to show up on a toolbar from the original copy on some workstations. They also do not exist if I try to add the macro by customizing the toolbar. Though if I go into the code on B document - the macros are there. I have set the security to low and it doesn't help. How do I get these macros to show up on the 2nd document? Any suggestions appreciated....need these sent out today. Thanks in advance. Lesley Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79374
 - 8
 - Best Control for list of records in Access I want to do a query on a table based on the last name selected from a combo box. So the after update on the combo box should use the value as a part of a query. I dont know what control I should use to list the results of a the query. Ive read that you cant bind a listview to data (query). I want to be able to click on the record in the result set I want and have the id of that record populate a control on the form. So what control can I use that will allow me to click on a record in a list and grab the value of a column in that list? Any examples of creating a query and using that query to bind to a control? Im on Access 2003 on Win2k3 server. Thank you for your time. Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79370
 - 9
 - Deletion of Empty Page in the Word Document through VBA Hi all, This is to request for your help in this MS Word issue. In the VB application we are required to copy and paste temporary documents (containing text, pictures, etc) into a single, final word document. The main document contains tables and the issue is related w.r.to tables. In the current application, the .rtf file is formed from the html file. While copying, the blank pages get inserted in the document if the control is in the â??last but oneâ?? row of a table and sometimes if the control is in the last row during document generation process. This causes the extra page in the document and page numbers are counted for this. We are working on Windows 2000 Server as our OS. In the existing code, section breaks (Next Page) are used. I am trying to scan each and every page and finding if any empty page is there. If so, I have planned to pass the delete key to delete the empty page. Could you provide any pointers as how to go about this? I need to scan each and every page of word doc and need to find if any blank page is there. If so I need to delete the page programmatically. Any help in this issue would be greatly appreciated. Regards, Kiruthiga.S Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79366
 - 10
 - Document Properties - vbscript Looking for a way to read document properties for a Word Document. In particular I want to be able to read the "revision number" -- . Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79361
 - 11
 - Finding version of word used to create document Where is the version of Word used to create a document stored in the Word object model? It's not Application.Version - this is the version used to read it. Simon Kravis Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79357
 - 12
 - Not able to recording macro for mail-merge Hallo, I need some help for a macro code ... we've a lot of Word2000 mail-merge templates originally connected to a .dbf file where in a textbox is possible put the number we're looking for , now we've to move to Word2003 and the new source will be a SQL file with the same structure At the moment we use a code like this: ActiveDocument.MailMerge.DataSource.ActiveRecord = wdFirstRecord Set myMMData = ActiveDocument.MailMerge.DataSource If myMMData.FindRecord(FindText:=TextBox1, _ Field:="COLLAB") = True Then myMMData.QueryString = _ "SELECT * FROM `COLLABORATORI` WHERE ((`COLLAB` = '" & TextBox1.Text & "'))" With ActiveDocument.MailMerge .Destination = wdSendToNewDocument .MailAsAttachment = False .MailAddressFieldName = "" .MailSubject = "" .SuppressBlankLines = True With .DataSource .FirstRecord = wdDefaultFirstRecord .LastRecord = wdDefaultLastRecord End With .Execute Pause:=True End With Unload Me Application.ScreenUpdating = True Else MsgBox ("Codice non trovato !!!") -- I tried to record the piece of code to be replaced in the existing macro but I wasn't able to ... Thanks in advance for your help Regards, Alberto Simone Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79356
 - 13
 - Mac Preferences folder location - finding from VBA I'm porting a large VBA project to the Mac, and most things seem to be working just fine. In my Windows project, i use a .INI file to store settings. My installer creates that file in the Windows folder, calling a system function to retrieve the location of the Windows folder. On the Mac, I want to store the same file as a settings file in the System Preferences folder. How do I call into the Mac OS to find the path to use for the preferences folder? Thanks in advance g Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79342
 - 14
 - Fields in header and update using VBA Hello all, I'm trying to automate some fields in the header and footer by making a VBA userform and having it plug into document. While I can use document vars to plug in values in the regular bodytext and use activedocument.fields.update to show the new values, this won't work for header and footer fields. I would need to view the header and footer and refresh manually with F9. Any suggestions? Thanks Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79340
 - 15
 - template keeps locked very strange? Hello, I have a macro in a dot file that runs when I open a document with that network template (g:\wmv\r6.dot) attached. The dot file is on a network and I want to copy it local so the network template isn't locked when a user has a doc open with that template attached, so it can be changed. It works fine and the local template is attached. But the network template keeps locked with a tilde (~) before it so the doc keeps two templates locked, the local (as expected) and the network template. Is there a way to release the " ghost" attached network template? Below a example of the code: Sub AutoOpen() WordBasic.CopyFileA FileName:="G:\WMV\r6.dot",Directory:="c:\temp\r6.dot" ActiveDocument.AttachedTemplate = "c:\temp\r6.dot" End Sub Thanks a lot Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79336
 - 16
 - Form Automation I am tring to create a form that will check or uncheck a box next to a signature line to indicate if the signature is required or not. I have several fields that are calculated. The best I can do is using another field with a formula in it like "=OR(OR(euro_total>0,swan_total>0),genus_total>0)" this results in a 1 or a zero. I would rather have this as a checked or unchecked box. Any ideas? Right now I am assuming I need to use VBA for this hence my previous post. Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79334
 - 17
 - Need to learn VBA for Word Looking for a book or resource that would "really" help users learn how to program VBA for word. I have been to Barnes and Noble and came away frustrated. The books I found talked about various vba subjects but did not explain it in simple terms and supply a list of vba commands that could be used. For the benefit of all of us can a suggestion be made for the Beginner, Novice, Intermediate, and the expert. Suggestions please. Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79332
 - 18
 - Finding which cell in a table I am using WORD upwards, please can someone help me with some code which sets as an integers the table number, row number and cellnumber is the activecell? Mark Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79330
 - 19
 - Copying data from one table to another Hi there, I have been tasked with setting up an Access database to track 4 similar (but different) entities. Under certain circumstances entities B & C could metamorphose into entity A. Is it possible in Access 2002 to have a button on an input form that will replicate most (but not all) fields from entity B (or C) over to the table containing entity A? Entity A will be indexed via an auto-number â?? will this add extra complexity when trying to copy other entities over to it? Iâ??m familiar with database theory & basic Access but havenâ??t previously designed & implemented a dbms in Access. Any responses gratefully received Regards Phil Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79318
 - 20
 - Is the bullet of a list considered to be a range? Is the bullet of a list considered to be a range? And how do I check if a certain range is actually the bullet of a list? Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79314
 - 21
 - word 2003 bookmark/data extraction - new functionality In prior versions of Word (pre-2003), users have created word templates with bookmarks. They enter value into the bookmark range. Then we have a program that extracts the bookmark range value and we use that data for other things. Does Word 2003 offer any other functionality that would replace this? Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79313
 - 22
 - inheritence Hey guys.. I have been working on this for about 4 hours and got nowhere.. How can I stop word tables from inheriting previous styles set... Fopr Example I set a proeprty SpaceBefore from a range object for a cell to 6... Then all the other cells in that column inherit that value.... Could someone tell me why and how to fix this... thanks nathan Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79312
 - 23
 - border Hey list, I am trying to set a border for a couple of rows in my table My table has 4 columns and x rows.... the code below will only yield a a border on the bottom row of the table.... how can is et particular border for particular rows.... so far I have tried this WordRow.Cells.Item(1).Range.Borders.Item(Word.WdBorderType.wdBorderBottom).LineStyle = Word.WdLineStyle.wdLineStyleSingle WordRow.Cells.Item(1).Borders.Item(Word.WdBorderType.wdBorderBottom).LineStyle = Word.WdLineStyle.wdLineStyleSingle WordRow.Borders.Item(Word.WdBorderType.wdBorderBottom).LineStyle = Word.WdLineStyle.wdLineStyleSingle WordRow.Range.Borders.Item(Word.WdBorderType.wdBorderBottom).LineStyle = Word.WdLineStyle.wdLineStyleSingle I have also set the BorderWidth Property and visible property and color property... When I open up my document there is only a border on the bottom table row.. any help would be appreciated thanks... nath Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79309
 - 24
 - MS-Project VBA Question Hi NG , I am new in the field of VBA and have a question / problem. In one project file I defined a field ( customized field Number 13 ) and renamed it as "StatDur" and entered a formula there in. With VBA I want to read out the contents of this field and display it via MsgBox. Ihave entered following code num = Application.CustomFieldValueListGetItem(pjCustomTaskNumber13, pjValueListValue, 3) Syntax is : Ausdruck .CustomFieldValueListGetItem(FieldID, Item, Index) Thats my code entered in VBA ( as above ): num = Application.CustomFieldValueListGetItem(pjCustomTaskNumber13, pjValueListValue, 3) I want to store the contents of this field from row 3 in num and want to display it via MsgBox. It wont work since the VBA-Editor brings a failure where I am entering the row number 3 as Index and I dont know why and how to solve this problem. Can onyone give a helping hand. Thanks in advance Gruß -- Cevikel Tel. : 0911-433-6329 mailto:halidun.cevikel@siemens.com Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79308
 - 25
 - I would like to add hebrew lanquage to my translation list I would like to add hebrew lanquage to my translation list Tag: Hidden Word Instance Grabs Focus Whist Runnng VBA Code Tag: 79303

Hi NG,

I am automating Word via COM and performing extensive operations with the
Visible property set to "False". Unfortunately, whilst running, Word
periodically grabs the input focus for a second or so, then returns it to he
originally focused object. I haven't come across this issue before... is it a
common occurence? Does anyone have any pointers as to what could be causing
this?

Thanks

Top

RE: Hidden Word Instance Grabs Focus Whist Runnng VBA Code by Daren

Daren
Fri Jan 20 10:25:03 CST 2006

Interesting, it looks as if this is an issue related to VSTO 2005 - it
appears that VSTO injects some macro code into the document that grabs
focus... The issue is being investigated.

"Daren" wrote:

> Hi NG,
>
> I am automating Word via COM and performing extensive operations with the
> Visible property set to "False". Unfortunately, whilst running, Word
> periodically grabs the input focus for a second or so, then returns it to he
> originally focused object. I haven't come across this issue before... is it a
> common occurence? Does anyone have any pointers as to what could be causing
> this?
>
> Thanks

Top