Electronic forms

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - A recorded macros to assign style "Normal" doesn't work I have created new style "Case Cite" as applying Italics. I recorded two new macros to apply "Case Cite" and "Emphasis" to selected text; both macros select styles from the tool-bar, type in the style name, and end with "Enter." I created new macro buttons for each. They all work as expected. I then wanted to be able to return text that I'd styled as "Case Cite" or "Emphasis" to "Normal" text. I recorded a similar macro to reapply "Normal" to the styled text. But this recorded macro results in the text being styled "Case Cite + Normal" or Emphasis + Normal" rather than merely "Normal." When I enter the same routine manually, it generates the expected "Normal" style. I would sincerely appreciate any suggestions or explanations. Very respectfully, Larry Tag: Electronic forms Tag: 100543
  - 2
    - Creating Link in table of contents to specific pages??? I have a word document that is over 1000 pages and it has a table of contents. My client wants to be able to click on a specific line in the table of contents and it will take the user to that specific page. Is this possible? If so, I would be greatful for some help! Thanks in advance! John SChenkel Tag: Electronic forms Tag: 100541
  - 3
    - Delete tables within a bookmark I am trying to delete everything within a bookmark. I can delete the text by setting the text property of the bookmark's range to an empty string. This, however, doesn't remove the tables. If I use the Tables property of the range and iterate through to delete them, it works to delete all the tables inside, but only if the range is not entirely inside of a table. If a range is inside of a table, the Tables property returns that parent table and it gets deleted instead. Does anyone know how to get the tables that are inside of a range, without getting the table that the range is inside of. Even better would be a mechanism to delete everything within a Range, including text, tables, drawing objects, etc., but I have pretty much given up on that approach and labeled it impossible without iterating through each of these individually.. Tag: Electronic forms Tag: 100539
  - 4
    - Detaching references in a word docu I have an urgent need to detach the references in a Word document for a grant deadline. I am required by the new NIH PureEdge software for electronic grant submission to section off the 15 page narrative and 5 page end reference section. When I divide the document into sections, the endnote references are detached and go with each section. I need to put all the references in one section, with numbers that are not electronically attached to the end reference document but still numeric indicators of the indicated references. Cutting and pasting the references separately has not worked. Please help! Rhonda Randolph Medical University of SC Tag: Electronic forms Tag: 100534
  - 5
    - Where can I get a basic, but clear, understanding of Macros. I do not want to read heavy tomes on Macros is there anywere that I can get a basic understanding of how to create Macros, besides using the auto function in Word. Tag: Electronic forms Tag: 100523
  - 6
    - call .NET DLL Hi, is it possible to call .NET DLL from VBA? How? Best regards Seb Tag: Electronic forms Tag: 100522
  - 7
    - UserForm_Initialize() Need to find more info about the order in which the sub routines for UserForm events UserForm_Activate(), UserForm_Initialize(), are executed, which one is executed first and also other events that belongs to the UserForm object Tag: Electronic forms Tag: 100521
  - 8
    - prevent to show part of document Could I prevent from showing part of open document? I try to solve one problem and one of possible sollution could be show just two pages of three. Gives Word or VBA som possibilities? Peter KNAP Tag: Electronic forms Tag: 100517
  - 9
    - =?ISO-8859-1?Q?=22=E9chec_de_la_fermeture_du_presse-pa?= Bonjour, Que faire pour emp=EAcher ce d=E9faut: "=E9chec de la fermeture du presse-papiers" qui appara=EEt quand je cherche =E0 restaurer le contenu sauvegard=E9 du = presse papier par PutInClipboard ? D'avance merci. hpa Tag: Electronic forms Tag: 100516
  - 10
    - MVP Status Fellow regular posters and MVP's, I've been declined the MVP status of this year. A decission of MS, I can't comprehend and validate: If there are persons willing to doubt this decission, kindly feedback on this thread. -- Krgrds, Perry System: Vista/Office Ultimate VS2005/VSTO2005 SE Tag: Electronic forms Tag: 100515
  - 11
    - loading userforms Should you always load a userform before showing it? What is the advantage of loading the userform and then showing as opposed to just showing? Thanks. Tag: Electronic forms Tag: 100510
  - 12
    - Is there a Clippy replacement for 2007 I wrote quite a few help systems for my office using what many people have described as 'that annoying Clippy.' As it turns out, he was endearing for the purpose used, and, properly configured in VBA, it allowed tremendous 'go forward' and 'go backward' controls, numbering, bulleting and autosizing features just not found in the standard message box. Is there anything thing that replaces this feature in 2007? Any 3rd party programs? Ed (in Virginia) Tag: Electronic forms Tag: 100504
  - 13
    - Connect mysql with vba Hi, I'm writing a word vba which require to connect the mysql database. I'm new to database thing, any1 have any idea ?? I'm thinking to the ADODB.Connection But, I have no idea about the connectingstring, provider and driver,etc I'm using "Mysql server 5.0" I've install in my computer, so I can do the testing on my comp (localhost), and need to connect to the server on the network later. Many thanks Tag: Electronic forms Tag: 100502
  - 14
    - Last page _ BLANK I have problem with this macro: Dim i As Long i = 5 Dim source As Document, target As Document Set source = ActiveDocument Set target = Documents.Add target.Range.FormattedText = source.Sections(i).Range.FormattedText After user click last button of user form just appropriate section of active document is shown. This is perfect however problem is that it always inserts one empty page at the end of section. I thought it is problem with formatting of text but it is plenty of place at the end of page for text (so I think problem is not with page or section brake). Could somebody help? peter Tag: Electronic forms Tag: 100499
  - 15
    - How to hide source document? Hi. I am trying to create form for submission of applications where all used forms are in one document in separate sections. After user open template of this document macro asks him through UserForms what kind of application is he asking for. Then he is asked to fill in the appropriate boxes in UserForms and at the end only filed section is shown. Problem for me is that with filled form also template document stays open. I tried to write macro for closing source template document: ActiveDcument.Close but since template is actually active document last part of my macro: Dim i As Long i = 5 Dim source As Document, target As Document Set source = ActiveDocument Set target = Documents.Add target.Range.FormattedText = source.Sections(i).Range.FormattedText did not work because active document was no longer open then. How could I solve this problem? I want user to see just UserForms and at the end just part of the document he will print. Tag: Electronic forms Tag: 100498
  - 16
    - Creating a variable This is what I need to do: If TextBox1 on UserForm1 is blank when the UserForm is unloaded, I want to create a public variable called "incomplete" (would also want that variable deleted if it already existed and TextBox1 were not blank when the UserForm where unloaded). Then when I open UserForm4 if the variable "incomplete" exists, I want the BackColor of CommandButton1 to be red. Tag: Electronic forms Tag: 100489
  - 17
    - OptionButton Group question On my UserForm I have a number of OptionButton groups and each group has a Label associated to it. This is a series of questions with 3 possible answers for each question. What I would like is some code which would change the color of the text in the label from black to red, if none of the 3 OptionButtons in the group is true. I am hoping this could be done by Option Group as opposed to writing a click event for each OptionButton. Tag: Electronic forms Tag: 100482
  - 18
    - checking if folder exists and if not create it Hi, I've got some code that move files, but I need the code to check if the destination folder exists and if it doesn;t to create it. I think I can do the code to create if, but not sure how to check if it exists? My code is below. I need help with the ***** bit. Thanks for any help. Dim oldfilepath as String Dim newfilepath as String Dim myFile as String Dim fso oldfilePath = "C:\old\" newfilePath = "C:\new\" myFile = "randomfile.doc" Set fso = CreateObject("Scripting.FileSystemObject") ***** if newfilepath exists then 'do nothing else fso.CreateFolder(newfilepath) end if oldfilepath = oldfilepath & myFile newfilepath = oldfilepath & myFile Name oldfilepath As newfilepath Tag: Electronic forms Tag: 100477
  - 19
    - Finding and converting text to hyperlink with VBA Greetings from sunny Sweden, I have a macro that converts a SGML-style (custom formatted) plain text file to a word document with proper formatting (headers, styles etc.) but I cannot figure out how to convert the links. How can I use the macro to locate "tagged" (hyper-)links and convert them to working hyperlinks? This is how it looks like: --- Some text here. Some more text. Click here to view the PDF: <LINK>FileName.PDF</LINK> Even more text. --- I want the "tags" to be removed and the text FileName.PDF to remain, but as a functional (clickable) link to the PDF file. I know that there is a search-and-replace method that can extract substrings from strings (have used it for style control) but can't make it happen with the link creation. Any coding hints would be appreciated. Thanks in advance! Jon Tag: Electronic forms Tag: 100475
  - 20
    - modified date Hi, I;m using the following code to display the modified date of the active document: Dim dlvVersions As Office.DocumentLibraryVersions Dim dlvVersion As Office.DocumentLibraryVersion Dim strVersionInfo As String Set dlvVersions = ActiveDocument.DocumentLibraryVersions If dlvVersions.IsVersioningEnabled Then strVersionInfo = dlvVersion.Modified End If MsgBox (strVersionInfo) Set dlvVersion = Nothing Set dlvVersions = Nothing But it's debugging at: Set dlvVersions = ActiveDocument.DocumentLibraryVersions saying that 'No versions exist for this file' Any ideas where I'm going wrong? thanks. Tag: Electronic forms Tag: 100471
  - 21
    - adding gui application to word Suppose i have a gui application (currently written in python) which enables the user to create word tables, is there any way to insert this application as some sort of a macro (meaning: adding a button to word clicking on which will show the wizard) Thanks Tag: Electronic forms Tag: 100470
  - 22
    - computer maintenince how could where i could improve my knowlge on this ---------------- 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=44eb36cd-57a8-464d-9739-ed4c9bcfc735&dg=microsoft.public.word.vba.general Tag: Electronic forms Tag: 100469
  - 23
    - loop through all docs in a folder Hi, how do I loop through all documents in a folder and perform a task? ie what I would like to do is: - while there is a word document in folder - open word document - perform code - next word document if there is one Thanks. Tag: Electronic forms Tag: 100447
  - 24
    - Templates and Macros Hi guys and gals, I'm having trouble with a template in Word 2003. It has macros and forms in it. When I create a document based on the template, the macros work while on my machine. However, when I separate the document from the template, the macros and forms no longer work. It appers they are not copied into the new document. Does anyone know how I can make the document carry over the macros and forms from the template? Thanks in advance Stephen at ZennHAUS Tag: Electronic forms Tag: 100440
  - 25
    - Reading text at bookmark field Hi All, Bascially i have a bookmark "Claim_No", i want to be able read the data that has been entered against it. I have had one of those days and i know it is simple, but i just can't seem to remember how to do it. Can someone please show me an example so that i can store it again in the memorybank. TIA Justin Tag: Electronic forms Tag: 100436
