Lock Form When Text Field is Clicked

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - Add-on encountered a problem What should I do as my computer has the "Add-on encountered a problem - Adobe PDF Reader ..." Tag: Lock Form When Text Field is Clicked Tag: 87638
  - 2
    - Adding autotex to a template I have a letter template macro as a form chooser and I would like to add various autotext in a list so that they can be added to the address bookmark in the template. Is there a way or would I have to add each company name to a module as an additem and then put the addresses in a macro in the form chooser? If there is a better way which will pick up the autotex which are contained in a global template in startup then that would be great as then I wouldn't have to add a new macro every time someone requires a new address adding to the list. Many thanks Tag: Lock Form When Text Field is Clicked Tag: 87632
  - 3
    - Need to extract a Date value (text) from a Word doc Hello, We have about 950 word docs that have a date value in them, to which we need to know so we can bill them for a specific period. Each doc has the specific date contained in this phrase: "REPORT DATE: August 25, 2004". If it's relevant, the actual date (August 25, 2004) begins on line 10, col 15. All of the 950 docs have a file name in this format, eg: 1-1-111-111 and then the DOC extension, eg: 7-5-047-053.doc So, I need a routine that I can run WITHOUT having to open each and every one of the word docs. If the routine needs to run inside an empty (IOW: where no file is actually loaded or created) Word session, that's OK. The routine needs to extract the date (AND the filename) and put them into a text file (which I will import into Excel later) with two columns like below: FILE NAME REPORT DATE 7-5-047-053.doc August 25, 2004* * Note: if it is easier to change the date into another format such as 8/25/04 or whatever, that's OK with me. Looking forward to seeing your responses! Tag: Lock Form When Text Field is Clicked Tag: 87630
  - 4
    - Custom Macro My Documents defaulting error , We use word 2003 in our company. We have some shared folders that we want our users to have a direct path to from word. We created a macro Sub ISP() ChangeFileOpenDirectory "\\Xpcdc001\Plans\ISP\" SendKeys "^o" ' End Sub This macro browsers to the \\Xpcdc001\Plans\ISP\ share and then does a control O to open the open file box. We added this macro under tools --> macros --> macros then added the macros name and typed the vba code between the sub and end sub into the editor. Next we wanted to create a custom menu item linking to this macro so that our users would be able to run it easy . We went to tools --> custom --> comands added a new menu and added the macro to the menu. We get very odd results. When word is started and you go to the menu and click the macro it opens the open file box and defaults to my documents (which is incorrect because it should default to the share specified) When you close the file open box and reclick it without closing word you get the correct location in the file open box. You get the correct location everytime then when you click the macro till word is closed and reloaded. Always on the first time it defaults to the my documents location. I have downloaded all patches and service pack 2 from office website and still did not resolve the problem. Any input on this problem will help alot. Danewman@ahrc.org Tag: Lock Form When Text Field is Clicked Tag: 87625
  - 5
    - How to show a list of words for me to choose? Hi, I need to type a lot of documents in which some phrases occur very often. Some of the examples are "medical evidence", "medical report", "Statements of Claim", "Statements of Damages". Given that some groups of words appear very frequently, I would like to use VBA to let me choose from a list of phrases after I have typed a few letters of the target phrase. For example, when I type "med", the list of "medical", "medical report" and "medical evidence" will pop up automatically and I can choose a phrase, say "medical report", that I need from this list. Can someone tell me how to do this or tell me the good books about Word VBA teaching me to do this? Thank you. David Tag: Lock Form When Text Field is Clicked Tag: 87623
  - 6
    - word files with embedded excel objects I have a user that has ~300 word files. Each of these word files have embedded excel objects in them. The powers that be want a program written that will open these word files and edit hyperlinks that are inserted into the excel objects. Is this doable? Any help getting started would be apreciated. Thanks Mike Tag: Lock Form When Text Field is Clicked Tag: 87617
  - 7
    - String too long error I am a complete novice at programming in Word so please bear with me. I am a developing a Lotus Notes application that needs to output a document to Word. I have created a tabular Word template and am outputting the individual fields as strings, so for example: worddoc.FormFields(1).result = RaisedBy This is working fine for all of the fields except for the final one which is a text field that can contain a fair amount of data and is generating a Word "Script too long error".. Does anyone have any suggestions as to how I can get around this? Could it be because the field is contained in a table cell? I've been really struggling with this output and the best way to do it as I have no experience of the features of Word at all. Any help would be greatly appreciated. Kate Tag: Lock Form When Text Field is Clicked Tag: 87616
  - 8
    - attaching a document to email Hi, I am sorry for reposting, but i have lost original thread I am attaching a doucment to an email using Options.SendMailAttach = True ActiveDocument.sendmail i have been trying to use mailEnvelope to add the to: field and the Subject: field. but cant get the correct syntax. Can someone help please Thanks J Tag: Lock Form When Text Field is Clicked Tag: 87615
  - 9
    - How to include macros in .doc file HI, I am using Word 2003. I wrote template lets call it "test.dot" which uses macros. When I create .doc file using test.dot on my PC I can use macros. In Tools->Template and Add-ins->Document Template is path to the template the .doc is based on. For Example C:\\...\test.dot But when I created .doc on my PC and send it via email as attachment the user in the other site can not use macros while the path to the template the .doc is based on is not actuell. My Problem is how can I include macros to the .doc document that it works on every machine without having information about template. Is it possible? Tag: Lock Form When Text Field is Clicked Tag: 87607
  - 10
    - Strange Print Error With VBA Created Doc - Solution The solution was in the Word Application itself. Tools->Options->Print->Hidden Text. Selecting this option fixed it. Seems on some machines, Word treats vba created text in text boxes as hidden by default. hals_left Hi This may or not be vba related. Has anyone ever encountered a prioblem like this before, Or know a solution A table cell in a word doc contains multiple address lines, created using the code below in a template. The address loooks just fine in Word and even in print preview, but on the actual paper on the first line appears. Also intermittent , works ok on some printers. Users have found a workaround, cut the address then paste it back before printing. Any thoughts ? Thanks hals_left Set objRS = objConn.Execute(strSQL) If Not objRS.EOF Then strAddress= objRS("BusinessName") strAdd1 = objRS("Add1") strAdd2 = objRS("Add2") strAdd3 = objRS("Add3") strTown = objRS("TownCity") strCountyLine = objRS("County") & vbTab & objRS("PostCode") If strAdd1 <> "" Then strAddress = strAddress & vbCrLf & strAdd1 If strAdd2 <> "" Then strAddress = strAddress & vbCrLf & strAdd2 If strAdd3 <> "" Then strAddress = strAddress & vbCrLf & strAdd3 If strTown <> "" Then strAddress = strAddress & vbCrLf & strTown strAddress = strAddress & vbCrLf & strCountyLine ActiveDocument.Tables(2).Rows(1).Cells(1).Select Selection.Text = strAddress Tag: Lock Form When Text Field is Clicked Tag: 87604
  - 11
    - Count files Part of my Word macro is using for counting files in a folder. The problem is that result of counting also includes all open files in that folder. So the number of files is correct only if no documents are open in that folder. This worked well in Office 2000 (Word 2000). Result didn't include open files. The macro is the same and it doesn't work correctly in Office 2003 (Word 2003). The code: Dim stevec As Integer With Application.FileSearch .FileName = "pr????.doc" .LookIn = "\\_server_\_folder_\" .SearchSubFolders = False .Execute For stevec = 1 To .FoundFiles.Count Next End With MsgBox Stevec Regards, Iztok Tag: Lock Form When Text Field is Clicked Tag: 87603
  - 12
    - how can I set tab stops for only fill-in areas of the document? I want to be able to tab to different areas of my document where a blank needs to be filled in, and ONLY those areas. I want to start at the top of the document and have my tabs go to the next blank that needs to be filled in, and so on. Tag: Lock Form When Text Field is Clicked Tag: 87599
  - 13
    - esoteric Word VBA run order issue - not trying to scare off anyone I created a form and some VBA code behind it in a Word doc file. Under the ThisDocument (Microsoft Word Objects) for Document_Open() I have the following code: Private Sub Document_Open() form1.Show End Sub That kicks off the form but I get a Run-time error '5852': Requested object is not available. I did a line by line execution run and found that the error occurs in this line strPatMasterID = ThisDocument.MailMerge.DataSource.DataFields("PatentMasterID").Value The problem is order in which the code is executed. The mailmerge (based on msquery) is kicked off after the form opens (or in this case because of the error, when I click "end" to stop the code)... so obiviously it cannot retrieve the mailmerge.datasource.datafields if the mailmerge doesn't run first. So, does anyone how now I can manipulate the run order of the VBA code or explicitly force the msquery to run first before I retrieve the data? Would setting a timer work? thanks in advance for your help Tag: Lock Form When Text Field is Clicked Tag: 87594
  - 14
    - Formatting in endnote to text macro? I've just come across a Word macro Doug Robbins posted on Google Groups some time back to convert endnotes to text (below). I'm grateful for this, which will be useful as I and a co-author have a lot of endnotes to convert before submitting a book. When I run it, however, I lose all the formatting in my endnotes, which is a problem for all the italicized book titles in my notes. Is there any way to retain this formatting? Thanks for any help you can provide. Yours, David. -- From: Doug Robbins- view profile <http://groups.google.com/groups/profile?enc_user=n5ytSBIAAADLukhUwkIQqTf lNRzxM-TQII73Nnd8MGuFrQYThHx-nw> Date: Wed, Jan 19 2005 3:41am Email: "Doug Robbins" <d... <http://groups.google.com/groups/unlock?msg=a80683a23dc18ad5&_done=/group /microsoft.public.word.formatting.longdocs/browse_frm/thread/e186d433d465 8f5/a80683a23dc18ad5%2523a80683a23dc18ad5%3F> @NOmvpsSPAM.org> Groups: microsoft.public.word.formatting.longdocs ' Macro created 29/09/99 by Doug Robbins to replace endnotes with textnotes at end of document ' to replace the endnote reference in the body of the document with a superscript number. ' Dim aendnote As Endnote For Each aendnote In ActiveDocument.Endnotes ActiveDocument.Range.InsertAfter vbCr & aendnote.Index & vbTab & aendnote.Range aendnote.Reference.InsertBefore "a" & aendnote.Index & "a" Next aendnote For Each aendnote In ActiveDocument.Endnotes aendnote.Reference.Delete Next aendnote Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find.Replacement.Font .Superscript = True End With With Selection.Find .Text = "(a)([0-9]{1,})(a)" .Replacement.Text = "\2" .Forward = True .Wrap = wdFindContinue .Format = True .MatchWildcards = True End With Selection.Find.Execute Replace:=wdReplaceAll Tag: Lock Form When Text Field is Clicked Tag: 87589
  - 15
    - how do i get the paragraph symbol out every time i create a page? every time i get into a word office to type something i get a paragraph sign and i can't delete it. it's not temporary either it's every time i get in Word and my space isn't a space they are dots. like this.....but a little higher.so it's not on the line. am i confusing people more now? please help it's driving my nuts!!!!!! thank you Hope Tag: Lock Form When Text Field is Clicked Tag: 87586
  - 16
    - WHERE IS A SAVE OPTIONS LOCATED AT? Hello dearest, Today I am posting these questions, because I really do not know how to find out how to work of problems. That why I really need help from all of you people, please help me to solving out, Thanks. PS. I have open an application forms, and when I get into an application forms trying to filling out, however I cannot typed. Is because of the hand have showing and it will not let me type. I cannot figure out how to solving problem. Could you please helping me to solving out of those problems please? Thanks. My e-mail address is (tolovingyouforever4@yahoo.com); please reply an answer back to me, Respectfully yours, A.H.K. Tag: Lock Form When Text Field is Clicked Tag: 87585
  - 17
    - How can I design form templates to give textbox on checkbox click I am trying to create a form template so that when you click on a checkbox, another form field will appear. For example: I want to give someone the option to put recommendations and the number 1) But if they have more than 1 recommendation I want to be able to have them click a checkbox and another (Number 2) textbox will appear. Does anyone know how to do this or where i can go for some answers? Thansk, Tag: Lock Form When Text Field is Clicked Tag: 87578
  - 18
    - value for record at EOF (Using Word 2003) I have 20 records in a database and the ID of the 20th record is 24. Whenever I attempt to extract the ID# of the last record, it only shows the count (in other words, returns 20 instead of 24), using this code: jbID = ActiveDocument.MailMerge.DataSource.DataFields("jbID").Value If someone can show me an example of what should go before this so as to return the value of the last record, I'd appreciate it. I've tried different things with recordsets and EOF but I keep getting errors, even after setting up all the references for ADO and DAO. I'm connecting to the database since it's returning the record count, but I can't seem to pull up the actual value of the ID field in the last record. Many thanks in advance for your help. -- Bryan Tag: Lock Form When Text Field is Clicked Tag: 87566
  - 19
    - Search and Replace This is probably a crude, brutish way to attack my problem, but given my limited knowledge, that is all I have. My question is: Is there a way to search for particular text and replace each instance with a blank Text Form Field? Background: I have made a merge document to fill in data from our client(s). There are some areas of the document that are not worth tracking in our database and will need to be filled in manually. I have found that mergefields and form fields do not play well together because of the locking requirement for form fields. Our secretaries are not well-versed in Word, and I am trying to make it as easy and error-free as possible to complete these documents. My idea was to complete the merge and then have them run a macro (from a custom menu) that unlinked the mergefields, replaced "**" throughout the text with a Text Form Field, then locked the document for the remaining data entry so that they could tab from area to area and fill in the required missing information. Like I said probably crude and brutish in an attempt to be efficient and helpful. Thanks for any pointers. Tag: Lock Form When Text Field is Clicked Tag: 87557
  - 20
    - Please Help with My Document ASAP Hello, I need help with my document. The date on one page needs to be on two lines, not one. I need to add an extra page so I can finish my notes for my job. Information is confidential as far as contents. I'm using Microsoft Word and have Windows XP. Susie ncirisgal@gmail.com Tag: Lock Form When Text Field is Clicked Tag: 87555
  - 21
    - Create custom toolbar controls How do you create toolbar controls (besides ordinary buttons), e.g. similar to the default highlight control, font color control, etc. Visual basic does not seem to be able to create these. Tag: Lock Form When Text Field is Clicked Tag: 87550
  - 22
    - Outlook object not being created When I ran the following code the first couple of times it created the object, but now it won't. My objective is to create an e-mail with variables defined previously in macro, and not sending it right away. Any suggestions? (The reference library Outlook item is check-boxed in the menu.) Dim objOutlookApp As Outlook.Application, objItem As Outlook.MailItem With objItem .To = strEmail .Subject = strCo & ", " & " " & strJ .Body = "message" .Display End With Selection.InsertFile FileName:=strNew, Range:="", ConfirmConversions:=False, Link:=False, Attachment:=True Set objItem = Nothing Set objOutlookApp = Nothing -- Bryan Tag: Lock Form When Text Field is Clicked Tag: 87549
  - 23
    - Fonts for Word "Fields" when setting values We have a java application in which we create custom fields in MS Word using JACOB. On user initiation the fields are populated with values. If after creating the fields and change the FONT to a BARCODE font and when the fields are getting replaced with values, the BarCode font is not retained. The values are shown in original font. This happens only in Word 2003. The Bar Code font is retained for field values in Word 2000. Is there any setting or property to be set so that Bar Code fonts are retained for field values. The machine has Bar Code fonts installed. Thanks in advance for any suggestion. Tag: Lock Form When Text Field is Clicked Tag: 87546
  - 24
    - Multiple styles in a selected range I'm using Word 2000 on XP Pro. My problem arises when I select a range that contains multiple paragraph styles, and attempt to determine whether or not all the styles are the same. Any code like objRange.style results in this error: Run-time error '91': Object variable or With block variable not set The MSDN Library says: When you return the style for a range that includes more than one style, only the first character or paragraph style is returned. Why doesn't this happen? Am I reading this wrong? Is it a Word 2000 thing? Bear Tag: Lock Form When Text Field is Clicked Tag: 87544
  - 25
    - Designate Path when using SaveAs How do I designate the path when using SaveAs. I found that it saves it to My Docs. How do I change the Path, while telling word that it's a text file format at the same time? Thanks. Tag: Lock Form When Text Field is Clicked Tag: 87543
