Opening a document in SharePoint from Word

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - Dynamic display of data from SQL to excel Hi All, I am very new to VB and macros. I need your help in completing the tasks assigned to me. Please help. I have been reading many webpages and groups in vain. The following are the tasks i need to accomplish 1. In excel open a userform with a combo box that lists the tables in the DB. (If it is not possible I dont mind hardcoding it) 2. When user selects a table, another combo should select a list of columns in the table. 3. The user should be able to multiselect the columns and then the values should populate in excel. If there is anyother way to do this, pls give your inputs. Thanks Priya Tag: Opening a document in SharePoint from Word Tag: 109425
  - 2
    - can I put in a timezone toggle button if I want to toggle all times in a document between eastern and central, can I put in a button at the top of a word document to do that? Tag: Opening a document in SharePoint from Word Tag: 109414
  - 3
    - I open word 2007 document the ribbon will not apear I have Office Home and Student 2007 I open adocument the ribbon is not above to use the document also says non-commerical use Tag: Opening a document in SharePoint from Word Tag: 109413
  - 4
    - How to determine if a .doc file is already open? Hello, friends, This may not belong here, but I could not find the proper group. In c#.net 2005, we use office interop to start different .doc files. The source code are as the follows: object fileName = fullPathFileName; object newTemplate = false; object docType = 0; object isVisible = true; if (wordApp != null && wordApp.Documents != null) { Microsoft.Office.Interop.Word.Document doc = wordApp.Documents.Add(ref fileName, ref newTemplate, ref docType, ref isVisible); wordApp.Visible = true; } The above worked for the first document opening without problem. What we want to do is: We need to check if the next given fullFileName is already open. If yes, we just bring it to front, rather than to open a duplicate one. Otherwise, open it using above code. The source code for this checking are like the follows: if (wordApp != null) { foreach (Microsoft.Office.Interop.Word.Document doc in wordApp.Documents) { if (String.Compare(doc.FullName, fullPathFileName, true) == 0) { doc.Activate(); return; } } } However, we found the doc.FullName had the value Document1 for the first open .doc file, therefore, failed the checking, and always caused a previously given fullFileName being opened again. Any ideas, reference paper or snippet? Thanks a lot! Tag: Opening a document in SharePoint from Word Tag: 109410
  - 5
    - how to add and validate a field in word from an application? Tag: Opening a document in SharePoint from Word Tag: 109406
  - 6
    - UserForm field fill-in issue I have a combobox on a UserForm that I want to use to "push" data to the various fields. The problem I see is that no matter what I use- the AfterUpdate event or the OnChange event, the fields don't get filled until the enduser clicks on the form. How can I get the form to paint itself automatically without this user input? Here's the comboboxx code: Private Sub PTNAME_AfterUpdate() [DOB] = [PTNAME].Column(2) [FNAME] = [PTNAME].Column(1) [ACCT] = [PTNAME].Column(3) [LNAME] = [PTNAME].Column(0) End Sub Any ideas? Tag: Opening a document in SharePoint from Word Tag: 109401
  - 7
    - Reference Template in a UNC location Hi there, i cannot create a reference to a common template stored at a UNC location (\\srv\common\template.dot), instead the reference points to a temporary template on my local disk (...ApplicationData\.... \~w...dot). if i copy the same template to a local folder and reference it afterwards the reference works. is this a bug or a security issue? thanks, matthias Tag: Opening a document in SharePoint from Word Tag: 109400
  - 8
    - old macro on a new office version hallo i am using a macro in windows 98, word 97. now that i am trying to instal it on winxp, word2003/2007 it doesnt work exactly like it used to. does somebody knows if i should add a parameter to the macro in order to make work properly on the higher version. -- michal Tag: Opening a document in SharePoint from Word Tag: 109399
  - 9
    - Retaining orientation and page numbers when inserting docs Hello, I am trying to insert a.doc into b.doc using InsertFile and to retain the page orientation in a.doc. I also have page numbering in a header in b.doc. If I just InsertFile I lose the orientation. If I insert a SectionBreakContinuous and then InsertFile I keep the orientation but my Page numbers restart from 1. Is there a way to keep the Orientation and not restart page numbering? Thanks Tag: Opening a document in SharePoint from Word Tag: 109397
  - 10
    - Repeating macro I am trying to learn how to write macros in Word 2007, and I need to develop a macro that will repeat a certain task a specified number of times. To initialize the macro, the user will enter in the number of times the task will be repeated, so the macro will keep performing the job until the specified limit has been reached. Tag: Opening a document in SharePoint from Word Tag: 109393
  - 11
    - Inserted picture not showing up in Word My mum wants to put a picture into a word document for her journal. She says that this has never been a problem before, but this time the picture is not showing up. Its just a huge blank box. However it's showing in 'Print Preview'. I tried to insert the same picture on my laptop into word and it worked first time. So I emailed the word document to her, so she could copy if from my word document to hers, but the picture still didn't show up! Does anyone know how to get it show up? It must be a setting in her copy of Word right?! Tag: Opening a document in SharePoint from Word Tag: 109392
  - 12
    - Sound Recorder OLE I have two solutions possible for a problem. Left clicking on a Sound Recorder OLE linked to a wav file results in the sound clip playing but no way to stop it. Annoying if the clip is long and just a "peek" is needed. If you right click you can chose Edit Sound Object and the Sound Recorder window opens, but you have to click on play to start it. 1) Can the default OLE verb be changed so "2" so the Recorder is opened rather than the sound just being played? Or is athere a command to stop the Playback available in VBA? or 2) Is there a VBA Method available (after opening the Soud Recorder with a macro) to start/stop the playback, i.e. manipulate the buttons on the Object programmatically? Thanks. Tag: Opening a document in SharePoint from Word Tag: 109385
  - 13
    - Automate rich-email sending (no attachment) I have a word document with some images in Word 2003. If I manually select File->Sent To->Mail recipient I am able to send the word document as formated, as an email message. I need a way to automate this from VBA macro. Tag: Opening a document in SharePoint from Word Tag: 109384
  - 14
    - Attached Templates Because I have all our templates on the server, I end up having trouble replacing the templates after editing because of "open files". I'd like to start detaching templates from ordinary documents upon opening. I have a global macro file that gets saved in everyone's startup folder. I'd like to add the following vba to this file: With ActiveDocument .UpdateStylesOnOpen = False .AttachedTemplate = "" End With so that whatever document gets open, if there is an attached template, it would get removed. Eventually (I hope), none of my templates will show up under "open files" on the network. Would this work? What would I call the macro to have it automatically run no matter what document gets open? Tks . . . Brenda Tag: Opening a document in SharePoint from Word Tag: 109383
  - 15
    - Menu Bar Option disappears Using Office XP 2003 Created a template for use with our documents containing macros and numbering styles etc which I put on as Menu bar drop down options. Have also just upgraded to Workshare Professional 5.0. from Deltaview 2.9 Now, when you save a document which uses this template, the Menu bar option disappears. The only way to get it back is either close out of the document or go to tools, templates & add ins and either attach the same template again or tick or untick the automatically update styles box. Any ideas what is causing it? Tag: Opening a document in SharePoint from Word Tag: 109382
  - 16
    - find string and move file to folder Using WinXP Pro, Office 2003 Pro I would like to look at each .doc in a folder, search it for a particular string, if the string is present, move it to a different folder, else, look at the next one until the files in the folder have all been searched for the string and separated. Does anyone out there in MVPland know of an example online that I can look at and adapt to my particular needs? Thanks for the nudge Joanne Tag: Opening a document in SharePoint from Word Tag: 109380
  - 17
    - Shortcut to C# code via VBA in Word 2007? Hello, I asked this question in the Visual Studio Tools for Office forum, and was told it could not be done without VBA code. How do I create a keyboard shortcut (defined by myself or overriding a built-in one) to call some c# code? I already have a command button for my code on the Ribbon, and an item in the context menu, but what I really need is a keyboard shortcut. I am a c#/.net developer unfamiliar with VBA, so please include all steps in getting the necessary VBA code to work... Tag: Opening a document in SharePoint from Word Tag: 109379
  - 18
    - macro to remove password doesn't work Hi All, I recorded a macro in Word to remove a password in a word file but it doesn't work. The document has a password for editing, however when I open the doc it asks me to type the password. In the macro I open the Options Tab and remove the password then I close the options window and save the file. The password is then empty. However when I close the file and open it again I still have to type the password and when I look at the Option window again the password is back. Is this magic or what? When I don't use a macro but do everything by hand the password is gone and it is saved correctly. Marco Tag: Opening a document in SharePoint from Word Tag: 109374
  - 19
    - Drop downs won't retain entry macros: Drop downs won't retain entry macros: I created a rather large template for our staff to use when filling in information about "xyz"... When they click the first parent drop down the corresponding information populates in the child drop down. Some what like a cascading drop down. My problem is the staff filled out all of the information for the first section of the year on "xyz". It is now the second section and time to reopen the "xyz" file and update the information. When they click the parent drop down that contains the populate vb macro to populate the child drop down the "run macro on entry" is empty. I can go in and choose what macro i want but i would have to do this with over 100 questions. Shouldn't word have retained the macros in the drop downs? every one of them are empty. Therefore when I click the first Parent drop down, the second one is blank unless i go in and select the macro that was originally in that field. I'd be happy to send a copy of the document to anyone that would be interested in giving me a hand... ANY help would be greatly appreciated Tag: Opening a document in SharePoint from Word Tag: 109349
  - 20
    - message box issues I am working on a form "A" and i have created a Message box that has 'yes' and 'No' options. if i click on the yes button then it should open up a new form "B" for me,But if i click on the No option then it should let me stay in the same form that i have been working previsiouly. I have this code here.Can anyone help me as to what i am missing here. Private Sub Form_Open(Cancel As Integer) If IsNull(CompanyID) Or IsNull(InspectorID) Then MsgBox "", vbYesNo + vbCritical + vbDefaultButton2 If Response = vbYes Then DoCmd.OpenForm "", , , , acFormAdd Else If Response = vbNo then Exit Sub End if Tag: Opening a document in SharePoint from Word Tag: 109347
  - 21
    - Resolution 922849 -- older version of word documents Our tech support downloaded the service pack onto one of my coworkers computers. She received the "this file was created in an earlier version of word... cannot be opened due to a registry policy setting" erro. After searching for help on this site I found the link for the resolution -- 922849. But I cannot find the DWORD value the form is reffering to. I found her file under: HKEY_CURRENT_USER\Software\Policies\Microsoft\Office\11.0\Word\Security but there was no FileOpenBlock subkey. Could it be located elsewhere? Is there something else I should be looking for? I would like to resolve the issue for her for EVERY document as opposed to just accepting this particular document. She's going to be receiving a lot of older files via e-mail that were created in an older version of word. Tag: Opening a document in SharePoint from Word Tag: 109345
  - 22
    - Object variable or With block variable not set error in macro Ok usually I would just take my time and try to figure this out on my own but time is short and I willing admit I am way out of my league. I found the code on gmayor.com for splitting mail merges. The macro works to the extent that it will give the first record but then errors out with Object variable or With block variable not set. Does anyone see what is obviously wrong here? And a side question is how do I get these to be saved as .pdf files? Thanks in advance for any help Sub SplitMergeLetter() ' splitter Macro modified to save individual letters with ' information from data source. The filename data must be added to ' the top of the merge letter - see web article. Selection.EndKey Unit:=wdStory Letters = Selection.Information(wdActiveEndSectionNumber) Selection.HomeKey Unit:=wdStory Counter = 1 While Counter < Letters Application.ScreenUpdating = False With Selection .HomeKey Unit:=wdStory .EndKey Unit:=wdLine, Extend:=wdExtend .MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend End With sName = Selection Docname = "F:\Test\" & sName & ".doc" ActiveDocument.Sections.First.Range.Cut Documents.Add With Selection .Paste .HomeKey Unit:=wdStory .MoveDown Unit:=wdLine, Count:=1, Extend:=wdExtend .Delete End With ActiveDocument.SaveAs FileName:=Docname, _ FileFormat:=wdFormatDocument ActiveWindow.Close Counter = Counter + 1 Application.ScreenUpdating = True Wend End Sub Tag: Opening a document in SharePoint from Word Tag: 109344
  - 23
    - VBS Script to remove protection from all word docs in directories We have literally tens of thousands of documents that are protected and some are even password protected. I am trying to find a way to remove the protection from multiple files without having to open every one and skip those with a password. Any help is appreciated. -- Regards, Samson Tag: Opening a document in SharePoint from Word Tag: 109343
  - 24
    - Thanks a lot hi everyone, thanks a lot for all your code. i've tried helmut's and it worked like a charm, i'll try the others once i've got some time for this again. cheers, thomas Tag: Opening a document in SharePoint from Word Tag: 109340
  - 25
    - digital certificate having a bit of a problem with '07 not allowing macros to run on one of my computers, which I created on another. Both openings are from trusted locations, but non-generating computer (the one that is trying to run it, not the one that created it). More specifically, the macro will run, but it won't let me edit it. any ideas? -- Boris Tag: Opening a document in SharePoint from Word Tag: 109328