- Next
  - 1
    - Set Word Options in VBA for Word 2007 I've created a macro to set Word Options to my needs in Word 2007. It includes most of the properties settings for Options object and some properties settings for Application & Window/View object. It runs VERY SLOW. I stepped through each line of codes and found half of the settings take several seconds to finish. The similar macro I created for Word 97/2000/2002/2003 run very smoothly, took just a second to finish all. I've noticed the message "conneting to printer .." shown on the status bar when the macro run and tried to turn off "Application.ScreenUpdating", no difference. Does any one know how to fix this problem? Thanks in advance. Tag: Electronic forms Tag: 100408
  - 2
    - Find the next blank line Hello from Steved I have a 6 paragraph then a blank line also i have paragraphs from 4 to 22 each with a blank line. Please how do I find the next blank line, Yes I've tried using wildcard but did not help me find the next blank line. Thankyou. Tag: Electronic forms Tag: 100402
  - 3
    - What is Eclipse Inventory Management & Financial Software? Interviewing with a Company that has the Eclipse Software. Where can I find this? Thanks. Tag: Electronic forms Tag: 100384
  - 4
    - deselect command in a macro I have created a macro for users to update all the fill-in fields in my document, but it puts me back in with the "WholeStory" still selected. AND the recorder will not let me click on the document, right click and toggle fields or any other way that I know how to deselect the material. This document is going out to the entire company of about 2000 poeple and I know a LOT of them are not computer savvy enough to do it themselves. SO, I want to know what the command is that I can put within the macro to deselect the WholeStory. I don't even know enough about Visual Basic to BE dangerous!!! Thanks! Audrey Tag: Electronic forms Tag: 100383
  - 5
    - Form field frustration I am having a couple of issues programmatically accessing form fields. I have assigned â??bookmarkâ?? names to these fields and here is how I can use VBA to see what has been entered in the field. Dim FieldText as string FieldText = Word.ActiveDocument.Bookmarks("LastName").Range.Text The problems : A) I cannot detect when the field is empty B) Empty fields have text value of 5 spaces, but return FALSE when compared to being equal to 5 spaces C) Trim seemingly has no effect, as â??trim(FormField)â?? still = FormField = 5 spaces D) Any attempt to erase the text in a form field by setting = â??â?? erases the form field, setting equal to 5 spaces also does not work. I need to be able to detect an empty form field, and be able to erase text in form fields. Any ideas? Tag: Electronic forms Tag: 100381
  - 6
    - Insert superscripted ordinal date - Word 2000 ?? Hi all :) I'm trying to create a macro that inserts the current date to replace the selected text (not as a field). ------------------ Selection.InsertDateTime DateTimeFormat:="dd MMMM yyyy", InsertAsField:= False, DateLanguage:=wdEnglishUK, CalendarType:=wdCalendarWestern, InsertAsFullWidth:=False ------------------ is easy enough and gives me the date as 18 May 2007 but I need to insert it as 18th May 2007 with the ordinal (st,nd,rd) in superscript. I think that it's something to do with \* ordinal but I can't for the life of me work out how the syntax goes. And I can't even begin to guess how to do the superscripting! Yes, I know it's a silly way of formatting a date - it wasn't my idea ;) Thanks all :) Tag: Electronic forms Tag: 100376
  - 7
    - PrintDate from Protected document doesn't work I have the following problem with PrintDate which appears only in Word 2000 In Word 2003 everything works OK. My users unfortunately use Word 2000 (9.0.4402 SR-1) 1) Users demand is that the footer contains PrintDate field 2) Second demand is that when approved, document is protected against writing with password . I protect document programmatically with following code Const wdAllowOnlyComments=1 WordObj.ActiveDocument.Protect wdAllowOnlyComments, False, "PASSWORD" 3) PROBLEM IS FOLLOWING: After protecting the document, PrintDate, after document has been printed out, doesnâ??t work any more It is empty = 00.00.00000. I also found out that the same problem with PrintDate appears also if I do everything manually in Word so probably this is a Bug or something. Can someone give me an advice what to do that PrintDate will work in Word 2000 (9.0.4402 SR-1). Maybe there is fix for this or some workaround? Thank you Lojze Tag: Electronic forms Tag: 100373
  - 8
    - How to remove italic formatting I'm obviously a bloody beginner in Word. I have some text, some of it formatted in the (italic) character style "Emphasis", some of it with "italic" applied as manual formatting. I want to have all the text formatted "not italic". Selection.Font.Italic=False does not work. Am I overlooking an obvious, simple solution, or do I have to write some elaborate code, just to remove the italic formatting? Regards, Klaus Tag: Electronic forms Tag: 100359
  - 9
    - Excel running Word macro I have a complicated macro which does several things to a series of imported htm files, however it is not working as expected. An excel macro produces a list of htm files within a directory and outputs it to sheet1 and then one by one uses this as a parameter to start a word macro (ww has been defined as the word application object) ww.Documents.Open ThisWorkbook.Path & "\datastage1.doc" runnow = ww.Run("stage1", file) This runs the macro stage1 in the word document datastage1.doc using the file stored in variable "file". Sub stage1(myfile As String) file = myfile folderpath = ActiveDocument.Path & "\inputhtm\" Documents.Open FileName:=folderpath & file This word macro then opens the file and is meant to remove all occurences of a two line text fragment using a word (XXPAEDT) to find the first of those lines: 'DELETE UNWANTED LINES Selection.HomeKey Unit:=wdStory Selection.Find.ClearFormatting With Selection.Find Do While .Execute(FindText:="XXPAEDT", Wrap:=wdFindContinue, Forward:=True) = True Selection.EndKey Unit:=wdLine, Extend:=wdExtend Selection.MoveDown Unit:=wdLine, Count:=1, Extend:=wdExtend Selection.Delete Unit:=wdCharacter, Count:=1 Loop End With This does not work and the lines are not removed, yet if i open the document manualy and then use the macro after removing the above section that opens the htm file (so it starts with the remove unwanted lines comment) it works perfectly!!! Any ideas as to why the different behaviour if the file is opened manually by the user or automatically by the macro Thanks Richard Tag: Electronic forms Tag: 100349
  - 10
    - Date + 1 Month Hi there, I'm pretty new so bear with me. I have a word document ask a user what a certain date is. Let's call it "DATE A". This date is inserted into the first row of a table. I need to add 1 Month to this date in the next row. 2 Months to this date in the row below, etc. I.E. Let's assume DATE A is January 01, 2007. I need the next date in the table to be Febuary 01, 2007, then March 01, 2007 etc. Any clue on how I would do this? I've looked everywhere, and every thing seems to be a little over my head. Much appreciated. :) Kevin Tag: Electronic forms Tag: 100332
  - 11
    - Code for Adding Custom Document Property I have revised an existing template to contain a new custom doc property. Since old documents (not containing the new property) will sometimes be attaching to the template, I need to add code that checks the attached document for the existence of the property & if it's not there, create it. I know the code I need to use to add the custom document property(ActiveDocument.CustomDocumentProperties.Add ...) , but I don't know the best way to check for the property & tell it to execute the code if the property is missing. Also ... I read in another email thread that it may not be a good idea to create the customdocument property with ActiveDocument since the property exists in the template but not in the open doc. If the property existing in the template but not in the active document creates a conflict, then what should I use instead to create it? Thanks for your help. -- JoAnn Tag: Electronic forms Tag: 100331
  - 12
    - Detect if word document is open How can I detect if a word document is open and if it is open how can i do modification from MS access with VBA? Thanks for any suggestion Jose Tag: Electronic forms Tag: 100329
  - 13
    - Using arrays in a userform I have an Excel file which is a database of names and addresses. It consists of 16 columns of data and 20 rows for each office. In my Word template I have a userform with, among other things, a dropdown list and two command buttons. One button Retrieves the first nine fields in the database and displays these on the form for the user to check the correct details have been selected based on the dropdown list. I have no problems with this part. On retrieval, Fields 10 to 16 are put into an array variant, like this: VarData(0) = rs.Fields(9).Value VarData(1) = rs.Fields(10).Value VarData(2) = rs.Fields(11).Value VarData(3) = rs.Fields(12).Value VarData(4) = rs.Fields(13).Value VarData(5) = rs.Fields(14).Value VarData(6) = rs.Fields(15).Value I have checked and each element of the array is holding its correct information. What I don't know how to do is to pass the data that was in the array under the "Retrieve" button so that it can be put on the paper when I press the "OK" button. Each piece of the array would be concatenated with a vbCr prior to going on the page. Also, if there was no data (Null) in the last field then I would discard it from the operation. Can anyone help, please? Roderick Tag: Electronic forms Tag: 100326
  - 14
    - Userform is no longer invoked Hi: I am having a problem with a userform that is no longer invoked once the custum button is pressed. What it is call up a template with the userform to enter specific fields and then print two copies. What did I do to cause this issue? Thanks, -- Jo Tag: Electronic forms Tag: 100322
  - 15
    - closeing only active document Hi. how to write macro for closing only active document not all the word application? in F1 help I found st. like : ActiveDocument.Close SaveChanges:=wdPromptToSaveChanges but when user is asked whether he wants to save changes or not there is also possibility to cancel and when this is done document is not closed. I would like to manage to close active document without possibolity for cancelling (just save or not). regards Peter. Tag: Electronic forms Tag: 100317
  - 16
    - Re: find last modified file in .file.search Use msoSortOrderDescending instead of msoSortOrderAscending in FileSeach.Execute() -- Krgrds, Perry System: Vista/Office Ultimate VS2005/VSTO2005 SE "Perry" <drumper@gmail.com> schreef in bericht news:... > Don't know what the With Selection/End With block is doing in yr code. > Remove this for the time being. > > As to the searchresults: > > Expand below code example to match yr situation. > Note: the results can be found in the .FoundFiles() array. > The first member in this array will be the full filename of targetfile you > requested against the .Execute() parameters you used. > > Use that one to open your file... > > With Application.FileSearch > .NewSearch > .LookIn = strPath > .SearchSubFolders = False > .FileName = "*.csv" > .Execute (msoSortByLastModified, msoSortOrderAscending) > If .found then > Msgbox .FoundFiles(1) > end if > End With > > -- > Krgrds, > Perry > > System: > Vista/Office Ultimate > VS2005/VSTO2005 SE > > > > "muyBN" <muyBN@discussions.microsoft.com> schreef in bericht > news:6B3C5BA7-C9C5-4F69-8DDB-E270F5BDBF22@microsoft.com... >> In the following code, I need to open the file which has been modified >> last >> but don't quite know how to write it. Your assistance in this will be >> appreciated. >> >> >> strPath = "C:\Data\misc\0PackIt\" >> strFirstFile = ActiveDocument.name >> With Selection >> With Application.FileSearch >> .NewSearch >> .LookIn = strPath >> .SearchSubFolders = False >> .FileName = "*.csv" >> .Execute (msoSortByLastModified) >> intFiles = .FoundFiles.count >> If .Execute(msoSortOrderAscending) > 0 Then >> strFile '= last modifed file >> End If >> End With >> End With >> Documents.Open (strPath & "\" & strFile), AddToRecentFiles:=True, >> Format:=11 >> >> -- >> Bryan > Tag: Electronic forms Tag: 100316
  - 17
    - how to reference/open last file modified In the following code, I want to search for and open the most recent file modified, but don't know how to write that particular line. Assistance will be appreciated. Thanks. strPath = [path name] strFirstFile = ActiveDocument.name With Selection With Application.FileSearch .NewSearch .LookIn = strPath .SearchSubFolders = False .FileName = "*.csv" .Execute (msoSortByLastModified) intFiles = .FoundFiles.count If .Execute(msoSortByLastModified, msoSortOrderAscending) > 0 Then strFile = [last modifed file] End If End With End With Documents.Open (strPath & "\" & strFile), AddToRecentFiles:=True, Format:=11 -- Bryan Tag: Electronic forms Tag: 100313
  - 18
    - find last modified file in .file.search In the following code, I need to open the file which has been modified last but don't quite know how to write it. Your assistance in this will be appreciated. strPath = "C:\Data\misc\0PackIt\" strFirstFile = ActiveDocument.name With Selection With Application.FileSearch .NewSearch .LookIn = strPath .SearchSubFolders = False .FileName = "*.csv" .Execute (msoSortByLastModified) intFiles = .FoundFiles.count If .Execute(msoSortOrderAscending) > 0 Then strFile '= last modifed file End If End With End With Documents.Open (strPath & "\" & strFile), AddToRecentFiles:=True, Format:=11 -- Bryan Tag: Electronic forms Tag: 100312
  - 19
    - Error running Word 2007 Macro- macros disabled I get the error "Macros in this project are disabled" when trying to run a macro. I looked around and went into the Trust Center and set it to allow all macros. It still gives me the same message even after setting that to allow all and restarting word. Any ideas? This was a Word 2003 doc if that makes any difference. Tag: Electronic forms Tag: 100308
  - 20
    - Auto Clear Picture from Clipboard After I copy paste a picture to a word document, save it and close it, it asks "You placed a picture on the clipboard. Do you want this picture to be available to other applications after you quit word?" and has 3 options for me "yes" , "No" , "Cancel" . How do I make sure it always selects "No"? All help is appreciated. Tag: Electronic forms Tag: 100305
  - 21
    - Word 2003 I would like to combine 2 pre-installed macros in one macrobutton expression without creating a new macro or editing an existing one. Can I somehow include 2 macros in 1 macrobutton? Tag: Electronic forms Tag: 100291
  - 22
    - Is range in a field? Is there a way to test whether a Range (or Selection) is in a Field, and if so, to access that field? Tag: Electronic forms Tag: 100288
  - 23
    - PUTTING A TICK IN A FORM Please help I'm going insane. I want to eaither change the check box form field into a a= ctual tick or get the macro (which is basic) to work in my form. It keeps coming up with a= run time error 4605. Heres the VB for the tick Sub TICK() ' ' TICK Macro ' Macro recorded 2/16/2007 by Megan Dixon ' Selection.TypeText Text:=3D"=C3=BC" Selection.Font.Name =3D "Wingdings" Selection.MoveLeft Unit:=3DwdWord, Count:=3D1, Extend:=3DwdExtend Selection.Font.Name =3D "Wingdings" End Sub Thanks Tag: Electronic forms Tag: 100283
  - 24
    - Splitting a line of text at commas I have an Excel database and my Word template retrieves data from it quite successfully. One of the lines of data it retrieves is an address, each part of it separated by commas e.g: address1, address2, address3, and so on... For historical reasons, the one line address must remain as it is in the Excel database file. My client has now asked me if I can split that line at each comma and put each component on a separate line. I'm sure it can be done but would not know where to start. Is there a solution, please? Roderick Tag: Electronic forms Tag: 100280
  - 25
    - Selecting a table in a footer I'm trying to adapt the following code to find out if there is a table in any of the footers: kJunk = ActiveDocument.Sections(1).Footers(1).Range.StoryType 'Iterate through all story types in the current document For Each kStory In ActiveDocument.StoryRanges 'Iterate through all linked stories Do On Error Resume Next Select Case kStory.StoryType Case wdEvenPagesFooterStory, wdFirstPageFooterStory, wdPrimaryFooterStory * * Pseudo-code: If there are any tables in this story then select the third cell in the first row * Next End If Case Else 'Do Nothing End Select On Error GoTo 0 'Get next linked story (if any) Set kStory = kStory.NextStoryRange Loop Until kStory Is Nothing Next Can anyone help with this please? Roderick Tag: Electronic forms Tag: 100279

Hello Everyone:

I am creating some forms in Word 2002. The forms are locked so many of the
text formatting features that staff members would like to use when filling
out the form are disabled. The staff members would like to edit the text
they input by insreting bullets and changing font styles to bold or italic.

Can anyone suggest a way for me to work around this problem?

Thanks,
Nadine

Top

Re: Electronic forms by Doug

Doug
Tue May 22 15:46:45 CDT 2007

That is one of the restrictions that you come up against with such forms.
An alternative might be to create a userform.

See the article "How to create a Userform" at:

http://word.mvps.org/FAQs/Userforms/CreateAUserForm.htm

--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

"Nadine" <Nadine@discussions.microsoft.com> wrote in message
news:7DFAA262-C020-4D06-A97E-AF72ACA90500@microsoft.com...
>
>
> Hello Everyone:
>
> I am creating some forms in Word 2002. The forms are locked so many of
> the
> text formatting features that staff members would like to use when filling
> out the form are disabled. The staff members would like to edit the text
> they input by insreting bullets and changing font styles to bold or
> italic.
>
> Can anyone suggest a way for me to work around this problem?
>
> Thanks,
> Nadine

Top