In WORD: How do I set up topic LINKS?

Tutorials Win: Microsoft Windows Forum

- Previous
 - 1
 - 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: In WORD: How do I set up topic LINKS? Tag: 79431
 - 2
 - 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: In WORD: How do I set up topic LINKS? Tag: 79418
 - 3
 - 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: In WORD: How do I set up topic LINKS? Tag: 79415
 - 4
 - "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: In WORD: How do I set up topic LINKS? Tag: 79410
 - 5
 - 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: In WORD: How do I set up topic LINKS? Tag: 79407
 - 6
 - 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: In WORD: How do I set up topic LINKS? Tag: 79403
 - 7
 - 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: In WORD: How do I set up topic LINKS? Tag: 79402
 - 8
 - 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: In WORD: How do I set up topic LINKS? Tag: 79399
 - 9
 - 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: In WORD: How do I set up topic LINKS? Tag: 79396
 - 10
 - north west passage hey yo man get my keys here now i need them for my new range rover. Tag: In WORD: How do I set up topic LINKS? Tag: 79395
 - 11
 - 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: In WORD: How do I set up topic LINKS? Tag: 79394
 - 12
 - 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: In WORD: How do I set up topic LINKS? Tag: 79391
 - 13
 - 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: In WORD: How do I set up topic LINKS? Tag: 79389
 - 14
 - 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: In WORD: How do I set up topic LINKS? Tag: 79388
 - 15
 - 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: In WORD: How do I set up topic LINKS? Tag: 79385
 - 16
 - 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: In WORD: How do I set up topic LINKS? Tag: 79378
 - 17
 - 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: In WORD: How do I set up topic LINKS? Tag: 79377
 - 18
 - 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: In WORD: How do I set up topic LINKS? Tag: 79374
 - 19
 - 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: In WORD: How do I set up topic LINKS? Tag: 79370
 - 20
 - 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: In WORD: How do I set up topic LINKS? Tag: 79366
 - 21
 - 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: In WORD: How do I set up topic LINKS? Tag: 79361
 - 22
 - 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: In WORD: How do I set up topic LINKS? Tag: 79357
 - 23
 - 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: In WORD: How do I set up topic LINKS? Tag: 79356
 - 24
 - 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: In WORD: How do I set up topic LINKS? Tag: 79342
 - 25
 - 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: In WORD: How do I set up topic LINKS? Tag: 79340
