RPS Server unavailable

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - WordBasic.MailMergePropagateLabel Error Hi all, I have created a macro in MS Word 2003 to merge some date in my document for printing labels. First time my macro works well and merges all the data. But next time when i want execute my macro insted of creating a wizerd , i get an error : No entry found ( Error number 509) "WordBasic.MailMergePropagateLabel" Any help in this regard. Regards, Naveed Anwar. Tag: RPS Server unavailable Tag: 84916
  - 2
    - Bookmark uses original paragraph style Hi all, I have the following code and the selection is in a body text paragraph: Selection.Fields.Add Range:=Selection.Range, Text:= "REF " & parag.Range.Bookmarks(1) & " \h", PreserveFormatting:=False yet when I run the insert the paragraph style changes to that of the paragraph of the bookmark. I would've thought that the Preserver formatting flag would prevent this??? Thanks, R Tag: RPS Server unavailable Tag: 84915
  - 3
    - set document variable to Wingdings character Hi all Word 2003 on XP Pro. Does anyone know how to set the value of a document variable to a Wingdings 2 character? My existing code is: ActiveDocument.Variables("required").Value = "Yes" I'd like to replace the "Yes" with a tick symbol (character number -4016) from the Wingdings 2 font. Have tried: ActiveDocument.Variables("required").Value = ChrW(-4016) but it gives a box symbol. Is this possible or is there another way? Thanks. Tag: RPS Server unavailable Tag: 84908
  - 4
    - How Digital Signature work in office. Hi every one, I'd like to know how the digital signature in office 2003 work,I can work with it but I need technical information about the digital signature architecture,I'd like to know how digital signature in word call Crypto API and how work with Crypto Service Provide(CSP). If someone have information about which CSP is uses in digital signature please help me. Best Regards. Orchid -- Message posted via OfficeKB.com http://www.officekb.com/Uwe/Forums.aspx/word-programming/200604/1 Tag: RPS Server unavailable Tag: 84907
  - 5
    - Search & replace whole phrases Hi guys, I have this macro: Sub Duplicates() Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "am. " {this is 'am.' plus a space} .Replacement.Text = "amer. " {this is 'amer.' plus a space} .Forward = True .Wrap = wdFindContinue .Format = True .Font.Italic = True .MatchCase = True End With Selection.Find.Execute Replace:=wdReplaceAll End Sub Unfortunately, it replaces such instances: "bbbbbbbam. " (--> "bbbbbbbamer. ") I want to to replace only instances where "am. " is an independent phrase, not part of other phrases. Regards, Ivaylo Tag: RPS Server unavailable Tag: 84906
  - 6
    - Add custom toolbar and double click on a button = event handler fired three times Hi, If you add a new toolbar with one button and then you double click on the toolbar button, the Click event of the button is fired three times. Is this a known bug? Is there some sort of workaround? Here is the code to reproduce the behaviour Private toolbar As CommandBar Private WithEvents toolbarButton As CommandBarButton Private Sub Document_New() Set toolbar = CommandBars.Add("Test", 1, missing, True) Set toolbarButton = toolbar.Controls.Add(1) toolbarButton.Style = msoButtonCaption toolbarButton.Caption = "Click me" toolbarButton.Tag = "something unique" toolbar.Visible = True End Sub Private Sub toolbarButton_Click(ByVal Ctrl As Office.CommandBarButton, CancelDefault As Boolean) Call Selection.Range.InsertAfter("Button clicked " & DateTime.Time$) Call Selection.Range.InsertParagraphAfter End Sub Thank you in advance Angelos Tag: RPS Server unavailable Tag: 84903
  - 7
    - How to generate _Ref autonumber? Hi, I'm adding references to a document and would like to generate (to keep it consistent with what word creates) the _Ref autonumber. Does anybody know if it's accessible through any functions etc.? Thanks, R. Tag: RPS Server unavailable Tag: 84899
  - 8
    - Merge fields for quotation template Our company database sends information to a word document using merge fields which can then be used in templates. I want to create a quote template - there can be up to 12 lines for pricing however I only want to insert the extra rows if they are used. How can I do this? Tag: RPS Server unavailable Tag: 84888
  - 9
    - Create Document I am trying to create a document with specific feilds that cannot be moved or changed but has fields next to those to fill in. I need to be able to send out for clients to fill in and send back. Like a Data Entry form where you tab through and fill in the blanks without movings the question fields. I know this can be done and am getting a headache trying to figure this out. Someone please help! Tag: RPS Server unavailable Tag: 84887
  - 10
    - trying to use "Load a ListBox from a Named Range in Excel using DAO" Usinng word2k, Win 2k I found this Code on the mvp website. It looks pretty straight forward. When i tried to run it I get a "runtime errror 3011" Microsoft jet database engine could not find object 'myobj' make sure the object exists and that you spell its name correctly and the path name correctly. I have double checked the spelling a path to the "named range i am trying to load. I have verifed the reference to dao 3.6 object library, Thks for any suggestions. BRC Tag: RPS Server unavailable Tag: 84881
  - 11
    - How do I change/edit default Word Template? I'd like to change my default word settings so when I start typing on a new line autocorrect doesn't automatically capitalize my first word. I know it is easy enough to adjust the autocorrect settings after it happens the initial time you begin the new document, but it is a hassle to do that every time... An suggestions Tag: RPS Server unavailable Tag: 84878
  - 12
    - Word 2003 AND Calling Outlook 2003 We have several templates with a VB fill-in form that eventually gets send via email. We just are moving to Outlook 2003 from Groupwise and receive the message "A program is trying to access e-mail addresses you have stored in Outlook. Do you want to allow this? When have to check the check box and select YES for access. We want users to not have to receive this message. We still have several users utilizing Groupwise so we can't attach the Outlook Reference library. Here is the code we were using below. We also want people at home to be able to utilize these forms and they might not have outlook. Any suggestions without receiving the prompt above. Sub OutLK() Dim objOL As Object Dim objLO As Object Dim objMessage As Object On Error GoTo ErrorHandle Set objOL = CreateObject("outlook.application") Set objLO = objOL.CreateItem(0) objLO.Display With objLO .Subject = strSubject .Recipients.Add strRecip 'emails correct recipient .Body = strBody .attachments.Add (ActiveDocument.FullName) .Send End With Exit Sub Exit_errorHandle: Exit Sub 'handles error sending email ErrorHandle: MsgBox Err.Description & Err.Number MsgBox "Email Malfunction, please contact the Help Desk.", vbOKOnly Resume Exit_errorHandle End Sub Tag: RPS Server unavailable Tag: 84862
  - 13
    - Macro to change fonts in Microsoft Word I want to creat a macro that can run through a document changing font sizes and attributes. Eg if it is Times New Roman 12 change it to Arial 10, if it is TNR 14 change it to Arial 12. Any thoughts? Posted Via Usenet.com Premium Usenet Newsgroup Services ---------------------------------------------------------- ** SPEED ** RETENTION ** COMPLETION ** ANONYMITY ** ---------------------------------------------------------- http://www.usenet.com Tag: RPS Server unavailable Tag: 84859
  - 14
    - You should be able to create a shortcut for Paste Special in Word In Word 2000 you could at least create a keyboard short cut or a macro (and assign a keyboard shortcut to it) to use to Paste Special/Unformatted text. In Word 2003, not only can you not create a shortcut, but the same macro won't work. And putting it on a menu bar doesn't work consistently either. ---------------- 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=cd1b471d-c3cd-4f5d-aa8a-90f476585b1a&dg=microsoft.public.word.vba.general Tag: RPS Server unavailable Tag: 84857
  - 15
    - Inserting text gathered from InputBox Hi, I'm using Word 03. I'm missing something here, but I want to insert the text obtained from the user responding to the InputBox, here's what I have: Sub newtest() Dim Message, Title, Default Dim MyValue As String Selection.TypeParagraph Selection.TypeText ("BLACKLINE OF ") Message = "Blackline of " Title = "Blackline Footer" Default = "1" MyValue = InputBox(Message, Title, Default) ActiveDocument.Content.InsertAfter ("MyValue") 'does not work End Sub Thanks for any advice. Tag: RPS Server unavailable Tag: 84856
  - 16
    - Suggestions for deployment I work in a small office enviroment. Being that it's small, when someone is absent, others sometimes have to finish reports for that person. We run into permission problems with documents. (.doc) In particular, I have written some code that reads information for a floppy and inserts that data into a document with formfields. No problems so far. The report is printed immediately and the doc is never saved. So if it gets opened as read only, there's no problem. In my searching of the forums, the best answer seems to be, to this is a template, instead of a document. That's no problem. I can correct that easily. However, all that data is collected in another document for a monthly report. As the infomation is pulled and inserted from the floppy, I also insert it into a word table that is the monthly report doc file. This one is where I have trouble. Since someone else could be processing the report other than the original user, the macro always stops and asks the user to change the name because Word opens it as a read only. Since we get floppies all during the month, changing the name could result in multiple copies and lost info. (Not all of the employees are computer savy either in knowing the difference in templates and documents) My thoughts on this are to write the data to a text file, and then when the monthly report is due, open a template and insert from the text file. Would I have the same problem with the text file? (Or INI file) Exporting to Excel or Access seems a bit overkill. Are there any better solutions? Tag: RPS Server unavailable Tag: 84852
  - 17
    - File in document program willnot respond when clicked to open. When I open Word, I go to Documents to open a folder with a few files in it. I click on the folder and the computer locks up with a message that word cannot open the folder. I have to hit "Ctrl,Alt,Delete" to close Word. If I open Word and just click on a file in Documents it will open. This just started to happen this past week. I checked for updates etc. but can't find a solution. Tag: RPS Server unavailable Tag: 84849
  - 18
    - Place Clipboard Info into Variable I want to place the information contained in the clipboard (which is an integer) into a variable so that I can increment the number and place it somewhere else in my document. How do I do that? -- Debra Ann Tag: RPS Server unavailable Tag: 84847
  - 19
    - Method ~ of Object ~ Failed. Can anyone help? Hello all, I have written an application in VB6 that opens a word document (a template) and performs "find and replace" on data that i pass in. My application is used by external users who log on to our network via Citrix. A few of the users get the error message "Method ~ of Object ~ Failed" (error number -2147023113). The bit of code that this occurs is below: Do While wrdDoc.Content.Find.Execute( _ FindText:="@" & strReplaceField & "@", _ MatchCase:=False, _ MatchWholeWord:=True, _ ReplaceWith:=strReplacement, _ Replace:=True) Loop As fas as i know, its nothing to do with Printer settings or anything, it just seems to be the Execute statement above. Anybody any ideas as to how i can prevent this? Much appreciated Nev Tag: RPS Server unavailable Tag: 84838
  - 20
    - how to set the cursor(mouse pointer) at the end of the bookmark? Hi, I am adding a bookmark dynamically in word document using vb.net. All i want is i want to set my cursor position(mouse pointer) at the end of the bookmark text. Here is the code i am using to create bookmark. Dim rng As Object rng.Text = "bookmark1 text" Connect.applicationObject.activedocument.Bookmarks.Add("bookmark1", rng) Any help would be appreciated cheers Praveen Tag: RPS Server unavailable Tag: 84836
  - 21
    - Change signature layout Hi everyone. I have some vba code to generate a pdf document through word, and add also digital signature. My problem is : how can i change the way the signature layout, it always show the same standard signature image look. I have tryed to change my signature field whit my own logo and so on in acrobat, and named it as signtaure 2, but how can i use that signature field instaed of Acrobat standard signature field. my vba code i this: If gPDDoc.Open(Dest) Then Set jso = gPDDoc.GetJSObject Set oAdd = jso.AddField("FirmaField1", "signature", 0, Array(100, 400, 200, 200)) Set oSign = jso.GetField("FirmaField1") Set ppklite = jso.Security.getHandler("Adobe.PPKLite", True) ppklite.login "", "c:\20.sig" oSign.signatureSign ppklite ppklite.logout End If I have use days for looking on the net for any solution, but cant find anything :( hopes that somone can help :( Tag: RPS Server unavailable Tag: 84834
  - 22
    - =?Utf-8?Q?=E2=80=9CThis_XML_element_cannot_be_appl?= Hi, Consider a Word Template project, with the template containing a few lines of text and an XML tag around the whole document. During document startup you add a button in the Actions Pane and you listen to the Click event. private void ThisDocument_Startup(object sender, System.EventArgs e) { UserControl1 userControl = new UserControl1(); userControl.button1.Click += new EventHandler(button1_Click); this.ActionsPane.Controls.Add(userControl); } In the event handler for the Click event you add an XML tag around the current selection. void button1_Click(object sender, EventArgs e) { this.Application.Selection.XMLNodes.Add( "ChildElement", "http://tempuri.org/VSTOAddXmlNodeSchema.xsd", ref missing); } The first time you click on the button you will get a COMException exception with the message â??This XML element cannot be applied hereâ?? (you can find complete exception information at the bottom of this message). From then on, every time the button is clicked no exception will be thrown and the code will work. Is there a specific reason behind this behaviour or is it a bug? If it is a bug, is it safe to simply call it the first time expecting it to fail and call it again or will this de-stabilize the environment? For those kind enough to look into this problem, I have created a simple project that reproduces the problem. You can download it here. (my usual file host is down, so I am using an upload service; if the link stops working please do let me know) Thank you in advance Angelos Petropoulos -- http://blogs.wdevs.com/angelos â??This XML element cannot be applied hereâ?? ************** Exception Text ************** System.Runtime.InteropServices.COMException (0x800A17DD): This XML element cannot be applied here. at VSTOAddXmlNode.ThisDocument.AddXmlTag() in C:\Documents and Settings\angelosp\My Documents\Visual Studio 2005\Projects\VSTOAddXmlNode\VSTOAddXmlNode\ThisDocument.cs:line 56 at VSTOAddXmlNode.ThisDocument.button1_Click(Object sender, EventArgs e) in C:\Documents and Settings\angelosp\My Documents\Visual Studio 2005\Projects\VSTOAddXmlNode\VSTOAddXmlNode\ThisDocument.cs:line 26 at System.Windows.Forms.Control.OnClick(EventArgs e) at System.Windows.Forms.Button.OnClick(EventArgs e) at System.Windows.Forms.Button.OnMouseUp(MouseEventArgs mevent) at System.Windows.Forms.Control.WmMouseUp(Message& m, MouseButtons button, Int32 clicks) at System.Windows.Forms.Control.WndProc(Message& m) at System.Windows.Forms.ButtonBase.WndProc(Message& m) at System.Windows.Forms.Button.WndProc(Message& m) at System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m) at System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m) at System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam) ************** Loaded Assemblies ************** Tag: RPS Server unavailable Tag: 84833
  - 23
    - Images never paste in document as "inline" Hi, Word2003. Tools.Options.Edit.PastePicturesAs - Inline with text. I am trying to paste an image from the clipboard into a Word Document via VBA. I have the setting set correctly under tools. It never pastes as inline. After pasting, I always have to explicitly convert to inline shape. Also, because it doesn't paste inline, if I am trying to set the image into a table cell, the convert to inline shape sets the image in the correct row, but always column 1, not column 2. Any ideas of why I cannot paste inline? Two code snippets below. I am running the code from Excel - trying to generate Word reports out of Excel, hence the "wrdapp", "wrddoc", "wrdrange" references: 'Try to paste into row1, col2 wrdDoc.Tables(1).Cell(Row:=1, Column:=2).Range.Select With wrdApp.Selection .InsertAfter "hello" 'make sure selection is in the right column .PasteSpecial Placement:=wdInLine 'still doesn't work End With wrdDoc.Shapes(1).ConvertToInlineShape 'have to convert to inline, placed r1c1 'try to paste into row2, col2 wrdDoc.Tables(1).Cell(Row:=2, Column:=2).Range.Select wrdApp.Selection.PasteSpecial Placement:=wdInLine 'still doesn't work wrdDoc.Shapes(1).ConvertToInlineShape 'try to paste into 1st para Set wrdrange = wrdDoc.Paragraphs.First.Range With wrdDoc.Paragraphs(1).Range .InsertAfter strEvent .Paste 'doesn't paste inline even though default set End With wrdDoc.Shapes(1).ConvertToInlineShape The really strange part is even if i just open a new document, and select paste, the image is not pasted inline. What am I missing? Thanks for your help Tag: RPS Server unavailable Tag: 84830
  - 24
    - Is there a better way? I am trying to develop a routine that will present user with a list of items which the user can select (1 or more up to about 20). Once the user makes their selection the items will be insert as bullet-ed items into the document. At this stage my most promising idea is to put the items on a userform in textboxes with a check box beside each textbox. if the user checks the checkbox that item will be added to an array. When the user clicks a command button the contents of the array could be inserted into the document. I am wondering if there might be a better (simpler) way to accomplish this. Perhaps grabbing the items from excel table or a access table? any thoughts or suggestions would be appreciated. Thank you in advance BRC Tag: RPS Server unavailable Tag: 84828
  - 25
    - Field FILENAME update I need the FILENAME field to update automatically when a document is opened (not just when the document is printed) Microsoft declare that they have stopped this happening to improve the speed of opening a document. I have also experimented with Autotext fields with no luck. MS also tell me that the workaround is to write a VBA module (something like activedocument.fields(1).update) which updates the field. This I understand. Overall, I have written a procedure (called UpdateDoc) to help an operator update over a 1000 docs. This procedure embeds the FILENAME field and it would now seem that I also need to add a Document_Open() procedure to the ThisDocument module. Again I have no problem with this. BUT How do I append the Document_Open() procedure AS A PART OF THE OVERALL UpdateDoc PROCEDURE? Thanks for your interest Neil Tag: RPS Server unavailable Tag: 84824
- Next
  - 1
    - what is write protection in a floppy and how do i take it out pleaz help Tag: RPS Server unavailable Tag: 84822
  - 2
    - Save As won't work I am unable to take a saved document and save it as a new document with another name. Everytime I try the program does not respond. Tag: RPS Server unavailable Tag: 84817
  - 3
    - Macro to detect Header text in Section 3 of document I need a routine to determine the presence of text in the various "stories" in my document. If text is present, I work on the text. If no text is present, I can skip processing in the story. In particular (and where the below routine seems to fall apart), I want to see if a header contains text. The below works fine if there is header text in Section 1 of the document, but if there is no header text in sections 1 and 2, but there is header text section 3, the routine won't find it. (The MakeHFValid routine is used, although not reprinted, to overcome the problem when a story is blank. Does this code make sense to anyone, and if so, can you tell me why header text in section3 does not return 'positive'? (No even/odd page headers; no firstpage headers, etc. Just plain stuff) Thanks. Ed For Each osection In ActiveDocument.Sections For Each astory In ActiveDocument.StoryRanges MakeHFValid aval = astory.Text atype = astory.StoryType If Len(aval) = 1 Then aval = Asc(aval) End If If astory.StoryType = wdFootnotesStory Then If InStr(InStory, "FNotes") = 0 And aval <> 13 Then InStory= InStory+ "FNotes" ' the "If Instr(InStory,"FNotes") = 0" is just to prevent a second entry of the same thing. ElseIf astory.StoryType = wdEndnotesStory Then If InStr(InStory, "ENotes") = 0 And aval <> 13 Then InStory= InStory+ "ENotes" ElseIf astory.StoryType = wdCommentsStory Then If InStr(InStory, "Comments") = 0 And aval <> 13 Then InStory= InStory+ "Comments" ElseIf astory.StoryType = wdTextFrameStory Then If InStr(InStory, "TextBox") = 0 And aval <> 13 Then InStory= InStory+ "TextBox" ElseIf astory.StoryType = wdEvenPagesHeaderStory Then If InStr(InStory, "EPHead") = 0 And aval <> 13 Then InStory= InStory+ "EPHead" ElseIf astory.StoryType = wdPrimaryHeaderStory Then If InStr(InStory, "Header") = 0 And aval <> 13 Then InStory= InStory+ "Header" ElseIf astory.StoryType = wdEvenPagesFooterStory Then If InStr(InStory, "EPFoot") = 0 And aval <> 13 Then InStory= InStory+ "EPFoot" ElseIf astory.StoryType = wdPrimaryFooterStory Then If InStr(InStory, "Footer") = 0 And aval <> 13 Then InStory= InStory+ "Footer" ElseIf astory.StoryType = wdFirstPageFooterStory Then If InStr(InStory, "FPFoot") = 0 And aval <> 13 Then InStory= InStory+ "FPFoot" ElseIf astory.StoryType = wdFirstPageHeaderStory Then If InStr(InStory, "FPHead") = 0 And aval <> 13 Then InStory= InStory+ "FPHead" End If Next aStory If ActiveWindow.View.SplitSpecial = wdPaneNone Then ActiveWindow.ActivePane.View.Type = wdPrintView Else ActiveWindow.View.Type = wdPrintView End If Next oSection Tag: RPS Server unavailable Tag: 84815
  - 4
    - help with 2 or more lines in text box I want to use a userform to collect data from user for insertion in word document, the first text box should collect the name and address for insertion at top of a letter as an address block. i have set the multiline property to true but how do i enter returns in the text. if i press return it moves focus to next text box. please help Tag: RPS Server unavailable Tag: 84814
  - 5
    - Delete character and prior letter Hello all. I have one of those keylogger programs that records emails being sent. The problem is it records every keystroke, backspace being a keystroke. A backspace is recorded as [backspace]. So I took the file and did an edit/replace to remove backspace], leaving the front [. So conceptually, I was hoping for something that would start at the beginning, find each [ and delete it AND the letter immediately prior to that. So basically it would delete the backspace keystroke, and remove the character deleted by the backspace keystroke. Is this possible? Thanks in advance!! Tag: RPS Server unavailable Tag: 84808
  - 6
    - Word VBA Help I need to write a utility (in .net) that will iterate though a word document and extract words with bold formatting. These will go into a database. No problem except I'm not sure about writing the VBA to find bold words in a document. Has anyone done this before? Could you post some sample code? Thanks in advance. Tag: RPS Server unavailable Tag: 84786
  - 7
    - word colors How do I add the below??? I opened a new word doc, went to tools - visuall basic editor. Then added the following to module1: ThisDocument.Colors(1) = RGB(100, 200, 200) ThisDocument.Colors(2) = RGB(100, 200, 200) ThisDocument.Colors(55) = RGB(100, 200, 200) ThisDocument.Colors(56) = RGB(100, 200, 200) basically, what I am trying to do is change collors to custom collors every time the document opens. To eliminate the document reverting to standard colors or custom set on that machine. Thanks, Sam Tag: RPS Server unavailable Tag: 84775
  - 8
    - table of contents How can you regenerate a complete table of content using code? I have a form in the first page of my document and I dont want the entire doc to be updated. In the second page, I have a table of contents and I want to create a button who will regenerate the table with all the new points add in the document. I've try something like that: Me.Protect (wdNoProtection) Selection.WholeStory Selection.Fields.UpdateSource Me.Protect (wdAllowOnlyFormFields) but first, the first line doesnt work because of the current protection and doesnt want to remove it. And second point, I select the whole document and I just want to select all but the first page. Can you help me please!!!! Thanks Tag: RPS Server unavailable Tag: 84774
  - 9
    - Drop down formfield limitation of 25 items in the list Running WORD 2002. I want to use a dropdown list for a date, but the days field would need to have 31 items. Can I increase the limitation on the number of items in a dropdown list? Thanks, Phil Tag: RPS Server unavailable Tag: 84773
  - 10
    - Drop-Down list I have a program that pulls up the cross-references for any existing figures in a dropdown box. This program has not problem showing the figures if there are 1 to 8 figures; however, if there are more than eight figures in the document, you don't see them listed. Please let me know why you think this is happening. Thanks, Here is the code: Private Sub UserForm_Initialize() Dim varXRefs As Variant Dim Index As Integer Selection.Fields.Update ' Clear out any previous contents Me.cboFigureNumber.Clear ' Load just the figures into varXRefs varXRefs = ActiveDocument.GetCrossReferenceItems _ (ReferenceType:="Figure") ' Load the ListBox from varXRefs as an array For Index = 1 To UBound(varXRefs) Me.cboFigureNumber.AddItem varXRefs(Index) Next Index ' Test whether the list has any entries and ' set command buttons accordingly If Me.cboFigureNumber.ListCount > 0 Then Me.cboFigureNumber.ListIndex = 0 Me.cmdInsert.Enabled = True Else MsgBox ("There are no figures to cross-reference.") ReferenceFigure.Hide End If End Sub -- Debra Ann Tag: RPS Server unavailable Tag: 84771
  - 11
    - How to see macros in Word document without opening this document? How to see a macro code in specific Word document without opening this document? Tag: RPS Server unavailable Tag: 84762
  - 12
    - Inserting and sizing a photo with code. win2k, word 2k I am working on a template for a report. In the report we include a different photo in each report. I would like to be able to run a routine that would display the "insertpicture" dialog, and size the user's selection and insert it at a specific place in the document. I am assuming i could use a bookmark to specify where to insert. I am wondering if I should use some kind of place holder in the template to make certain that inserting the pic doesn't disturb the formating in other sections of the report. I have found several discussions about inserting pics but not how to set the size at time of insertion. thanks for any direction on this. BRC Tag: RPS Server unavailable Tag: 84760
  - 13
    - Checking upon saving fo text highlighting I need to check upon saving for the presence of any highlighting in the document. Any help would be welcome. Thanks -- John Doue Tag: RPS Server unavailable Tag: 84758
  - 14
    - Closing Excel XP SR2 / Word (Office) 2003 I have created a form in Word that calls Excel, retrieves some data, and closes Excel. Well, actually, I guess I don't close Excel and that is my problem. The code I am using to open Excel is Set filename = GetObject(, "Excel.Application") Set filename = ("C:\Microsoft Office\Templates") Closing Excel is attempted with filename.Quit SaveChanges:=DoNotSaveChanges Works OK, I get no errors and Excel disappears from the list of Applications/Processes in Task Manager. However, when I shut down my PC, I get a popup asking if I want to close filename.exe. How do I close Excel so I no longer get the popup? Tag: RPS Server unavailable Tag: 84757
  - 15
    - Opening recorded macro's on a different pc Hello, I'm making some kind of a template where a user can add certain text files into the word document. It's the first time that I work with macros and I managed to get the list of recorded macros in the word taskbar. When somebody downloads the template from the server on another computer and tries to run one of the macros the system can't find the text files, although I've grouped them in the same folder as the 'template'... Sometimes it works and sometimes it doesn't... Can somebody help me with this please? (When I run a test I always set security to 'medium' on the other pc so that's not the problem...) thx! Tag: RPS Server unavailable Tag: 84744
  - 16
    - Extending Word Model Object I'm writing quite a complex application in Word. I've a lot of code that I would like to keep clear. I thougth several time of using custom classes, but I don't know if I can achieve what I have in mind. For instance in a Word Document based on MyTemplate.dot I have a Table "ActiveDocument.Tables(1)" and each Row in the table is not just a row but has a lot of special data and code for manipulate it (for instance in the first cell of each row there is some hidden text to identify the row, etc.). I would like to extend the standard Word Model Object and create my own objects wrapping the existing one in Word. For instance, having a new table or new row object that acts as the standard one + same new properties and methods. If I'll create a new object MyRow, how I can tell Word to use MyRow in the normal Table object instead of the normal Row? Do you have any suggestions? All the example I found is about new control object none on extension of build-in Word objects. Thanks, Lauro Tag: RPS Server unavailable Tag: 84737
  - 17
    - How to display a form Using Win2k, Word 2k I have a form i am try to display at a certain point in a document. I thought a simple macro with Sub show_frm () Myform.show end sub would cause the form to open, however i am getting an "object required" object required error message. this same method works in other templates i have. can anyone help Thanks BRC Tag: RPS Server unavailable Tag: 84733
  - 18
    - Bypassing Document_Open code Hi, I have a document that when opened presents a userform and then runs code on pressing the 'OKAY' button. What I would like is to amend my code so that the the 2nd time (and subsequent times) the document is opened, the Document_Open code does not run? Is this possible? Thanks. Tag: RPS Server unavailable Tag: 84727
  - 19
    - Spell check Can I print out a list of words in my spell check? Tag: RPS Server unavailable Tag: 84725
  - 20
    - I don't like the new "Open" menu that was updated in Word. I have recently received a number of updates, one of which has affect my "open" menu screen in Word. There is no longer the selection of choices of ways to handle the folders and documents in Word on the left sidebar of the menu. I found the old menu page very helpful, the new menu page is a hindrance. I would appreciate it if the old setup of the "Open" menu page could be restored. In addition, it would be very nice if, when you log off the computer and are told there are updates waiting, that a list of updates and a brief description of each be made available to the user first, with the option to accept or decline, before the update is installed. If this had been the case, I may not have the problem that I am currently presenting here. Automatically installing these updates, as the system currently does, leaves me frustrated with unknown changes nearly every time I log back onto my computer - this is not much appreciated. I really like the product in general, but I would like to be the one to control what I use and how I use it. Thank you in advance for your consideration and correction of this problem. ---------------- 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=fd0d6d2d-496b-4181-a25d-6e4e3bdc5578&dg=microsoft.public.word.vba.general Tag: RPS Server unavailable Tag: 84723
  - 21
    - giving user list of items then insert selected item as bullet points Using office 2k and win2k I have a situation where we write several reports on premises. Often, many to the bullet point items we list reoccur. I would like to present the report writer with a list of items from which he/she could select (checkbox type selection.). When finished the items would be inserted in the form of bullet points. Has anyone done anything like this in past? I have done a fair amount of vb programing in the past but not for awhile. Tag: RPS Server unavailable Tag: 84716
  - 22
    - Show filename part without extension Good'ay I am working with an organisation that names their word docs something like... Fred Bloggs.Q10 I can use the field FILENAME to show the filename in the document but I want to show just the filename part (Fred Bloggs) in one place and the extenstion (10) in another. Eg In the document ... Name: Fred Bloggs {extracted from the filename} Question: 10 (extracted from the extension} Thanks for your interest ... Neil Tag: RPS Server unavailable Tag: 84714
  - 23
    - Any way to have a messagebox pop up whenever a new page is started? Thanks in advance if anyone knows how to do it. Tag: RPS Server unavailable Tag: 84707
  - 24
    - How to add a bookmark to an existing formfield using a macro/proce I'd like to run a macro to check for formfields that do not have a bookmark defined and insert a bookmark. When I run the following code, I get an error -2147467259, description = "automation error unspecified". Can someone show me how to fix the code? TIA, Phil i = 1 ActiveDocument.FormFields(i).Select Do Until i > ActiveDocument.FormFields.Count If Selection.FormFields(1).Name = "" Then Selection.FormFields(1).Name = ffxname <==== ERROR here ... If i < ActiveDocument.FormFields.Count Then ActiveDocument.FormFields(i).Next.Select End If i = i + 1 Loop Tag: RPS Server unavailable Tag: 84704
  - 25
    - I'd like to make a macro that replaces the current header and foot Good Day, I'd like to make a macro that deletes the current header and footer on a word document (if there is one) and then pastes in the header and footer that I already have created. Could someone show me an example of code that would do this and then i can plug in what i want to be pasted into the header and footer? Many Thanks, RP Tag: RPS Server unavailable Tag: 84690

Hi All,

i am trying to add a document using the Microsoft.Office.Interop.Word.dll,
some times it throws the following error

"The RPC Server is Unavailable". can any one help me out why this error
comes. i have spent a lot of time on this. it would be great helpful.

Thanks

--
ravib

Top

Re: RPS Server unavailable by Jay

Jay
Wed Apr 26 21:02:45 CDT 2006

Hi Ravi,

The acronym RPC stands for "remote procedure call". The error you
quoted is very general. It can occur any time one program makes a
cross-process call to another program, and the called program doesn't
respond.

Entering the exact text of the error message plus the terms "interop"
and "office" into Google returned 140 references. Some of them may be
helpful.

--
Regards,
Jay Freedman
Microsoft Word MVP FAQ: http://word.mvps.org
Email cannot be acknowledged; please post all follow-ups to the
newsgroup so all may benefit.

On Wed, 26 Apr 2006 08:47:04 -0700, Ravi
<Ravi@discussions.microsoft.com> wrote:

>Hi All,
>
>i am trying to add a document using the Microsoft.Office.Interop.Word.dll,
>some times it throws the following error
>
>"The RPC Server is Unavailable". can any one help me out why this error
>comes. i have spent a lot of time on this. it would be great helpful.
>
>Thanks

Top