Help! Word crashes when I try to view my vba code

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - Insert file at variable position in document I need to insert a word doc at a dynamically discovered position within another word doc at runtime. I'm using VB.NET to try to do this. In the base doc, I've got a bookmark that shows where these inserted files should start. I want to set my cursor one space after the end of the bookmark and insert another file at that point, but I'm having problems. I've tried lots of different ways to do this; some of them are listed below: 'get the character position at the end of the bookmark intStart = WordDoc.Bookmarks.Item(strBookmark).End WordDoc.Range.SetRange(intStart, intStart + 1) WordDoc.Range.Select() WordDoc.Range.InsertFile "D:\Topeka\Output\BESubreportTest. doc") or WordDoc.Characters.Item(intStart + 1).Select() WordDoc.Application.Selection.InsertFile ("D:\Topeka\Output\BESubreportTest.doc") Neither seems to work. In fact the first one selects the entire document as the range so that when I run the insert, it replaces the document with the inserted file. Any ideas? Tag: Help! Word crashes when I try to view my vba code Tag: 36602
  - 2
    - Passworded Word Doc. Does anyone know how to recover a word doc with a password? The person that created the doc is no longer with us and we are unable to figure out there password. If anyone has any ideas, it would be greatly appreciated. Chris Tag: Help! Word crashes when I try to view my vba code Tag: 36600
  - 3
    - Using text from field codes Is it possible to convert field codes in a Word document into text that can be handled normally? The field codes appear like: {INCLUDETEXT "Main_Files/Test_Program_Results.htm" \* MERGEFORMAT } I would like to be able to use the filename, shown between the " symbols, by creating a macro to copy it and then paste it where required, but the brackets at the end which define the field will not allow this to be carried out. As soon as they are selected the whole field becomes a selection. Thanks in advance. Dawn Tag: Help! Word crashes when I try to view my vba code Tag: 36591
  - 4
    - run-time error '4608' value out of range I have recorded a macro in Word 2002 that selects paper trays for first and subsequent pages using the default printer. The recorded macro is as follows: With ActiveDocument.PageSetup .FirstPageTray = 257 .OtherPagesTray = 256 End With When I then run that recorded macro on the same PC, same Word 2002, same printer/printer driver and I get a run- time error '4608' value out of range. Any advice would be appreciated. Thank you. Tag: Help! Word crashes when I try to view my vba code Tag: 36586
  - 5
    - Rotated Logo I think this one's a lost cause, but thought I might as well ask anyway. I have a client moving from Word 97/Windows 98 to Word 2002/WindowsXP. We've discovered that their logo appears upside down in the new environment! I can fix this for new documents, but existing docs are a problem - especially as some of their users are still on Word 97 so the problem doesn't become apparent until the document is sent to a client using Word 2002. I'd like to write some code that would search the document for a logo and replace it with a corrected version - but I can't be sure it's a logo I've located and not some other graphic. Does anyone have any suggestions? Thanks, Valerie Tag: Help! Word crashes when I try to view my vba code Tag: 36577
  - 6
    - mailmerge.datasource.connectstring I have Word Mail Merge docs connected to various Access DB Queries. Have a sub that is called every time a word doc is opened that is meant to message box the documents mail merge datasource. This function is called by the Document_Open Sub. Public Sub InsertDBSource() Dim DBSource as String DBSource=ActiveDocument.MailMerge.DataSource.ConnectString MsgBox DBSource End Sub I get an error message saying buffer for return string is too small (refering to the DBSource assignment) This code works for all my documents created using older versions of word and access. we have recently migrated to Office XP and any new mail merge documents i create and link to queries generate the same error message. Any ideas on what could be the problem would be great. Thanks Tag: Help! Word crashes when I try to view my vba code Tag: 36576
  - 7
    - activating a different document This is a pretty basic question, but I can't seem to find the answer on the Internet. I have two documents open and I want to be able to activate them through a macro embedded in one of the files. The name of the other file is always different. What is the command for activating the other open document? Thanks in advance! Amy Tag: Help! Word crashes when I try to view my vba code Tag: 36571
  - 8
    - Exporting Access data into Word FormField Error Access doesn't seem to allow me to export a Memo data field from Access into a Word FormField when the corresponding memo type field in Access is over a certain length. I get a "4690String too long" error message. The corresponding FormField in Word is designated as "Regular Text" and set to Unlimited in size.. I am exporting the data from the Access memo field, into the word formfield by using the following line: .FormFields("DescriptionLead").Result = Nz(Me! DescriptionOperations) Thanks for any help. Tag: Help! Word crashes when I try to view my vba code Tag: 36552
  - 9
    - Changing Shading Fill in Tables Througout Document I'm trying to make a macro to change any case of shading that is 5% to 10% in all the tables in one big-big document. thanks, Chris Tag: Help! Word crashes when I try to view my vba code Tag: 36550
  - 10
    - Override file dialog Is it possible to override the file save and open dialogs in Word from VBA? Tag: Help! Word crashes when I try to view my vba code Tag: 36549
  - 11
    - Help I am using Word 2000. In Word's Visual basic help, I am not getting the little graphic squares on the top of different help pages that take you to Examples, etc. I am just getting a single line box in place of them that does nothing. I tried uninstalling and then reinstalling. It did work once. I don't know what happened. thanks. Tag: Help! Word crashes when I try to view my vba code Tag: 36546
  - 12
    - Running macro from template, not the document I have a templated with a form in which open when I create a new document, then it has a OK button and the form will be hiding. I also has a macro assigned to the menu which will show the form again but when I create a new document based on the template, press the OK button and then want to show the form again, it initialize the form again. If I look att the macro I can run in the new document, I can run 2 different macros from both Template and project but when I create the menu in template I can only choose of cause, the one from the template. Hope anyone understand my problem. Tag: Help! Word crashes when I try to view my vba code Tag: 36531
  - 13
    - Number og pages in a word document Hi threre. Can somebody help me with this. I have a document based on a template. The template are 6 pages long, but the word documents contains characters only on page 1-2-3. When the user prints the document, the print always take all 6 pages (waste og paper!!). Is there a way to find out that the last character is on page 3, and then print only page 1,2 and 3?? Tag: Help! Word crashes when I try to view my vba code Tag: 36526
  - 14
    - Set paper source when printing from VBA? I use a HP Laserjet 4050 Is it possible to select the source of the paper when printing via VBA? It has Tray 1, Tray 2 and Manual feed. I'd like to be able to automate printing a document using VBA, where that document uses different coloured paper. I had a look at the HP site, but failed to find anything relevant. Tag: Help! Word crashes when I try to view my vba code Tag: 36523
  - 15
    - Randomize Hi, How do I randomize letters? / Ulf Tag: Help! Word crashes when I try to view my vba code Tag: 36520
  - 16
    - Word-2002 crashes with this FilesSave routine Hi All, In my complex WORD-2002 add-in (loaded with the command-line /L-switch) I call a FileSave routine. Main-function: if the document is a temporary one (extension *.TMP), close it, copy it to <same name>.doc and open the *.doc file afterwards. The form that pops up is just for user-information This routine does exactly what I intended, but everytime it is executed, WORD crashes and the famous WORD recovery screen pops up , (starting with "Microsoft Word has encountered a problem and needs to close. We are sorry for the inconvenience." I already tried to avoid timing/buffering problems by adding extra lines like DoEvents and Application.ScreenRefresh (marked with --> in the code below). This did not help. Why does WORD 2002 crash after such a simple routine? Best regards, Hans Troost Public Sub FileSave(Optional ByVal blnReOpen As Boolean = False) ' ' FileSave Macro: intercepts the regular word SAVE command ' Saves the active document or template ' Dim strDocFullName As String Dim strDocName As String Dim strExpID As String strDocFullName = ActiveDocument.FullName strDocName = ActiveDocument.Name If blnReOpen Then With frmTMP2Doc .lblInfo.Caption = "First time saving of experiment " & Left(strDocName, 9) _ & vbNewLine & vbNewLine _ & "The document will be closed and re-opened" .Show End With --> Call Application.ScreenRefresh --> DoEvents End If ActiveDocument.Save If IsHellasDoc(ActiveDocument) And Right(strDocName, 4) = ".TMP" Then ActiveDocument.Close --> DoEvents --> Call Application.ScreenRefresh --> DoEvents Call MyFileCopy(strDocFullName, gcolSettings(gcstrWorkDir) & Left(strDocName, 9) & ".doc") Call Kill(strDocFullName) Call SetExpId ' increase the LastExp field in table HELLAS_USERS in the database If blnReOpen Then Call DoOpenExp(Left(strDocName, 9) & ".doc", gcolSettings(gcstrWorkDir)) --> Call Application.ScreenRefresh --> DoEvents Unload frmTMP2Doc --> Call Application.ScreenRefresh --> DoEvents End If End If --> DoEvents End Sub Tag: Help! Word crashes when I try to view my vba code Tag: 36508
  - 17
    - Document_Open doesn't work!!! Hi! When I'm opening a Word document from a website (in Internet Explorer) I've developed, the Sub function Document_Open() doesn't work. I've also tried AutoOpen, but it doesn't work either. I believe it is nothing wrong with the macro itself, since it does work when I "manually" start it (tools/macro..). However, if I let Internet Explorer open the Word document inside a browser window, the Sub function Document_Open() does work as it should... This is how I want it to be: when the user click the link on the website I want MS Word to open the document and the macros to run... (not open word inside a browser) What am I doing wrong?? Is this a security setting problem in Internet Explorer?? Why does the macro work when word opens in Internet Explorer and not when Word opens directly??? Please advise! /NG Tag: Help! Word crashes when I try to view my vba code Tag: 36507
  - 18
    - ComputeStatistics not working on a selection I'm wondering if I can get any further help on this. Martinique tried bravely to help but we ran into a wall. According to VBA help in Word 97, this code should count the number of words in the range, which in this case is the selection. My test code below follows the sample presented in help. Yet, as I discussed with martinique, the resuling number is only occasionally correct. Most of the time it's much lower (sometimes higher) than the correct number. I tried it on another computer, and it wouldn't work there either. Meanwhile, Martinique tried it over and over, and it was always correct. Since I'm following the Help sample so closely, I can't see what I'm doing wrong. Does anyone have any ideas of why this is not working? Dim r As Range Set r = Selection.Range WordCount = r.ComputeStatistics(Statistic:=wdStatisticWords) MsgBox "Words in selection: " & WordCount, vbOKOnly, "Word Counter" Tag: Help! Word crashes when I try to view my vba code Tag: 36503
  - 19
    - MailMergeDataSourceConnectString WordXP I have a Mail Merge Word Document connected to an Access DB Query. (Office XP) Am trying to get a listing of the full path of the Mail Merge document's data source. This is usually the connectstring. However this is not working for new documents I have created in Office XP. I am getting a buffer too small for return string error message error code 9121. thanks Tag: Help! Word crashes when I try to view my vba code Tag: 36502
  - 20
    - Accessing values form Excel Cells Hi I want to write a macro that gets information from a specific Excel sheet from certain cells, and from names within the excel document. ie. From document ("C:\price\price.xls"), sheet "PTable", Cell "F14" into a variable in a VB script. And also form name "car". I then want to place this information in a word document, with text relating to the values from the Excel sheet. ie. If value>10 then typetext "To expensive" else typetext "ok" end if Can someone tell me how to get the variables out of the excel document. Thanks in advance Simon Tag: Help! Word crashes when I try to view my vba code Tag: 36501
  - 21
    - Word start-up Why does a letter which I entered months ago, come up as the new document every time I open WORD? How did that happen and how can I get rid of it? Thanks! Tag: Help! Word crashes when I try to view my vba code Tag: 36486
  - 22
    - Cutting and Pasting Tables I want to move all of the tables in a document to the end of that document. I have some code that will do it, but I don't know how to keep it from looping. For Each aTable In ActiveDocument.Tables Set rng = aTable.Range rng.Select Selection.Tables(1).Select Selection.Cut Selection.EndKey Unit:=wdStory Selection.Paste Next 'aTable Can someone help? Thanks. Jerry Tag: Help! Word crashes when I try to view my vba code Tag: 36479
  - 23
    - Word 2002: What can take backgroundpatterncolor? All/Any: Help! This is making me crazy… I've got text above a table and text below it. I manually highlight (selecting, then using the "Shading Color" button) the text and the table. Instead of the table cells filling with color, the text takes the background color. I then search for any occurrence of BackgroundPatternColor in: + selection.range + selection.formattedtext + selection.paragraphs None of these seem to be it. What am I missing? Or is this a bug somewhere? (search code below) Thanks! -Jon code: Sub amItable() With Selection .HomeKey unit:=wdStory With .Find .ClearFormatting .Replacement.ClearFormatting .Format = False .Text = "" .Replacement.Text = "" .Highlight = False While .Execute(replace:=wdReplaceNone) If Selection.Information(wdWithInTable) = True Then MsgBox "I'm in a table!" If Selection.Cells(1).Shading.BackgroundPatternColor <> _ wdColorAutomatic Then MsgBox "I'm shaded in a table" ElseIf Selection.Characters(1).Shading.BackgroundPatternColor <> _ wdColorAutomatic Then MsgBox "I'm a shaded character in a table!" ElseIf Selection.Paragraphs(1).Shading.BackgroundPatternColor <> _ wdColorAutomatic Then MsgBox "I'm a shaded paragraph in a table!" ElseIf Selection.Range.Shading.BackgroundPatternColor <> _ wdColorAutomatic Then MsgBox "I'm a shaded range in a table!" ElseIf Selection.Rows(1).Shading.BackgroundPatternColor <> _ wdColorAutomatic Then MsgBox "I'm a shaded row in a table!" ElseIf Selection.Shading.BackgroundPatternColor <> _ wdColorAutomatic Then MsgBox "I'm a selection shading in a table" End If End If Wend End With End With Tag: Help! Word crashes when I try to view my vba code Tag: 36477
  - 24
    - importing csv data into Word I would like to create a Word document from a csv file. Does anyone know how to do this? Thank you. Doreen Tag: Help! Word crashes when I try to view my vba code Tag: 36473
  - 25
    - Word to HTML conversion - Tools/Code I know there are a few tools out there to convert Word documents to HTML, but I was wondering if there's an acknowleged "market leader"? Also, is anyone offering source code for such a tool, and is it any good? [ Obviously a large part of this "market" is taken by Word's own save-as-HTML capabilities, but there's always stuff that Word itself won't do - or won't do in a sufficiently controllable way. ] Tag: Help! Word crashes when I try to view my vba code Tag: 36470
- Next
  - 1
    - wdDialogFileOpen question Hey everybody! As a person relatively new to VBA programming, this newsgroup has been tremendously helpful. A thank you to everyone who takes the time out of their day to answer questions! That being said, here's another one: I'm trying to build into a custom form a command box that would allow the user to select a file from their directories, then have that info including the full path be filled in to the dialog box. Perhaps code will further explain: Private Sub btnBrowse_Click() With Dialogs(wdDialogFileOpen) .Display frmDataSelect.txtSource = .Name End With End Sub "frmDataSelect" would be the custom form and "txtSource" the text box where the filename is returned. This code only gives the filename without the path present. Is there a way I can have the entire file path returned? -Dave Tag: Help! Word crashes when I try to view my vba code Tag: 36466
  - 2
    - Mail Merge Prob Hi Folks, I'm using a mail merge form an access database using a simple query to bring in table data (Medium Time in AM PM format) into a word document. All works well but I've set up the database for Medium times AM PM format but when the time is merged with word it shows the time as 24HR Long time e.g. "15:00:00" instead of the desired "3:30 PM" There is no VB code behind the document and there is no formatting code in the databse other than the table design preset. Any Suggestions?? Cheers John Tag: Help! Word crashes when I try to view my vba code Tag: 36464
  - 3
    - Reading paragraphs and tables in word I have a word document consisting of paragraphs ans tables which I want to read through vb.net. I also want to identify when I am reading paragraphs and when reading tables so that I can perform different actions with paragraphs and table contents. I will be thankful to anyone who can help in this regard. Thanks. Tag: Help! Word crashes when I try to view my vba code Tag: 36460
  - 4
    - Centering text Recently when centering text it centers the entire document, not just the line I designated to center text on. I have to click on the undo button to restore the rest of the document to what it was prior to my selection to center a line of text. Somehow I did something to cause this because it never worked like that before. Also, I have notice that at times when I do a ctrl B to highlight text it does the same thing, highlights all of the text in the document and when I click on undo the rest of the document is restored to its original unhighlighted appearance. I run Word 2000. Thanks for your help, Dean Tag: Help! Word crashes when I try to view my vba code Tag: 36455
  - 5
    - Templates, saving, directory Okay, couple of "simple"?? questions here! I have created a template - every time I create a document using this template it gives me a message about the "normal" template being in use, or changes having been made - I'm guessing this has something to do with the way in which my seperate, other, template was created - how do I correct this? Also, anytime a user uses this template, I would like the document to be saved in a specific document - is that something I can "build" into the template?? Or, how could I code that in using VB. And the last question, I would like to create a default for the file name to reference a bookmark that I have created. I had some code (based in Access) which was doing this, but that created more problems. This again will always be the case on any document created with this same template - any way to build all of this in the template - or a macro which is executed upon use of this template?? I haven't used VBA within word before and am actually very new to VB anyway - so please forgive my ignorance! In case it makes a difference - the document is being generated by automation from Access. THANKS! Tag: Help! Word crashes when I try to view my vba code Tag: 36443
  - 6
    - Removal of Password Protection hi I have written a VB program which converts the doc file into a txt file.It does it silently. i mean the Visible property of the word application object is set to false. The DisplayAlerts property is also set to false. The Problem : If a doc file is password protect (modify or Open)a dialog box pops up and waits for password i do not want this password to pop up ? how do i convert? is there a way in which i can do it silently ? if not i want this dialog boxes to come to front of all other applications. regards maneesh Tag: Help! Word crashes when I try to view my vba code Tag: 36442
  - 7
    - VBA and bookmark in a textbox in header/footer I have a template for 20 different localoffice. The user=20 choose in a form which office they belong and then click=20 OK and it will be correct inserted in the pagehader. I=20 have all officeaddress as autotext, the code choose=20 correct address and put it in the textbox with this code: ActiveDocument.Bookmarks("dn_Adress").Select SaveSetting "DN", "Configuration", "DefaultAdress",=20 Me.CombAdresser.Text Select Case Me.CombAdresser.Text Case "Falun" '/Falun ActiveDocument.AttachedTemplate.AutoTextEntries ("dn_Adr_Falun").Insert Selection.Range, True Case "G=E4vle" '/G=E4vle ActiveDocument.AttachedTemplate.AutoTextEntries ("dn_Adr_G=E4vle").Insert Selection.Range, True. The bookmark is placed in pageheader in a textbox. My very big problem is that I must reload the userform to=20 let the user change the address and when I do that will=20 the new officeaddress appear after the first one, I need=20 help how I can select and replace the text with the new=20 address. Can anyone help me with this? Thanks for any help Camilla Tag: Help! Word crashes when I try to view my vba code Tag: 36433
  - 8
    - Auto open macro I would like to have a macro run when I open a Word document. In Excel you just need to name the macro Auto_Open. What do I need to do in Word? Any help would be appreciated. Jim Tag: Help! Word crashes when I try to view my vba code Tag: 36430
  - 9
    - Macro question I am trying to record a macro that will display a letterhead with a particular font, size, etc. When I record the macro: 1. I change the font, font size, and turn Bold on. 2. I type what I want my letterhead to display. 3. I enter a couple blank lines. 4. I stop recording. When I run this macro on a new document, the only attribute that carries over is the bold. I thought Word recorded all mouse clicks in the toolbar. I don't want users to manually enter the font and font size in the VB code every time one of them wants to create a macro like this. Is there any way to solve this problem? Thanks. Derek Jones Software Support Specialist Shenandoah University Tag: Help! Word crashes when I try to view my vba code Tag: 36429
  - 10
    - information property I'm trying to get the total pages in a document but the procedure doesn't always give me the right number. Though I have noticed that if I step through the code manually it works! Any knowledger regarding this? Thank you very much, Edward ps. you may email me if you know something Tag: Help! Word crashes when I try to view my vba code Tag: 36428
  - 11
    - FormFields in a table Strange bookmark naming problems I am working with Word 2002. I have a table (2 columns wide), that has two empty FormFields. When a user enters information in one of the form fields, an exit macro is run, and a new row in the table is created with new empty FormFields. This all works fine. The problem is that I want Word to give the newly created FormFields a bookmark name of my choice. In this 2 column table, two FormFields are created when the exit macro is run, but only the FormField on the left column has the bookmark applied to it. The bookmark for the FormField in the right column remains blank. HOWEVER, if I try to name the bookmark in the right column first, and then the one in the left column second (see code below), both than have their bookmarks names applied. The only difference is the order in the code. For ex. =============================================== Sub addrow() Dim rownum As Integer ActiveDocument.Unprotect ActiveDocument.Tables(5).Rows.Add rownum = ActiveDocument.Tables(5).Rows.Count ActiveDocument.FormFields.Add Range:=ActiveDocument.Tables (5).Cell(rownum, 2).Range, Type:=wdFieldFormTextInput 'BOOKMARK BEING APPLIED ActiveDocument.Tables(5).Cell(rownum, 2).Range.FormFields (1).Name = "ForeignEmployees" & rownum ActiveDocument.FormFields.Add Range:=ActiveDocument.Tables (5).Cell(rownum, 1).Range, Type:=wdFieldFormTextInput ' BOOKMARK BEING APPLIED ActiveDocument.Tables(5).Cell(rownum, 1).Range.FormFields (1).Name = "ForeignCountries" & rownum ActiveDocument.Tables(5).Cell(rownum, 1).Range.FormFields (1).ExitMacro = "addrow" ActiveDocument.Tables(5).Cell(rownum, 1).Range.FormFields (1).Select ActiveDocument.Protect Type:=wdAllowOnlyFormFields, NoReset:=True End Sub =========================================== The above code works, however if I switch order in which the FormFields are named, only the left column FormField is named, and the right one is blank. =========================================== Sub addrow() Dim rownum As Integer ActiveDocument.Unprotect ActiveDocument.Tables(5).Rows.Add rownum = ActiveDocument.Tables(5).Rows.Count ActiveDocument.FormFields.Add Range:=ActiveDocument.Tables (5).Cell(rownum, 1).Range, Type:=wdFieldFormTextInput ' BOOKMARK BEING APPLIED TO LEFT COLUMN ActiveDocument.Tables(5).Cell(rownum, 1).Range.FormFields (1).Name = "ForeignCountries" & rownum ActiveDocument.FormFields.Add Range:=ActiveDocument.Tables (5).Cell(rownum, 2).Range, Type:=wdFieldFormTextInput 'BOOKMARK BEING APPLIED TO RIGHT COLUMN ActiveDocument.Tables(5).Cell(rownum, 2).Range.FormFields (1).Name = "ForeignEmployees" & rownum ActiveDocument.Tables(5).Cell(rownum, 1).Range.FormFields (1).ExitMacro = "addrow" ActiveDocument.Tables(5).Cell(rownum, 1).Range.FormFields (1).Select ActiveDocument.Protect Type:=wdAllowOnlyFormFields, NoReset:=True End Sub ======================================== The above does not work correctly. So, while the first subroutine was able to make the program correctly, the quirkiness of this solution leaves me confused. My problem now, is that I also have a table with 3 columns that needs to work the same way, but no matter which order I name the FormFields in the new row, I can never have the name applied to the FormField in the rightmost column. I am guessing that the solution lies somewhere in the way the bookmark name is applied. I hope someone can shed some light on this situation. Thanks. -Robert Tag: Help! Word crashes when I try to view my vba code Tag: 36422
  - 12
    - Finding out the type of control I have a userform with various controls in it. I iterate the controls with with "For Each ctl in ActiveDocument.Userform.Controls..." How can I find out, what type that control is (ie. textbox)? In other words, how can I go trough all textboxes but not other controls? I know, that is should be quite easy, but I can't work it out easily... Thanks for any help. JJ Tag: Help! Word crashes when I try to view my vba code Tag: 36420
  - 13
    - WORD Viewer problem using VBA and VB 6.0 Hello, I have an interesting problem for the knowledgable vb/vba programmers out there. I am using VB 6.0 with a reference to the Microsoft Word 8.0 Object Library. I am generating a Word document with VB 6.0 and opening the document in Word Viewer using the shell command. Everything works fine, but after the document is open, it takes 3 or 4 clicks on the close(X) button to get the viewer to respond and close. The same applies when clicking on the file menu within the viewer. Has anyone experienced this problem that can give me a solution. I would like experienced responses only. No "guess" answers! Here is the tail portion of the code: Thanks in advance! ' Insert number of pages into report header intNumPages = wordApp.ActiveDocument.Range.Information(wdNumberOfPagesInDocument) wordApp.ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader wordSelection.MoveRight , 10 ' move position to after Page x of wordSelection.TypeText intNumPages ' Save doc wordDoc.SaveAs strDocPath wordDoc.Close wordApp.Application.Quit ' Destroy objects Set wordDoc = Nothing Set wordSelection = Nothing Set wordApp = Nothing ' Open doc file with Word viewer strQuotes = """" lngShell = Shell(strWordPath & strQuotes & strDocPath & strQuotes, vbNormalFocus) DoEvents Tag: Help! Word crashes when I try to view my vba code Tag: 36418
  - 14
    - Allowing font formating in a protected document Is it possible to allow a user to enter text into a protected document form field and then allow them to selectively format specific words? (i.e. to use functions such as Bold and Underline) Tag: Help! Word crashes when I try to view my vba code Tag: 36402
  - 15
    - Deleted macros but still getting warning I posted the question below a couple of weeks ago. ======================= I created some macros in a Word template 'MyTemplate.dot'. I have then moved all of those macros to my 'normal.dot' template. No macro appears for 'MyTemplate.dot' in the list when I select Tools...Macro...Macros (or Alt F8). Also, if I look at the project in the VB editor there is no 'Modules' folder under TemplateProject 'MyTemplate'. However when I close and re-open 'MyTemplate.dot' I still get presented with the warning dialog stating that "The document you are opening contains macros or customizations". How can I get Word to recognise that all of the macros have been renoved? Thanks in advance ======================= I got a direct reply from Doug (thanks, Doug!) which stated the following: ======================= In the normal course of things, you would should not be opening the template, rather, select New from the File menu and then select the template as the basis of the document that you want to create. You would not then get the warning. ======================= However, this is not the case. Even when I open a new document based on the template I get the warning message about macros. This is in spite of the fact that there are no macros (that I can identify anyway) in the document. Can anyone shed any light? Tag: Help! Word crashes when I try to view my vba code Tag: 36398
  - 16
    - Spell Checking a Protected Document I have created a form in word and have locked it so that the user can only change the fileds and not the field headings. I have a text field which is about 200 chars of free text and i want the user to be able to spell check it after they have typed it. I created a command button and allocated it the following code - "Application.ResetIgnoreAll ActiveDocument.SpellingChecked = False ActiveDocument.CheckSpelling" Which i got from VB Help. The problem is the code stops as the form is protected. How can i get around this. Really i would just like the spell check to be on the one text field not the entire form as well. I am using Word 2000 and Visual Basic 6.0 Tag: Help! Word crashes when I try to view my vba code Tag: 36397
  - 17
    - How to stop user from changing some options Hi, I am writing VBA code to turn off some options which are causing trouble during the down-stream operations on Word document, such as AutoFormatReplaceFractions. I am planning to associate my code with some events such as Open doc, New doc, etc. However, after a document is openned or created, the users can still use the Tools->Options, or Format->AutoFormat->Options to change these options. I cannot totally disable these Word commands since the users are still allowed to changes othere options. Is there a way I can prevent users doing this? Thanks in advance for your help. Ken Tag: Help! Word crashes when I try to view my vba code Tag: 36391
  - 18
    - Insert Office 2K Clipart I have a macro in Word XP that inserts clipart from Office 2000 Clip gallery: Selection.InlineShapes.AddOLEObject ClassType:="MS_ClipArt_Gallery.5" On execution it causes a run-time error '4198' Command failed. What is this error caused by? Cheers Tag: Help! Word crashes when I try to view my vba code Tag: 36388
  - 19
    - Word Application Object I have a question regarding what happens when the user hits the "X" (on the top right hand of the Word Window) to close a Word application. Using dim wapp as new word.application() It seems pretty clear that if the user clicks on the X then the statement (wapp is nothing) should be true and this is not the case. *CODE***** If Not (wapp Is Nothing) Then If wapp.Documents.Count > 0 Then Dim intResponse As Integer If myDoc.Saved <> True Then ...more code ****end code************* Programs execution executes the code inside the if statement above and it crashes on wapp.documents.count>0 The Following error is thrown "the RPC server is unavailable". NOTE: Please note that my program initially opens a Word application and types stuff into it. I then manually close the Word Application (as any curious client might) and then i run my program again which runs the code snippet above. This crashing is what i am trying to avoid and i am kinda' stuck cause i don't know what the X does in the first place and why is wapp not null when the x is pressed. THanks for the help. Gabriel Tag: Help! Word crashes when I try to view my vba code Tag: 36383
  - 20
    - counting a character Without using Find/Replace (whether manually or in a macro), is there a vba way of determining how many times a certain character appears in a selection? Larry Tag: Help! Word crashes when I try to view my vba code Tag: 36374
  - 21
    - Deleting Blocks of words I have Office XP. In Microsoft Word I can't delete several words without it asking me if I am sure I want to delete them. How can I turn this off so that when I select Delete, it deletes the highlighted words without asking? Thanks Tag: Help! Word crashes when I try to view my vba code Tag: 36367
  - 22
    - Word wants to install - though its already installed Anyone with experience with Word stating up with a message saying it is preparing to install Word. Press cancel and word starts up, though it looks a bit different then it use to. Thanks for any help, Leo Tag: Help! Word crashes when I try to view my vba code Tag: 36358
  - 23
    - Mailmerge in Word2000 from Outlook 2000 Hello, I want to create a Word Template that lets me print address labels for contacts in a Public Contacts folder. I tried with a loop that filled an Excel sheet or Word table with the contacts and then MailMerge on the sheet/table, but it only seems to work on the machine I record it... Any advice is appreciated! TiA, Kristian Tag: Help! Word crashes when I try to view my vba code Tag: 36354
  - 24
    - FileSave makes me crazy !! Hi All, Using Word 2002, in a large and complex add-in (loaded with the /L-commandline switch) I have a class module to intercept events and modules with a lot of routines. One of the (public) routines is FileSave() and in the class module I also intercept the DocumentBeforeSave. I have the following strange behaviour: When Closing the document (also intercepted) and Word QUIT (intercepted) and the document not saved: my specific FileSave is nicely executed, after the DocumentBeforeSave event. But (and this is the problem): when explicitly clicking the default Save button (on the default Word-toolbar) or using the File-->Save menu it does not execute FileSave. What happens is the following; The first time I press <Save> I see that the document is being saved (simply see it happen on the screen and see the file time-stamp): The LOG-file just shows: 11-08-03 14:40:01 DocumentBeforeSave start 11-08-03 14:40:01 WHT007000.TMP .saved: False 11-08-03 14:40:01 DocumentBeforeSave end So the FileSave-routine is not executed while the file is saved (as should be: doc.saved = False) !!! (I also update an Oracle database with SetExpId in the FileSave and this did not happen) The second atime the LOG-file shows: 11-08-03 14:40:04 DocumentBeforeSave start 11-08-03 14:40:04 WHT007000.TMP .saved: True 11-08-03 14:40:04 DocumentBeforeSave end indicating that (indeeed the first time the document is really saved ( doc.saved = True) Typing something in the document (.saved to become False now) en pressing File-->Save shows on the screen the saving be done and in the LOG-file: 11-08-03 14:40:10 DocumentBeforeSave start 11-08-03 14:40:10 WHT007000.TMP .saved: False (correct) 11-08-03 14:40:10 DocumentBeforeSave end Since the first "real command" in FileSave is writing to the LOG-file I should at least see a line with "<time-stamp> FileSave start" in the LOG-file This makes me ccompletely crazy: Why is the FileSave not executed??? I would be very pleased if someone can help me out. Best regards, Hans Troost My DocumentBeforeSave is this: Private Sub ActiveApp_DocumentBeforeSave(ByVal Doc As Document, SaveAsUI As Boolean, Cancel As Boolean) <write to LOG-file> "DocumentBeforeSave start" <write to LOG-file> Doc.Name & " .saved: " & IIf(Doc.Saved, "True", "False") <write to LOG-file> "DocumentBeforeSave end" End sub and FileSave: ' ' FileSave Macro: intercepts the regular word SAVE command ' Saves the active document or template ' Dim strDocFullName As String Dim strDocName As String Dim strExpID As String ' ' FileSave Macro: intercepts the regular word SAVE command ' Saves the active document or template ' Dim strDocFullName As String Dim strDocName As String Dim strExpID As String <write to LOG-file> "FileSave start" <write to LOG-file> "File to be saved: " & ActiveDocument.FullName <write to LOG-file> "Re-open: " & IIf(blnReOpen, "True", "False") strDocFullName = ActiveDocument.FullName strDocName = ActiveDocument.Name If blnReOpen Then With frmTMP2Doc .lblInfo.Caption = "First time saving of experiment " & Left(strDocName, 9) _ & vbNewLine & vbNewLine _ & "The document will be closed and re-opened" .Show End With End If ActiveDocument.Save If IsHellasDoc(ActiveDocument) And Right(strDocName, 4) = ".TMP" Then ActiveDocument.Close Call MyFileCopy(strDocFullName, gcolSettings(gcstrWorkDir) & Left(strDocName, 9) & ".doc") Call Kill(strDocFullName) Call SetExpId ' increase the LastExp field in table HELLAS_USERS in the database If blnReOpen Then Call DoOpenExp(Left(strDocName, 9) & ".doc", gcolSettings(gcstrWorkDir)) End If End If If blnReOpen Then Unload frmTMP2Doc End If <write to LOG-file> "FileSave end" End Sub Tag: Help! Word crashes when I try to view my vba code Tag: 36349
  - 25
    - Reading multiple documents' word count Hello, I have a folder with about 20 word documents and I would like to find out how many words are in all of the documents combined w/out referencing to each file explicty i.e 1.doc 2.doc rather something to the extent of *.doc . I hope you know what it is that I'm trying to say and output this to anywhere msgbox or a text file or write it to the active document. Thank You, Den Tag: Help! Word crashes when I try to view my vba code Tag: 36304

I have been working on a project using Word and VBA. Everything has
been going great, but suddenly when I try to access my code by opening
the Word document, and selecting 'Tools-Macro-Visual Basic Editor',
Word just locks up. If I don't try to open the vb editor, my vba code
runs just find. What could cause this, and most importantly, how do I
get to my code?? I have tried re-booting my computer, and also have
tried opening a generic Word doucument, then going to the Visual Basic
Editor (works fine), then opening my document (at which point Word
freezes). I have about 80 hours into this project! And I have NOT
locked the code, so that shouldn't be an issue. Any help would be
greatly appreciated.

TIA.

Top

Re: Help! Word crashes when I try to view my vba code by Raymond

Raymond
Fri Aug 15 17:00:15 CDT 2003

I have no idea about the cause but one thing you can try is selecting
Tools >Templates and Add-Ins and the click on Organizer ... (that's in Word
97)

The rightmost tab (Macro Projet Items) allows you to copy your modules.

Hope this helps,
Raymond

"Anne" <anne@clint-comes.net> wrote in message
news:ffa0695b.0308151157.1391600d@posting.google.com...
> I have been working on a project using Word and VBA. Everything has
> been going great, but suddenly when I try to access my code by opening
> the Word document, and selecting 'Tools-Macro-Visual Basic Editor',
> Word just locks up. If I don't try to open the vb editor, my vba code
> runs just find. What could cause this, and most importantly, how do I
> get to my code?? I have tried re-booting my computer, and also have
> tried opening a generic Word doucument, then going to the Visual Basic
> Editor (works fine), then opening my document (at which point Word
> freezes). I have about 80 hours into this project! And I have NOT
> locked the code, so that shouldn't be an issue. Any help would be
> greatly appreciated.
>
> TIA.

Top