- Next
 - 1
 - 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: In WORD: How do I set up topic LINKS? Tag: 79336
 - 2
 - 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: In WORD: How do I set up topic LINKS? Tag: 79334
 - 3
 - 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: In WORD: How do I set up topic LINKS? Tag: 79332
 - 4
 - 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: In WORD: How do I set up topic LINKS? Tag: 79330
 - 5
 - 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: In WORD: How do I set up topic LINKS? Tag: 79318
 - 6
 - 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: In WORD: How do I set up topic LINKS? Tag: 79314
 - 7
 - 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: In WORD: How do I set up topic LINKS? Tag: 79313
 - 8
 - 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: In WORD: How do I set up topic LINKS? Tag: 79312
 - 9
 - 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: In WORD: How do I set up topic LINKS? Tag: 79309
 - 10
 - 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: In WORD: How do I set up topic LINKS? Tag: 79308
 - 11
 - I would like to add hebrew lanquage to my translation list I would like to add hebrew lanquage to my translation list Tag: In WORD: How do I set up topic LINKS? Tag: 79303
 - 12
 - Protecting and unprotecting form fields I have a form that I saved as a template, so that I can insert it into various documents. I have written code that inserts this form using a macro that does that and also opens a userform. The form has bookmarks and form fields with options and drop downs that only work when the form is protected. I need the form unprotected so that I can insert information from the userform into specific bookmarks, but then need it protected after that, so the form field options and drop downs will work. Is there code I can run in the userform when the form is inserted that will unprotect it until the infomation is sent to the bookmarks, and then code I can run to protect the form so the form field options and drop down will work when I exit the userform, or do I have to manually open the toolbars from the [View] [Toolbars] [Forms] menu? Thanks! -- Bill Tag: In WORD: How do I set up topic LINKS? Tag: 79301
 - 13
 - Finding Out What the Current Section Is For the life of me, I can find a way to determine what section of the document the current selection is in. It seems like a simple task, but somehow, I just can't seem to get the syntax right. I'm using a macro to build a document, and I want it to do one thing if the current selection is in Section 2 of the document and something else if it isn't, as in: If Current Section = 2 then Do one thing Else Do something else End If I need this macro to work in Word 2000, XP, and 2003. (We can't seem to get everyone on the same version.) Any help that you can give will be most appreciated. Larry Tag: In WORD: How do I set up topic LINKS? Tag: 79300
 - 14
 - call to a DOS command from VBA I am new to VBA I need help with calling a DOS command from within a VBA 6 code. Here is an example: Suppose I need a list of files in a folder. One can do it using DOS dir command like Prompt:> dir drive:\path\foldername > drive:\path\list.txt The file list.txt output file created contains all file names in foldername, plus some other info. I have written a vba code for Word to *clean* the list.txt file, such that it now only contains the names of files in the foldername folder. The question I have is: can one write a stand alone *application* or a Word addin, such that it starts with a user form in which one can browse to a foldername as a source and say cleanlist.doc as the output, and on closing the form, the dir command is executed, the list.txt file cleaned with my code, and the cleaned output file placed into a path\cleanedfile.doc file? I know how to open, create and close files from a vba code. I do not know how to call a dos command from vba and how to make a form with controls that allow to browse for a source and destination folders. Any reading suggestions? Thanks, -- JanAdam Tag: In WORD: How do I set up topic LINKS? Tag: 79299
 - 15
 - inserting tables Hello List, I have been trying to work this for a while now, i can;t seem to get it working... I am using word automation to insert tables into my document from a bookmark range. The problem is when I loop to isnert a table each table will insert into the first row and column of the previous table. Here is my code below For I = 1 to 20 InteriorRange = Doc.Bookmarks.Item("InteriorBuilding").Range ' range obj InteriorRange.InsertParagraphAfter() RoomTable = Doc.Tables.Add(InteriorRange, 3, 2) ' doc a reference to the current document RoomTable.Cell(1, 1).Range.InsertAfter("tst item") RoomTable.Cell(1, 2).Range.InsertAfter("test") RoomTable.Cell(2, 1).Range.InsertAfter("test") RoomTable.Cell(2,2).Range.InsertAfter("test") RoomTable.Cell(3, 1).Range.InsertAfter("test") RoomTable.Cell(3, 2).Range.InsertAfter("test") RoomTable.Cell(1, 1).Merge(RoomTable.Cell(1, 2)) Next Any help would be greatly appreciated thanks very much nathan Tag: In WORD: How do I set up topic LINKS? Tag: 79298
 - 16
 - Arrangement of carries Hi There is a document with the table of several rows. How for some rows of the table to resolve a hyphenation and for the some rows to not resolve? Tag: In WORD: How do I set up topic LINKS? Tag: 79290
 - 17
 - Missing keystrokes on custom document I have a custom Word document, from a template, that catches WindowSelectionChange to modify data that is input by the user into table cells. All works well except when more than one Word document are open. The problem exists whether the other file is based on the template or not. When switching between docs, the first keystroke is lost. This behavior is also repeated when changing cells as long as two or more documents are open. Below is the relevant code: Option Explicit Public WithEvents App As Word.Application Dim thisTable As Integer Dim thisRow As Integer Dim thisCol As Integer Dim lastTable As Integer Dim lastRow As Integer Dim lastCol As Integer Private Sub Document_New() If App Is Nothing Then Set App = ThisDocument.Application End If keepAlive End Sub Private Sub Document_Open() If App Is Nothing Then Set App = ThisDocument.Application End If keepAlive End Sub Private Sub App_WindowSelectionChange(ByVal Sel As Selection) Dim myRange As Range Dim mySel As Selection Dim myText As String If Not ActiveDocument.AttachedTemplate = ThisDocument Then Exit Sub thisTable = Macros.getCellLoc.tableNum thisRow = Macros.getCellLoc.rowNum thisCol = Macros.getCellLoc.colNum If (Not Selection.Information(wdSelectionMode) = 0) _ Or (thisTable = lastTable And thisRow = lastRow And thisCol = lastCol) _ Or (thisTable < 4) Then Exit Sub End If If lastTable = 0 Then lastTable = thisTable lastRow = thisRow lastCol = thisCol Exit Sub End If If lastRow > 2 _ And lastCol <= ActiveDocument.Tables(lastTable).Columns.Count Then Set myRange = ActiveDocument.Tables(lastTable).Cell(lastRow, lastCol).Range myRange.End = myRange.End - 1 Select Case lastTable ' Removed End Select End If Select Case thisTable ' Removed End Select lastTable = thisTable lastRow = thisRow lastCol = thisCol End Sub Function isEditable(row As Integer) As Boolean If row < 3 Then Selection.Collapse Selection.MoveDown Unit:=wdLine, Count:=3 - row Selection.SelectRow Selection.Collapse isEditable = False Else isEditable = True End If End Function Sub keepAlive() If App Is Nothing Then Set App = ThisDocument.Application End If Application.OnTime When:=Now + TimeValue("00:00:01"), Name:="keepAlive", Tolerance:=0 End Sub Tag: In WORD: How do I set up topic LINKS? Tag: 79285
 - 18
 - page numbers using sections - how do you get physical page number? Section 8 - Page 1 of 4 is Physical page 84. how can i get the Physical page number. I want to use both section page numbering and phycical page numbering. exsample: Section 8 - Page 1 of 4 Page 84 of 132 I am using MS work 2002. Tag: In WORD: How do I set up topic LINKS? Tag: 79283
 - 19
 - What files do I need? Hi all, I wrote a VB6+VBA program that uses both WORD and EXCEL to generate reports. In a machine without WORD (for example) - my program wont run, because it cannot create word objects. I wish to know what files to include (must + allowed to) in the package I deliver to the client. Thanks in advance. Guy Tag: In WORD: How do I set up topic LINKS? Tag: 79282
 - 20
 - Getting the user profile folder Hi I need to get the signature folder for the current folder such as; "F:\Documents and Settings\Dave\Application Data\Microsoft\Signatures\" except that instead of Dave I need the correct name for the current user, s that my code works generically regardless of who is logged in. Is there a way to do that? Thanks Regards Tag: In WORD: How do I set up topic LINKS? Tag: 79279
 - 21
 - Template VBA form and Code Missing Hi out there. I am Access programmer just learning VBA in Word. I spent last two days learning how to develop an input form use the VBE, controls, command buttons, etc. And I also added code to add data to combo boxes, initialize defaults, etc. This was all done at my client site. I returned to my office, and via gotomypc, I downloaded a copy of the template. When I open the template, the bookmarks are there, and document stuff. But no vbe form, or controls, or code. In access, I just move a database and everything goes with it. Help -- microbus Tag: In WORD: How do I set up topic LINKS? Tag: 79277
 - 22
 - Get user info from AD with VBA Hi, I,d like to create a Word template that reads current user information (such as name, addresses, phones, department and so on) from Active Directory. I've searched the Net without luck for code samples. Do you know where I can find examples for this kind of solutions? Best regards, Dominique Tag: In WORD: How do I set up topic LINKS? Tag: 79276
 - 23
 - Why isn't template with macros located in startup folder not loaded? Hello, I've written a template containing macros. Now, a user of this template complained to me that it won't load automatically even if located in the startup path. It can be loaded during a Word session via "Tools->Templates and Addins", though. Unfortunately I don't know which word version my user is using but she wrote that changing the macro security settings had no effect. So what else can cause this? Christian -- Christian Zietz - CHZ-Soft - czietz (at) gmx.net WWW: http://www.chzsoft.com.ar/ PGP-Key-ID: 0x6DA025CA Tag: In WORD: How do I set up topic LINKS? Tag: 79267
 - 24
 - Inserting Excel charts "as link" into Word Please advice: I have Excel workbook with many charts (20-30). I need to insert all charts in the Word document (in the same order that in Excel). To perform this I saved Excel â??as WEB pageâ?? and after that I use the macro command to insert all the pictures from pictures folder into the Word. Now I have to insert all the charts â??as linkâ??. How can I do it? Sample code would be great. Thank You. Eduard Tag: In WORD: How do I set up topic LINKS? Tag: 79262
 - 25
 - Macro to convert revision text to ordinary formatted text Does anyone have a macro they can share that does this? To clarify what I need, the macro will convert revisions in text written with change tracking to ordinary text with underscores and strikeouts. My email address is LLM041103 at earthlink dot net. Tag: In WORD: How do I set up topic LINKS? Tag: 79258

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

Top

Re: In WORD: How do I set up topic LINKS? by Ed

Ed
Wed Jan 18 16:51:07 CST 2006

Brent:

Highlight the first word or so of the paragraph you want to route to, and
use Insert>>Bookmark. Then go to the menu, highlight the topic entry
associated with that paragraph, and do Insert>>Hyperlink. In the Hyperlink
dialog, select Place in this Document on the left, and navigate to the
correct bookmark in the selection list. Lather, rinse, repeat.

HTH
Ed

"Brentbmun" <Brentbmun@discussions.microsoft.com> wrote in message
news:6B8D829B-20D7-431F-955D-27E287F54634@microsoft.com...
> 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

Top