- Next
  - 1
    - what character is enter I have the following code: Sub quitarenter() For cnt1 = 1 To characters.count char = Selection.Characters(cnt1).Text If char = Chr(10) Then Characters(cnt1) = Chr(13) End If Next. what I want to do is: I'm importing from acrobat reader to word, a lot of (change of line) characters appear in between sentences, what I want to do is to delete those (change of line) (chr 10) to space and continuation of the sentence. Remarks, I ran the code and it did not work, frist of all the "characterscount" after the "for" didnt work, and then the code never found chr(10) (change of line) any suggestions?? TIA Tag: Opening a document in SharePoint from Word Tag: 109319
  - 2
    - Save Selection with VBA? This is a multi-part message in MIME format. ------=_NextPart_000_009A_01C855FB.DF21B6A0 Content-Type: text/plain; charset="Windows-1252" Content-Transfer-Encoding: quoted-printable Hi, can someone tell me if there is a Save Selection VBA (whatever is = highlighted) and Save As give doc name way to do this? One can print = selection but can one save selection with VBA? Many thanks... ------=_NextPart_000_009A_01C855FB.DF21B6A0 Content-Type: text/html; charset="Windows-1252" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=3DContent-Type content=3D"text/html; = charset=3Dwindows-1252"> <META content=3D"MSHTML 6.00.6000.16587" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>Hi, can someone tell me = if there is a=20 Save Selection VBA (whatever is highlighted) and Save As give doc = name way=20 to do this? One can print selection but can one save selection with = VBA? Many thanks...</FONT></DIV></BODY></HTML> ------=_NextPart_000_009A_01C855FB.DF21B6A0-- Tag: Opening a document in SharePoint from Word Tag: 109310
  - 3
    - Limitation of a form field of 255 Characters Hi!! I am trying to use a macro to fill in a field in a form with a paragraph I copy from an EXCEL cell. The problem is that this paragrph has more than 255 characters so it doesn't seem to work directly. I have seen some article that sugest to use the clipboard as a way to overcome this problem. Then, the code I have programmed is as follows: Range("T"&fila) returns the paragraph from the EXCEL cell. wdFF is defined as Object in wordFile.Formfields. rngx is defined as Range If Len(Range("T" & fila)) > 255 Then wdFF.Result = Left$(Range("T" & fila), 250) MyDataObj.SetText "" MyDataObj.PutInClipboard MyDataObj.SetText Mid$(Range("T" & fila), 256) MyDataObj.PutInClipboard Set rngx = wdFF.Range rngx.GoTo rngx.Select With wordFile.Selection .Collapse wdCollapseEnd .Paste End With Else wdFF.Result = Range("T" & fila) End If The macro works fine until it arrives to the sentence "Set rngx = wdFF.Range" where it stops and says that formats are not compatible (rngx is defined as a range). Any idea of how to solve the problems with the code? Does the rest of the code for the macro look fine? Tag: Opening a document in SharePoint from Word Tag: 109296
  - 4
    - Dropdown Button Values Hi, I have done a form and I have included a dropdown button that allows to select among 6 different values that are predetermined. Now, I would like to have a second dropdown button that allows to select among 4 different values, but the issue is that those four values depends on the value previously selected in the button 1. In summary, Dropdown1 values (1, 2,3,4,5,6) and for Dropdown2 values as follow: - Dropdown1 =1 then a,b,c,d -Dropdown1=2 then e,f,g,h ..... and so on. Any idea of how to do this? Should I use a macro that fills in the values for the second dropdown button once the value for the first one is selected? Any suggestion on how this code should look like? Tag: Opening a document in SharePoint from Word Tag: 109295
  - 5
    - Working with Loops Below is a section of my macro. Is there a way to do a loop? Dim i as Long Dim WC35 As String, WC36 As String, WC37 As String Set oFF = ActiveDocument.FormFields If oFF("Check35").CheckBox.Value = False And Me.Controls("Ck35").Value = False Then WC35 = False ElseIf oFF("Check35").CheckBox.Value = False And Me.Controls("Ck35").Value = True Then WC35 = False ElseIf oFF("Check35").CheckBox.Value = True And Me.Controls("Ck35").Value = False Then WC35 = True ElseIf oFF("Check35").CheckBox.Value = True And Me.Controls("Ck35").Value = True Then WC35 = False End If If oFF("Check36").CheckBox.Value = False And Me.Controls("Ck36").Value = False Then WC36 = False ElseIf oFF("Check36").CheckBox.Value = False And Me.Controls("Ck36").Value = True Then WC36 = False ElseIf oFF("Check36").CheckBox.Value = True And Me.Controls("Ck36").Value = False Then WC36 = True ElseIf oFF("Check36").CheckBox.Value = True And Me.Controls("Ck36").Value = True Then WC36 = False End If If oFF("Check37").CheckBox.Value = False And Me.Controls("Ck37").Value = False Then WC37 = False ElseIf oFF("Check37").CheckBox.Value = False And Me.Controls("Ck37").Value = True Then WC37 = False ElseIf oFF("Check37").CheckBox.Value = True And Me.Controls("Ck37").Value = False Then WC37 = True ElseIf oFF("Check37").CheckBox.Value = True And Me.Controls("Ck37").Value = True Then WC37 = False End If Set oFF = Nothing I tried the following but the debugger kept giving me an error at â??(â??WCâ?? & i)â??. Set oFF = ActiveDocument.FormFields For i = 35 To 37 If oFF("Check" & i).CheckBox.Value = False And Me.Controls("Ck" & i).Value = False Then (â??WCâ?? & i) = False ElseIf oFF("Check" & i).CheckBox.Value = False And Me.Controls("Ck" & i).Value = True Then (â??WCâ?? & i) = False ElseIf oFF("Check" & i).CheckBox.Value = True And Me.Controls("Ck" & i).Value = False Then (â??WCâ?? & i) = True ElseIf oFF("Check" & i).CheckBox.Value = True And Me.Controls("Ck" & i).Value = True Then (â??WCâ?? & i) = False End If Next i Set oFF = Nothing Tag: Opening a document in SharePoint from Word Tag: 109294
  - 6
    - Change quotes into curly quotes with VBA? Dear all, Is it possible to use VBA to change all quotes into curly quotes (not smart quotes). Now I have Chr0145, Chr0146, Chr0147 and Chr0148 in my document. I've tried to do this with Search & Replace unsuccessfully, in various fonts. Best regards, Shirley Nomey Tag: Opening a document in SharePoint from Word Tag: 109290
  - 7
    - Form field check box Hi, I'm working on a form in Word 2000. If the user checks a check box (chk2a), I want three check boxes in the form to be disabled (chk3a, chk3b, chk3c). I want them to be dimmed and disabled. Thanks. cc Tag: Opening a document in SharePoint from Word Tag: 109276
  - 8
    - Making userforms accessible to multiple templates Hello I have a userform under my Normal.dot file which I want to be accessible by 4 other user-defined templates. I envision adding a toobar to each template which contains a button that links you to the global userform from any document created from any of the user-defined templates. Is there a way that this can be done? Thanks! Ellen Tag: Opening a document in SharePoint from Word Tag: 109270
  - 9
    - MS Word Automation help Hello, I am trying to find a method via VBA or VB that will determine whether a MS Word Doc is password protected. A boolean result would be the best.. OR can I trap for the Password Dialog that opens up when a passworded doc is opened and handle it myself via code? Some Background We are trying to page out (each page as a seperate doc) a document that may or may not be passworded, a a background function of an application. What we want to do it manage the password dialog event ourselves so we can keep word hidden away, and pass in the passwords in our open call as needed. FYI: Word stays open when a password is required and looks like crap while we process 20 or more pages. Thanks Scott Tag: Opening a document in SharePoint from Word Tag: 109269
  - 10
    - How to find MS Word's default file location I have a Word template to share with others. I repeatedly have to explain how they need to put it in their template folder before using it. Is there a simple way to create an .exe file that all it does check to see what the MS Word uses as the tempate folder and copys my template into it? thanks. ck Tag: Opening a document in SharePoint from Word Tag: 109266
  - 11
    - Does A "Delete Section" Macro Already Exist? Hi, I'm looking for a macro that deletes the current section in a multi-section document, and that fixes the header and footer problem that occurs when deleting section breaks. I wanted to find out if someone had a macro out there already before I tackled it myself. TIA MarieJ Tag: Opening a document in SharePoint from Word Tag: 109265
  - 12
    - using code to determine the file location My template has code in AutoNew() I need to asign strFileLocation as the file location of the template How do I do this? thanks. Tag: Opening a document in SharePoint from Word Tag: 109264
  - 13
    - MS Access VBA - how to bold text? Word 2003 Access 2003 I'm creating the body of a document from a dot file. I need to bold a sentence that comes between 2 others. Set docWord = objWord.Documents.Add(Template:=sWordFormsPath & "LetRec.dot") Dim rngWord As Word.Range Set rngWord = docWord.Goto(What:=wdGoToBookmark, Name:="LetterBody") rngWord.InsertAfter "We have enclosed a signed and notarized authorization that allows us to receive this inforrmation on behalf of our client. " >>> Need to turn bold ON here to bold the following sentence rngWord.InsertAfter "If you would prefer payment in advance, kindly advise and we shall remit same immediately. " >>> Need to turn bold OFF here rngWord.InsertAfter "Thank you for your anticipated cooperation." I've tried a few things that don't seem to work. What code do I need to bold that middle sentence? Thanks, Keith Tag: Opening a document in SharePoint from Word Tag: 109263
  - 14
    - Save without Header and Footer Hi, I have application which launches a wrod template file, when I save it, I want to just save the text part of it and not the header and footer. How is it possible? Thanks in Advance Tag: Opening a document in SharePoint from Word Tag: 109258
  - 15
    - macro Hi, With a macro, I'm trying to add a field where my user has to type the name of the person. At the end of the document I have to use this information again. That means I have to save this information (I can't use fill-in - or maybe yes I don't know how to refer to it). example: Dear Mr > XXXXXXX .. .. Thank you Mr. XXXXXXX Has to be dinamic because my user has to select by a toolbar option to add this greeting in his document Can you guide me if I can do what I'm planning? If yes How? Thank you -- meme Tag: Opening a document in SharePoint from Word Tag: 109254
  - 16
    - Another dreaded "loop through the document" question Using Word 2007. I promise that I have looked through the code here but my programming skills are rusty and VBA is NOT my "thing". I have a long (200+ page) document that begins life as an HTML file generated by a test bank program. I've written a long macro that does a lot of cleanup work using find/replace and it works great. However, I'm not quite satisfied with my results. This test bank doesn't get monkeyed with often so I don't care how slow or clunky the macro is and I don't care to spend hours and hours getting it perfect. The edited document contains between 450 and 500 questions, each in the format shown below. All paragraphs are in the Normal style (with no space above or below) except the question number (e.g, 13 of 465), which is in Normal (Web) (which has space before and after). I'll show returns as <r>. = indicates a horizontal rule that is the full width of the page, - indicates a horizontal rule that is half the width of the page. =========================================== 13 of 465<r> This is the question. It may be one or more paragraphs. Each paragraph ends with two returns.<r> <r> (some questions have a graphic)<r> <r> a. This is the first answer.<r> b. This is the second answer.<r> c. This is the third answer.<r> d. This is the fourth answer.<r> -------------------------------------------<r> This is the feedback shown if the student gives the wrong answer. It may be more than one paragraph.<r> <r> a.<r> ================================================== 14 of 465<r> etc. I want the information below the possible answers to show the correct answer before the feedback, like this: -------------------------------------------<r> a.<r> This is the feedback shown if the student gives the wrong answer. It may be more than one paragraph.<r> ================================================== I have recorded a macro which finds the correct answer, cuts it, then searches for the graphic immediately above it (which is always the short horizontal rule) and pastes it after that graphic, then formats with a style that has space below. I'm not worried about two hard returns in a row right now because I can search and replace those later. I just want to get the answer and the feedback swapped for now. Here's the code that I recorded. I just need to know what to put around it to make it run repeatedly until it gets to the end of the document. I'm sure this is a stupidly simple thing, but I'm having no luck. I understand the concept of loops, I just don't know what variable to check for to do this until the end of the document is reached. If there's a way to search for a horizontal rule (and differentiate between full-width and 50% width), I'm all eyes because I may need to differentiate between graphics that are pictures and those that are lines. Sub SwapAnswer() ' ' SwapAnswer Macro ' ' Selection.Find.ClearFormatting With Selection.Find .Text = "^p^$.^p" .Replacement.Text = "" .Forward = True .Wrap = wdFindAsk .Format = False .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute Selection.Cut Selection.Find.ClearFormatting With Selection.Find .Text = "^g^p" .Replacement.Text = "" .Forward = False .Wrap = wdFindAsk .Format = False .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute Selection.MoveRight Unit:=wdCharacter, Count:=1 Selection.PasteAndFormat (wdPasteDefault) Selection.MoveUp Unit:=wdLine, Count:=1 Selection.Style = ActiveDocument.Styles("Body Text") Selection.TypeBackspace End Sub Thanks in advance for any and all help. I'm sure I'm missing something very simple. liz Tag: Opening a document in SharePoint from Word Tag: 109252
  - 17
    - Losing references to template I have a macro-enabled template in 2007 (.dotm) with a user form, which is being used my multiple users and is saved in a shared network location. For some reason, whenever anyone has a document based on the template open on their desktops, if anyone else tries to base a document on the template, they get a "Field Review.dotm is locked for use by (Name of person using it)", then gives the option to open "Read Only". My understanding is that multiple users should be able to have documents that are based on the same template open without locking the template. Am I missing something or is this a Word 2007 bug? Please help... Tag: Opening a document in SharePoint from Word Tag: 109248
  - 18
    - Help cleaning up bad paragraph breaks Windows XP Pro SP2 MS Word 2003 SP3 I have inherited a document that was originally created in Notepad and has paragraphs that look like the psuedo-paragraphs below: xxxxxx xxxx xxxx xxxxx xxx xxxxxx xxx xxxx xx xxxxx x xxx^p xxxxxx xxxx xxxx xxxxx xxx xxxxxx xxx xxxx xx xxxxx x xxx^p xxxxxx xxxx xxxx xxxxx xxx xxxxxx xxx xxxx xx xxxxx x xxx^p xxxxxx xxxx xxxx xxxxx xxx xxxxxx xxx xxxx xx xxxxx x xxx^p xxxxxx xxxx xxxx xxxxx xxx xxxxxx xxx xxxx xx xxxxx x xxx^p xxxxxx xxxx xxxx xxxxx xxx xxxxxx xxx xxxx xx xxxxx x xxx^p xxxxxx xxxx xxxx xxxxx xxx xxxxxx xxx xxxx xx xxxxx x xxx^p xxxxxx xxxx xxxx xxxxx xxx xxxxxx xxx xxxx xx xxxxx x xxx^p xxxxxx xxxx xxxx xxxxx xxx xxxxxx xxx xxxx xx xxxxx x xxx^p I'm looking for a fast way to remove the unnecessary paragraph breaks while preserving a blank line between the actual intended paragraphs. I've written a macro that will do this on a selection, but I can only do it one small selection at a time as the macro will also delete the blank line between the intended paragraphs. Any ideas? Thanks! -gk- Tag: Opening a document in SharePoint from Word Tag: 109244
  - 19
    - How do I export a list of bookmarks from a document? I am working with an existing word doc that is linked via bookmarks to an excel doc and I am trying to figure out which bookmarks in the word doc go to which cells in the excel doc. My first step is to get a list of bookmarks in the word doc. Is there a way to extract a list of those? Tag: Opening a document in SharePoint from Word Tag: 109241
  - 20
    - how to determine if a reference is selected and set it if it is no I'm trying to programatically test if the Microsoft Speech Object Library is selected and then if it is not I'd like to set it. I've tried error trapping each side of a Dim but that didn't work: On error reume next Voc = SpeechLib.SpVoice On error resume 0 If voc is nothing then '... let me know or fix it Due to security levels I hope I can do this without Application.VBE.ActiveVBProject.References Can anyone shine some light on this one? Thanks! Mike Tag: Opening a document in SharePoint from Word Tag: 109235
  - 21
    - Added Text and Tables to a template, updating TOC Hi all I have this major problem. I have loaded the document template with consists of a TOC and two headings link this TOC (Page 1) Heading 1 (Page 2) Boomark Heading 3 (Page 2) What I want is to replace the bookmark between the two heading with alot of data, which mean that Heading 3 will be on page seven. Basically I have two problems 1. When I use object oBookMark = "bookmark"; Bookmark metaBookmark = this.oDoc.Bookmarks.get_Item(ref oBookMark); Word.Paragraph oPara; oPara = this.oDoc.Content.Paragraphs.Add(ref metaBookmark.Range); oPara.Range.Text = "Text1"; oPara.Format.SpaceAfter = 6; oPara.Range.InsertParagraphBefore(); Word.Paragraph oPara; oPara = this.oDoc.Content.Paragraphs.Add(ref metaBookmark.Range); oPara.Range.Text = "Text2"; oPara.Format.SpaceAfter = 6; oPara.Range.InsertParagraphBefore(); The Output in the document is Text2 Text1 Where I was expecting Text1 and then Text2. It seems that it is inserting it in reverse. I have tried using InsertParagraphAfter(), but with a even worse result. What am I doing wrong ? Hope for any of you gurus to help. If you can answer how to update the TOC when done that would be great. Cheers Tag: Opening a document in SharePoint from Word Tag: 109234
  - 22
    - Delete a paragraph up to a specific character hi, i am trying to find a way to delete all text/characters in a paragraph up to (and including) the last occurence of a backslash within that paragraph, throughout the document. using the GNU regexp i would select something like "^.*\\" and delete it. so from a paragraph like Subject\heading\section1\part2\topic3 only the following should remain topic3 i tried to get this using search/replace but i failed with the unknown number of characters which are to be replaced and the beginning of the paragraph. please also note that some paragraphs have automatic numbering but i assume that this should not make any difference as the numbers should stay as they are. any help on this is appreciated. cheers, thomas Tag: Opening a document in SharePoint from Word Tag: 109233
  - 23
    - Need to have form field end up with data generated by macro that is I just had a Word form task dumped on me, which would not be a problem if I had spent a lot of time working with forms in the past. But I haven't. I need to create a form field, run a macro on entry (or exit, if more appropriate), and have the macro results end up in the form field when I'm done. For example, a one line macro that places the result of application.username into the field. Its probably very obvious to most everyone, but right now I'm missing it. thanks in advance david Tag: Opening a document in SharePoint from Word Tag: 109222
  - 24
    - Deleting empty formfields I am using Word 2003, can someone assist me with some code which looks through a document and deletes all the formfields that are not populated. Thanks in advance -- Mark Tag: Opening a document in SharePoint from Word Tag: 109219
  - 25
    - Searching for exact number of spaces Hello, Is there a way to search for an exact number of "regular" spaces. I want Word to search for 6 spaces. These spaces were caused by blank form fields that were unlinked. The problem that I'm having is that my document also contains 15 and 30 hard spaces that are used to create a spot for handwriting. The find and replace is removing the hard spaces that I want to keep. Thanks. j Tag: Opening a document in SharePoint from Word Tag: 109218

Hi

When Microsoft word 2007 is opened and the Open dialog box is opened, a user
can navigate to My Network Places. From there, a SharePoint site can be
selected and the appropraite document library can be opened to view files. A
file can then be selected and opened. In my document library I have a created
a new column. Can I change the view of this document library (seen from
Microsoft Words open dialog) to include my custom column?

Lucy

Top