- Next
  - 1
    - TOC helper - replace hidden paragraph with style separator I work at a help desk with a large number of Word users and occassionally run into the problem where users either are not familiar with using the style separator (to assist in creating run-in headings so that only the heading, not the body text, shows up in the TOC) or are older documents that used hidden paragraph marks. Since multiple people can work on a document, we sometimes end up with documents that partly use style separators and partly use hidden paragraph marks - VERY confusing. So I created the following script to replace the hidden paragraph mark with the style separator (for Word 2002 & above). Although this code has been working well for the past several days, we are still testing it. If you would like to use it, PLEASE PLEASE PLEASE save the document you are going to try it on first. Although I cannot imagine why it would cause any problems, it is designed to replace items in the document, so there is always the chance I may have overlooked something. Mike Sub HiddenParaToStyleSep() Selection.HomeKey Unit:=wdStory ' Find hidden paragraph With Selection.Find .ClearFormatting .Text = "^p" .Font.Hidden = True .Forward = True While .Execute ' If hidden paragraph is Style Separator, do not replace If Selection.Paragraphs(1).IsStyleSeparator = False Then ' Replace hidden paragraph with auto color, unhide With Selection.Font .Hidden = False .Color = wdColorAutomatic End With ' Insert style separator Selection.InsertStyleSeparator End If Wend End With End Sub Tag: Lock Form When Text Field is Clicked Tag: 87542
  - 2
    - Find and Replace only once using .Find Can you only find and replace once using .Find? If I have multiple words to find and replace, is there a better way? Here is my code: Option Explicit Set myrange = appWord.ActiveDocument.Content With myrange.Find .Text = "SiteIn" .Execute replacewith:=SiteInfo & "." & SiteScheme .Text = "SiteBad" .Execute replacewith:=SiteInfo & "_" & SiteScheme & "bad" .Text = "SiteDiscard" .Execute replacewith:=SiteInfo & "_" & SiteScheme & "dis" .Text = "SiteNum" .Execute replacewith:=SiteInfo End With Tag: Lock Form When Text Field is Clicked Tag: 87539
  - 3
    - Macro to detect manual style overrides (e.g. StyleName + Bold) Hello, I need a diagnostic macro that detects manual style overrides in a document. These style overrides are shown in the Styles and Formatting task pane as "<StyleName> + Bold", for example, if 'Formatting in use' is selected. Apparently, they do not belong to the Styles collection, but I don't know how to address them. Does anybody know how I could list them using a macro? Thanks in advance Heike Tag: Lock Form When Text Field is Clicked Tag: 87538
  - 4
    - Inserting "notes to pages nn to nn" in endnote page headers Is there any way of inserting "notes to pages 32 to 55" in the header for the endnote pages (where the first endnote that appears on the page occurs in the text at page 32 and the last to appear on the page occurs in the text at page 55)? 1. Is there any way to do this without writing VBA code to do it? 2. If the answer to 1 is no, does anyone have some sample VBA code to do this? Thanks! Tag: Lock Form When Text Field is Clicked Tag: 87537
  - 5
    - Inserting HTML into Word (Word 2003) Hi, I have a situation in which I need to copy the contents of an HTML, complete with its CSS files and images, into a Word document. The simple solution is to use the command Selection.InsertFile which is equivalent to choosing File / Insert from the menu. However no matter what parameters I give to Selection.InsertFile, I keep getting the same message: "Recording Clipboard style sheet will require copying many styles. Do you want to use Normal style instead?" The correct answer to this question is NO because it preserves all the formatting. However I can't find any switch to make this dialog disappear and answer NO. How can I close this dialog while answering NO programmatically? Thanks, Arie Tag: Lock Form When Text Field is Clicked Tag: 87536
  - 6
    - Find & Replace Iâ??m using Windows XP and Word 2003. Word has a Find and Replace feature. How do I implement this to find all sequences of letters, symbols, and numbers between a specific word ,â??Startâ??, to the end of the line so that it can be replaced with a new set of letters, numbers and symbols. Example: Start <Appendix 12A> Tag: Lock Form When Text Field is Clicked Tag: 87530
  - 7
    - I had Microsoft Office 2000. Can I get it back? Last year my computer crashed so I had to buy a new one. I lost my Microsoft Office 2000. Is there a way of redownloading this software without having to repay for it a second time? Tag: Lock Form When Text Field is Clicked Tag: 87527
  - 8
    - Exporting This Discussion Is there anyway to export all the content of these discussions for offline reading/printing? Thanks! Tag: Lock Form When Text Field is Clicked Tag: 87521
  - 9
    - Delete Table Rows (Blank) Macro Question Hi all, I have this macro delete table rows blank which does not work on a table after I make changes to a row such as split cell 2 columns or insert rows using CTRL ALT I - am I missing something? Is there a macro that can delete blank rows regardless of how they are inserted. If you just create a blank table using Insert Table, ie drag mouse across number of colums rows and type in some rows it is fine and deletes blank rows. The moment you add rows or split cells on a row it gives this error: Runtime error 5941 the requested member of the collecton does not exist (after running). Can I refine it to acknowledge blank lines inserted using CTRL ALT I and split cells in a blank row? Is it viable? What am I missing? Thank you to whomever can assist. Public Sub DelTableRowsBlank() Dim flag As Boolean, I As Long, j As Long, atable As Table Set atable = Selection.Tables(1) With atable For I = .rows.Count To 1 Step -1 flag = False For j = 1 To .Columns.Count If Len(.Cell(I, j).Range) > 2 Then flag = True Exit For End If Next j If flag = False Then .rows(I).Delete End If Next I End With End Sub Tag: Lock Form When Text Field is Clicked Tag: 87515
  - 10
    - OutPersonals OutPersonals http://outpersonals.com/go/g671669 Tag: Lock Form When Text Field is Clicked Tag: 87510
  - 11
    - Deleting bookmarks I am inserting some text via vba from Acces into a Word doc. It is working well except afterwards teh book mark is deleted. Any thoughts?? TIA Bob Tag: Lock Form When Text Field is Clicked Tag: 87509
  - 12
    - OutPersonals OutPersonals http://outpersonals.com/go/g671669 Tag: Lock Form When Text Field is Clicked Tag: 87508
  - 13
    - =?utf-8?B?Rm9yIGVhY2ggYml0IG9mIGRvY3VtZW50IGRvID8=?= Hi Marc In a general sort of way, you can For each para in ActiveDocument paras 'Your code here Next To "walk" the paragraphs in a document "Story". Use para.Range.Information(wdWithinTable) to determine whether you're in a table. Look up "StoryRanges" and all related/linked in the VBA Help if you need to deal with anything besides the main body of the document (or look it up anyway, to get an understanding of what it means). -- Cindy -----Original Message----- From: Marc Hillman [mailto:7owsx1j02REMOVE@sneakemail.com] Posted At: 24 June 2006 15:35 Posted To: microsoft.public.word.vba.general Conversation: For each bit of document do ? Subject: Re: For each bit of document do ? I'm trying to check that certain elements appear in a certain order, for instance that every table is preceded or followed immediately by text of style "Caption". I feel I should be able to iterate through something and hit a table and then a paragraph (and check its style). It causes me to wonder, if I wanted to render a word document in some strange way (eg I wanted to write my own HTML exporter) how could you do it? I don't understand how I could find all the different pieces sequentially and export them. (Delete REMOVE from my e-mail to reply direct) Tag: Lock Form When Text Field is Clicked Tag: 87505
  - 14
    - Web formated calendar to unformated Word text Ops! Perhaps I should have posted this here instead of on 'microsoft.public.word.programming' (Not sure what the diff is) Reqd: a Word version of part of a calendar on a club website for those without web access The following pastes the copied section of the four column calendar Sub PasteUnformatedText() Selection.PasteAndFormat (wdFormatPlainText) End Sub but I now need to do something to make dates stand out A hanging indent is no good unless there were some way of identifying and changing the paragraph marks which do not precede the dates and changing them to manual line breaks Is there some way of identifying the dates and adding a second paragraph mark before them? A separate issue is to add a semi-colon between cells (the four columns are 'Date', 'Venue', 'Event/Name' and 'Info'. Without some break the line runs into one and does not read well If the date/time could be identified it could be emboldened - it is always dd.mm.yyyy hh:mm Here are a few lines of the unformatted text - any help you gan give will be much appreciated Francis Hookham Date Venue Event/Name Info 25.06.2006 10:15 Castle Camps Sunday Walk Sunday Walking Group - 4.5 mile walk from/to The Cock, Castle Camps, nr Haverhill Contact: Bernard Townshend 27.06.2006 13:00 University Arms Hotel Lunch meeting Lunch and The Cambridge Club's Presidential Handover followed by Stephen Kay, managing director Cambridge Water Company speaking about 'Developments at CWC' Host: Charles Hewitson Cashier: Robert Raywood Reception 1: Robert Ransom Reception 2: David Ridgeon 01.07.2006 Coventry RIBI handover RIBI Presidential handover in Coventry 02.07.2006 Cambridge District handover District 1080 Handover hosted by the Rotary Club of Cambridge at Wolfson College - Nigel Neville is due to become the District Governor Contact: FEC 04.07.2006 13:00 University Arms Hotel Lunch meeting Host: Paul Auton Cashier: Victor Bugg Reception 1: Francis Hookham Reception 2: Roger Asbury 04.07.2006 18:00 CUP Council meeting Council Meeting at CUP, Shaftesbury Rd Tag: Lock Form When Text Field is Clicked Tag: 87503
  - 15
    - For each bit of document do ? How can I go through a Word document sequentially, by paragraph, field, table, etc ? I'm looking for the construct Paragraph followed by Table followed by Paragraph. I can iterate through the paragraphs collection, or through the tables collection, but how do you iterate through all pieces in order ? Delete REMOVE from my e-mail address to reply direct. _______________________________________ Marc Hillman, Melbourne, Australia web: http://users.bigpond.net.au/mhillman/ Tag: Lock Form When Text Field is Clicked Tag: 87497
  - 16
    - File properties Hi folks I want to change the "Hyperlink Base" in the File -> Properties window programatically. How can I do this? I am using the word interop in C#, but information on how to do it in any other way would be great. Thanks Will Tag: Lock Form When Text Field is Clicked Tag: 87490
  - 17
    - How to find style separator code through VBA? In our company, we have a number of older documents that used hidden paragraph marks instead of style separators. The purpose of both is to separate headings from body text for easier generation of TOC. I am finding a number of documents that have a combination - hidden paragraphs marks & style separators - and it gets confusing to view these documents when hidden paragraph marks turned on (pagination will change). While my routine works, I do not like the fact that hidden paragraph marks & style separators do not appear to be distinguishable programatically; visually you can tell the difference because style separators have a light dotted frame around them. I was wondering if there is a way to distinguish the style separator from other codes. TIA, Mike Sub HiddenParaToStyleSep() Selection.HomeKey Unit:=wdStory ' Find hidden paragraph With Selection.Find .ClearFormatting .Text = "^p" .Font.Hidden = True .Forward = True While .Execute ' Replace hidden paragraph with auto color, unhide With Selection.Font .Hidden = False .Color = wdColorAutomatic End With ' Insert style separator Selection.InsertStyleSeparator Wend End With End Sub Tag: Lock Form When Text Field is Clicked Tag: 87486
  - 18
    - Reset Graphic Image I am using Word 2003 and am inserting a *.jpg file into the footer of a document. I'd like to "reset" the picture to it's original size because it is being scaled down to 93% because of the 1" margins. Thank you for your assistance. Tag: Lock Form When Text Field is Clicked Tag: 87485
  - 19
    - List of available Printers Hi, I am running Word 2000 on Windows XP Professional SP2. I have followed the recommendation to call the Windows API enumprinters as per example. However I am getting runtime error 9 subscript out of range. How can I resolve this? Thank You! Tag: Lock Form When Text Field is Clicked Tag: 87478
  - 20
    - Microsoft word window Tabs I would just like to suggest that you have each new word document open in a tab format like you have on the new IE7. The tabs should preferrably open at the bottom of the word interface and be approximately where the properties bar is (the bar that tell you the size and all the other info about something wehn you run the mouse over it). This would definately give you guys a edge over anything google is planning. Thank you. ---------------- 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=a7992f03-df90-4362-a78a-58f31aa9b945&dg=microsoft.public.word.vba.general Tag: Lock Form When Text Field is Clicked Tag: 87477
  - 21
    - Identify a formula field I have code to delete bookmarks and unlink fields in a document once the document is completed, as follows: For Each Mark In .Bookmarks .Bookmarks(Mark).Delete Next Mark For Each Field In .Fields .Fields.Unlink Next Field End With I need to NOT unlink a field if it contains a formula, only unlink the field if it is a bookmark type field, but I don't know how to write this code. Thanks for any help. -- singeredel (Julie) Tag: Lock Form When Text Field is Clicked Tag: 87475
  - 22
    - attaching document to an email Hi I am attaching a doucment to an email using Options.SendMailAttach = True ActiveDocument.sendmail if I want to add the email address and a subject line, is this possible please? J Tag: Lock Form When Text Field is Clicked Tag: 87471
  - 23
    - Opening Access Database from Word Hello, I have Word 2003 and Access 2003. I'm trying to write VBA code to open a database from within Word. Can anyone explain why this code works (see below) ... Sub OpenDatabase() ' Opens the Northwind database Dim MyAccess As Object Set MyAccess = GetObject("C:\Program Files\Microsoft Office\OFFICE11\SAMPLES\Northwind.mdb", "Access.Application") End Sub And this code does not work (see below) ... Sub OpenDatabase() ' Opens the MyDatabase database Dim MyAccess As Object Set MyAccess = GetObject("C:\Program Files\Microsoft Office\OFFICE11\SAMPLES\MyDatabase.mdb", "Access.Application") End Sub My database named MyDatabase.mdb resides in the same path as the Northwind.mdb database so I can't figure out why this code won't work. Any assistance would be greatly appreciated. Tag: Lock Form When Text Field is Clicked Tag: 87466
  - 24
    - global variables for whole project not just when user form is runn Can anyone help me. I've got a template project with 2 user forms. Code has to stop running between using the two user forms to enable the user to add unique information and check statements created to that point, before calculating of each statement occurs. Then the user re-starts the programme, so I'm trying to find a way to retain the variable information contained in the first user form, to be utilised in code for the 2nd user form. I already know about declaring global variables within modules, but I'm talking about retaining variable input for the whole project, over all modules. Tag: Lock Form When Text Field is Clicked Tag: 87458
  - 25
    - Adding values in formfields I am trying to create a function that will add the values of 2 text boxes based on if the checkbox is true or false. I am using Word 2003 but it needs to work on Word 2000 also. If the checkbox is true then I want the value of Copy divided by Pages If False then I want the value of Copy times the value of Sheets. Currently: Copy, Pages, and Total are all textbox form fields If CheckBox1.Value = True Then ActiveDocument.FormFields("Total").Result = ActiveDocument.FormFields ("Copy" / "Pages") Else ActiveDocument.FormFields("Total").Result = ActiveDocument.FormFields("Copy" * "sheets") Endif Can this be done somehow? Would I have to use something other than textboxes? The users needs to be able to update the formfields with their data. Thanks for looking. Josh Tag: Lock Form When Text Field is Clicked Tag: 87455

I am working in Word 2002. I have created a template, the first section of
the form the user types freely (no fields). The next section contains the
fields that the user will tab to to complete the form.

I would like to have a macro that will lock the template when the user
clicks on the first field (Text1) with the mouse. Can this be done?
--
Jamie

Top

Re: Lock Form When Text Field is Clicked by Jonathan

Jonathan
Wed Jun 28 11:43:18 CDT 2006

"Jamie" <Jamie@discussions.microsoft.com> wrote in message
news:86DC7506-67FE-4988-B8F6-D5BFB5454FD9@microsoft.com...
>I am working in Word 2002. I have created a template, the first section of
> the form the user types freely (no fields). The next section contains the
> fields that the user will tab to to complete the form.
>
> I would like to have a macro that will lock the template when the user
> clicks on the first field (Text1) with the mouse. Can this be done?
> --
> Jamie

If you insert a section break between the free text and formfields area, you
can selectively protect just the formfields section. When you go to tools,
Protect, click the Forms option and then click the Sections button to show
the dialog that allows you to select which section(s) to protect.

--
Regards
Jonathan West - Word MVP
www.intelligentdocuments.co.uk
Please reply to the newsgroup
Keep your VBA code safe, sign the ClassicVB petition www.classicvb.org

Top