how do i stop saving a back up saved file

Tutorials Win: Microsoft Windows Forum

- Previous
  - 1
    - update footer when protected document Hello guys I have a document, template with forms, and I want to be able to update my footer by entering information in my userform. I can only make the update when my form is protected when I use the Field FILL-IN, but with the field REF I can't. with the FILL-IN field when i start a new document pops-up a window asking me for this fields, and only after my userform. But I want to be able to do that with my user form. 'This is the code that I have in my userform Private Sub fillinbuttom_Click() 'no tanks Loaded ntanks = UserForm1.notanks.Text ActiveDocument.FormFields("ntanks").Result = ntanks 'input salg No salg = UserForm1.salgno.Text ActiveDocument.Bookmarks("salg").Range.Text = salgno 'input revison No rev = UserForm1.revno.Text ActiveDocument.Bookmarks("rev").Range.Text = revno Unload Me End Sub 'This is the code That I wrote for my module Sub Formsfooterupdate() ' If document is protected, Unprotect it. If ActiveDocument.ProtectionType <> wdNoProtection Then ActiveDocument.Unprotect Password:="" End If If ActiveWindow.View.SplitSpecial <> wdPaneNone Then ActiveWindow.Panes(2).Close End If If ActiveWindow.ActivePane.View.Type = wdNormalView Or ActiveWindow. _ ActivePane.View.Type = wdOutlineView Then ActiveWindow.ActivePane.View.Type = wdPrintView End If ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter Selection.WholeStory Selection.Fields.Update ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument ' ReProtect the document. If ActiveDocument.ProtectionType = wdNoProtection Then ActiveDocument.Protect Type:=wdAllowOnlyFormFields, _ NoReset:=True End If End Sub But still I have the same problem and an error popup in salg=userfor1.salgno.text I think I am doing a mistake. Could someone help me with this. Tag: how do i stop saving a back up saved file Tag: 116724
  - 2
    - VBA or Vbscript to open Word Doc and ACCEPT all Tracked Changes Hi everyone, Can anyone please help me by suggesting VBscript or VBA code for opening up a Word document and Accepting all the Tracked Changes - ultimately nullifying them from being displayed. Ideally I need to open multiple documents in a folder, but if I can get a piece of code that can do just one document I know how to loop it to do n-documents. Please AND Thank you. I appreciate your time and effort in providing an answer for me! Warm Regards, Dennis Tag: how do i stop saving a back up saved file Tag: 116723
  - 3
    - Better way to preview word/office docs? The crude way is to open another instance of word and do a print preview. But in outlook, it says it is opening the office previewer. So does anyone know how to access this instead with vba or vsto? Tag: how do i stop saving a back up saved file Tag: 116714
  - 4
    - Select Row in word table This my be so easy Iâ??m not seeing the trees from the forest but, I am trying to simply select the row of a word table, in which my cursor is currently in. The problem is I want to run this on a variety of tables with various row and column combinations Tag: how do i stop saving a back up saved file Tag: 116708
  - 5
    - Create secured pdf with word 2007? I've downloaded the save as pdf addin for word 2997, but don't see any option to create the pdf with security. All I need to do is to make the document disabled for edits, is that possible? Also, I'm interested in converting using vba calls, I'm not sure if that's possible but I suppose so? Tag: how do i stop saving a back up saved file Tag: 116701
  - 6
    - How do I init a variable defined in the Options Explicit area? I defined a variable in the Options Explicit area but I need it set to an initial value to it. This is in WORD 2007 VBA code. Tag: how do i stop saving a back up saved file Tag: 116697
  - 7
    - how do i change an integer to text equivalent (1 to "one", etc) -- seeking help Tag: how do i stop saving a back up saved file Tag: 116695
  - 8
    - Userform help text I have a textbox on a userform where I would like to have some help available to the user via F1 or something much like Help on a textfield of a doc or template. There is some info on the property of HelpContextID but, I have not used this before and search does not provide much help either. I could use a label but, would be rather lengthy. Any help on doing this appreciated. Thanks, Bryan Tag: how do i stop saving a back up saved file Tag: 116694
  - 9
    - How can I import the value of a cell from a spreadsheet into a txt Is there a script of some way to import the value of an external spreadsheet cell into a txt box or label in a word document. That txt box or label would have to dynamically update every time the document is opened, so it would have to read every time the document is opened. Thanks in advance for your help. Tag: how do i stop saving a back up saved file Tag: 116692
  - 10
    - sporadic macro function I use the following code to automate the digital signing of word documents. Most of my users use Word 2003, but some use 2007. This doesn't work with 2007, it creates the file, but does not digitally sign it. Occasionally, I have a user that states that it just does not work (no error message). Any thoughts? Private Sub Sign_Click() Dim WshShell As Object Dim SpecialPath As String Dim Lvalue As String Dim Sig As Signature Dim MyOrt As String Dim Doc As Object Set WshShell = CreateObject("WScript.Shell") SpecialPath = WshShell.SpecialFolders("Desktop") Set Doc = ActiveDocument Lvalue = Format(Date, "yyyymmdd") MyOrt = InputBox("Initials") Doc.SaveAs (SpecialPath & "\" & Lvalue & "-" & MyOrt & "-QAForm") Set Sig = ActiveDocument.Signatures.Add ActiveDocument.Signatures.Commit MsgBox "File saved to desktop and signed." End Sub Tag: how do i stop saving a back up saved file Tag: 116691
  - 11
    - Updating Values of Embedded Spreadsheet I have a spreadsheet that I linked to in my Word Document. Actually the way I did it was to insert an Excel Worksheet and I put this code below as the value of the cell =SUMPRODUCT('C:\Documents and Settings\cashmoregf\Desktop\2008_Injury_Report.xls\[2008%20Injury%20Report.xls]2008 Injury Rpt'!$O$4) This value should then go to the spreadsheet mentioned and grab the most current value in that spreadsheet. However, when I open the Word document the values don't update with what is current in the sheet in the referenced sheet. I'm not sure what I am doing wrong. How do I make this value update in the document when the Word document is opened. If I put this code in a cell in a True Worksheet and open it, it automatically updateds. Thanks in advance for any ideas. Gordon Tag: how do i stop saving a back up saved file Tag: 116689
  - 12
    - help with word Hi All I recently used a word document that was brill to use, when you typed a code such as "WD 13" and pressed enter a full paragraph from another document was inserted. How are such documents created, i have a full surveying document that i want to use and want to be able to just type a code and the paragraph i want be inserted into a schedule of works. Any help would be really appreciated. -- thanks c p Tag: how do i stop saving a back up saved file Tag: 116684
  - 13
    - muliple select option fron record source hello friends, I want to know how to multi select the cells from recordsourcein a form. when i tried using control, multi select is not happening. when tried with shift only continuous cells can be selected. I want to select it random. Hope u get my problem. Please help me to doing so.. Tag: how do i stop saving a back up saved file Tag: 116677
  - 14
    - Help with Borderrs and Shading Dialog I am trying to return the value of user settings in the Borders and Shading dialog. I can determine the Left, Right, Top, Bottom, Horizontal, and Vertical border styles selected an then use that information later on to set one or more table borders. What I can't figure out is how to determine the line color and line width that a user selects. Here is simplified version of my overall code that shows how I can get the border style choosen in the dialog. I just can't figure out how to return the user selected line width or color. Thanks. Sub Test() Dim LS As Long Dim RS As Long Dim TS As Long Dim BS As Long Dim VS As Long Dim HS As Long Dim Color '???????????? Dim LineWidth '????????????? With Dialogs(wdDialogFormatBordersAndShading) If .Display <> 0 Then LS = .Leftstyle RS = .RightStyle TS = .TopStyle BS = .BottomStyle HS = .HorizStyle VS = .VertStyle Color = ?????????????? LindeWidth = ????????????? End If End With With Selection.Tables(1) With .Borders(wdBorderLeft) .LineStyle = LS .LineWidth = wdLineWidth050pt 'Replace this with LineWidth selected by user .Color = wdColorRed 'Replace this with Color selected by user End With End With End Sub -- Greg Maxey - Word MVP My web site http://gregmaxey.mvps.org Word MVP web site http://word.mvps.org Tag: how do i stop saving a back up saved file Tag: 116660
  - 15
    - Table reference and calculation I have a document that has several tables, (about 35+). These documents will be used to create some base documents for other staff to use. The tables represent different "sections" of the document where staff will enter scores for questions in the tables. The first section of the document may have between 3-20 tables and the scores will need to be calculated. But I will not know exactly how many tables there will be in the first section from document to document. How can I check to determine how many tables are in the first section and then calculate the data in the second column? I do not want to include tables in the total that are in the rest of the document. Is there a way to name a table? I can bookmark a table, but not sure how to reference the cell value. Any help is appreciated. thanks pf Tag: how do i stop saving a back up saved file Tag: 116659
  - 16
    - Trying to create a conditional field or cell in a Word form I'm trying to recreate in Word a form I was able to create in Excel. Is it possible and, if so, how? Here's the behavior I wish to reproduce: 1) A cell has a list of numerical values. If the user selects a value above a given cutoff point, the cell changes color. 2) In a Yes/No/Uncertain scenario, the cell changes to one color if the user selects No, and to another color if the user selects Unknown. I'm going to re-post in the Programming forum in case that's the more appropriate choice. Thank you very much. Tag: how do i stop saving a back up saved file Tag: 116656
  - 17
    - Creating a conditional fill-in field I'm trying to recreate in Word a form I was able to create in Excel. Is it possible and, if so, how? Here's the behavior I wish to reproduce: 1) A cell has a list of numerical values. If the user selects a value above a given cutoff point, the cell changes color. 2) In a Yes/No/Uncertain scenario, the cell changes to one color if the user selects No, and to another color if the user selects Unknown. I'm going to re-post in the Forms forum in case that's the more appropriate choice. Thank you very much. Tag: how do i stop saving a back up saved file Tag: 116655
  - 18
    - How to open dialogue SaveAs but the field "Name of file" should has Hello. There is the macro for saving the document with name from bookmark (thank's G.Mayor and D.Robbins). Sub FileSave() Dim fName As String On Error Resume Next If Len(ActiveDocument.Path) = 0 Then fName = ActiveDocument.Bookmarks("Bookmark1").Range If Len(fName) = 0 Then MsgBox "File naming bookmark is empty or missing." & vbCr & _ "Document has not been saved" Exit Sub End If ActiveDocument.SaveAs fName & ".doc" Else ActiveDocument.Save End If End Sub I need to show dialogue Sava As that user can select any folder for saving document. But the field "Name of File" should has as name my bookmark. Is it probably? How? I did so temporary: Sub FileSave() Dim fName As String Dim PathName As String PathName = "c:\" On Error Resume Next If Len(ActiveDocument.Path) = 0 Then fName = ActiveDocument.Bookmarks("bookmark1").Range If Len(fName) = 0 Then MsgBox "File naming bookmark is empty or missing." & vbCr & _ "Document has not been saved" Exit Sub End If ActiveDocument.SaveAs PathName & fName & ".doc" Else ActiveDocument.Save End If End Sub Tag: how do i stop saving a back up saved file Tag: 116653
  - 19
    - Macro Security Settings Disabled 2007 - Bug? Is this a bug with trusted locations and VBA File System Object disabling Macro Security Settings in Word 2007 and I presume Excel also. I'm trying to change the location of my trusted Workgroup and have a subfolder and I cannot do it - my VBA/XML says no templates found if I try to go more than one folder deep with a trusted location. Or I receive Macro Security Settings Disabled. Anyone else having this problem with dynamic menus? Tag: how do i stop saving a back up saved file Tag: 116643
  - 20
    - insufficient memory while using opening .dot Hi all, I've a .dot file that is created with Word 95. The file is around 1MB. I try to open this file with Word 2003, I get an insufficient memory error. I spot that Word 2003 is trying to convert marco, after sometime, it prompt the insufficient memory error Tag: how do i stop saving a back up saved file Tag: 116642
  - 21
    - How do I filter a database for information? I am working on a simulated ICT test and one of the instructions is: Filter the database to identify those students who have included a tie breaker with their entry. How do I do this? Tag: how do i stop saving a back up saved file Tag: 116639
  - 22
    - Resize Images of a Specific Style Only I have a macro that resizes all images in a Word document to 75% of their original size. I would like to make it so that the macro only resizes images that have a certain style applied, such as images_steps. How would I do that? Here's the image macro for resizing. Sub ImageShrink() Dim PecentSize As Integer Dim oIshp As InlineShape Dim oshp As Shape PercentSize = InputBox("Enter percent of full size", "Resize Picture", 75) For Each oIshp In ActiveDocument.InlineShapes With oIshp .ScaleHeight = PercentSize .ScaleWidth = PercentSize End With Next oIshp For Each oshp In ActiveDocument.Shapes With oshp .ScaleHeight Factor:=(PercentSize / 100), _ RelativeToOriginalSize:=msoCTrue .ScaleWidth Factor:=(PercentSize / 100), _ RelativeToOriginalSize:=msoCTrue End With Next oshp End Sub Tag: how do i stop saving a back up saved file Tag: 116631
  - 23
    - browse and attach file Is there a macro, field, or content control in Word 2007 that will allow the user of a form to open the Browse window, select a file, and paste the directory path of that file as a hyperlink into the form? InfoPath has a control that does this, but I can't find one in Word. Tag: how do i stop saving a back up saved file Tag: 116629
  - 24
    - Macro to Calculate a future date I am trying to create a macro in Word (I have never done before) to calculate a future date i.e., 90 days from the current date. I found some information on line for the calculation command line but when I run the macro, it inserts the command line where the future date is. What am I doing wrong? Tag: how do i stop saving a back up saved file Tag: 116628
  - 25
    - how to get current theme of Word 2007 hi, i want to know the current theme of Word 2007. (whether it is blue, black, or silver) I am using following in C#: applicationObject.ActiveDocument.ActiveThemeDisplayName applicationObject.ActiveDocument.ActiveTheme However, i get "none" as a result, always for both statements. does anyone know how to get the same ? Thanks, ~Anita Tag: how do i stop saving a back up saved file Tag: 116626
- Next
  - 1
    - Close Dialog boxes Hey, I remember seeing a post in the past, but I can't seem to find it now. I am programatically closing a word doc and it dosen't close the whole thing. It leaves the word pane open still because a dialog box opens that says something like, "There is alot of info in the Clipboard. Would you like to keep it available when Word closes?". Isn't there a way to say something like WdDialog boxes = false. Not that exactly like that, but just to get the point. I don't want to be promted for the ClipBoard thing. Thanks.... Tag: how do i stop saving a back up saved file Tag: 116616
  - 2
    - VBA to add button to QAT Hello Is there any VBA to add a builtin word button to the Quick Access Toolbar and not rely on the user doing it. This code will be incorporated into an addin. Thanks Tag: how do i stop saving a back up saved file Tag: 116607
  - 3
    - Resize imported pictures Hi, I have a macro that goes through all imported pictures and change the size on them to the same value. The new size is taken from my PicResize user form. Sub Resize () Dim oInl As InlineShape Size = PicResize.TextBox1.Value For Each oInl In ActiveDocument.InlineShapes oInl.ScaleWidth = Size oInl.ScaleHeight = Size Next End Sub Now I want to modify the code so that it only take the selected pictures. How shall I do that? What happens if nothing is selected? What happens if other items like text or tables are selected? Best regards, SÃ¶ren Tag: how do i stop saving a back up saved file Tag: 116599
  - 4
    - How to define clicking of buttons "Save" or "Save As" by user ? Hello. I need to define clicking of the buttons "Save" or "Save As" by user on the tollbar. Next I will add to name of file of the value of one bookmark. How can I define it? Is it correct: if Activedocument.Saved = False Then Activedocument.Saveas ... ... my code... Thank you very much! Tag: how do i stop saving a back up saved file Tag: 116598
  - 5
    - Sentence count in brackets after each period.... Can it be done? I would like to get Word to count each word in a given sentence, then tally that number and place it in brackets after the period. Can Word do this with a macro? Any suggestions will be much appreciated. Tag: how do i stop saving a back up saved file Tag: 116595
  - 6
    - Underline text Hi, I have the following macro that will underline the first sentence of any text formatted with a Heading 1 style. I'm trying to rewrite the macro to accommodate legal style numbering as in: ARTICLE I LEASES AND RENTS In this example "article 1" is auto numbering coming from the style and then there's a line break (Shift+Enter). I want the macro to underline the title of the section, in this case 'LEASES AND RENTS". Here's what I have (thanks to this newsgroup) that works for outline numbering: Sub BoldHeadingArt() Dim myPara As Paragraph Dim rngPara As Range For Each myPara In ActiveDocument.Paragraphs If myPara.Style = ActiveDocument.Styles(wdStyleHeading1) Then Set rngPara = myPara.Range.Sentences(1) With rngPara .Font.Bold = True End With End If Next myPara End Sub Should I assign the range to something other than a sentence (because there will be no period involved), I've tried everything I know and cannot make this work. Can you help? Thanks Tag: how do i stop saving a back up saved file Tag: 116590
  - 7
    - Macro misbehaving... I have Office 2007, but I've designed a template and a Macro for an employer who has people using both Word 2002 and 2003. Since it's for someone else with a different versions of Word, I can't store it normally. Since I don't know the file structure of their computers, I figured it would be best to just create a folder on my C-drive so that they can store it in the same place when I send it to them. Here's the problem. I've designed 2 templates. The first template needs to call up the 2nd and place the contents of the 2nd template at the top of various pages in the 1st one. That's where the macro comes in. It inserts a page break then opens the 2nd template, copies the contents and then pastes those contents at the top of the new page. I purposely instructed the Macro so save in the normal.dotm file so that it could be run from any other file when the keyboard shortcut is used. It works like a charm from within the first template as long as the template itself is open. However, when I attempt to use the template as it is designed to be used...meaning that it opens a copy of itself in a temporary document (Document1, Document2, etc.), then the Macro fails to work. I get errors stating that part of the component set is missing...the actual template that has opened a copy of itself instead of the original. I've deleted and re-recorded this Macro so many times...but the results are always the same. What am I doing wrong? I have been trying to get this done for over 5 hours now. Is it because the documents are not being stored in the folders that Word normally stores them in? Can anyone please give me some suggestions? Thanks! USEN Tag: how do i stop saving a back up saved file Tag: 116583
  - 8
    - template - using fill in feature question I created a letter template using fill in fields - when i open the template my pop up questions appear and at completion of the last popup question variable the letter is visable. My question is - is it possible to show the letter behind the pop ups so that the user can see the letter as it is filling in, vs right at the end only? Thanks Tag: how do i stop saving a back up saved file Tag: 116582
  - 9
    - AutoIncrement field each time document is printed ? Hello: I have read notes like -Creating sequentially numbered documents (such as invoices)- but could not find exactly what I am looking for. Please I would appreciate advice in this case. I have a simple document, and want to show a field or textbox (really cannot decide wich of them) that autoincrement in 1 each time the doc is saved. It is convenient to protect that number from other user changes. I have experience in Excel VBA but Word objects are still a bit stranger for me, so please, show me the details. My best regards. Roberto Tag: how do i stop saving a back up saved file Tag: 116581
  - 10
    - Auto adjust a paragraph when text field is empty How can I make the document adjust itself (move up a space) if I leave a text field empty? Tag: how do i stop saving a back up saved file Tag: 116578
  - 11
    - Negative value when deduction is being selected Hi; I would appreciate if someone could help me with the following: I've created a form with a field for the user to key in Amount and 1 drop down list for the user to specify the Action needed. I want the system to automatically capture the amount as a negative value whenever I select an action called "deduction" from the Action drop down list. And, value to remain as positive when I select the action called "Payment" Please advice. Thanks in advance. Tag: how do i stop saving a back up saved file Tag: 116571
  - 12
    - Can I link cells in diff. embedded Excel objects in a Word documen I can link cells within the same embedded Excel object in a Word document, but how do I link cells between two different Excel objects? This is for a financial document using Word 2003 where figures from one table (embedded object) are used for calculations in another table. I would like to keep this as one document which is why I am not linking to an external Excel workbook. Tag: how do i stop saving a back up saved file Tag: 116570
  - 13
    - Linking excel tables in Word 2007 Can someone help me with what I think should be an easy task but is proving anything in Word 2007. I use documents in word that contain excel tables to hold data that require formula. The results in the first table affect the data presented in the second table & so on. I assumed that a simple "Paste Link" would do the trick but although I can do the link when changing the data in the first table, the data in the second changes the first time but any subsequent changes are not registered & the second table remains unchanged. When I then go into the table to view the cell formula there is a reference to the first table but the cell address appears as RxCx & then displays an error ##REF in the cell. Having followed some of the discussions I have upgraded with all the current upgrades for Office, however, this only had the effect of causing my original file to become corrupt & cannot now be open. It appears that once the file is saved that the link becomes static & therefore doesn't change with the source data. It has been suggested that this can only be solved by use of macro's, an area I am not familiar with. Can anyone help? Tag: how do i stop saving a back up saved file Tag: 116568
  - 14
    - page number in the Footer Hi, I need help with accessing to the Footer in the word. I have a template that allows users to create a report for them. The report is made up of sections such as Preface, Executive Summary, Sections, and so on in that order. The way it inserts the sections in the report is by using autotexts. So i have autotexts for Preface, autotexts for Executive Summary, and so on. My problem is with the page number in the footer for these sections in the report. When the user select Preface, the page number of the Preface should start with number 1. The rest of the sections will have their page number set to continue. If the user starts the report by selecting Executive Summary, then the page number will start with number 1 in the Executive Summary's footer. The rest of the sections after Executive Summary section will continue from there. Here is my code to insert 'preface' ActiveDocument.AttachedTemplate.AutoTextEntries("preface").Insert _ Where:=Selection.Range, RichText:=True 'ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter 'With Selection.HeaderFooter.PageNumbers ' .NumberStyle = wdPageNumberStyleArabic ' .HeadingLevelForChapter = 0 ' .IncludeChapterNumber = False ' .ChapterPageSeparator = wdSeparatorHyphen ' .RestartNumberingAtSection = True ' .StartingNumber = 1 'End With I tried with the code that are commented but did not get it to work. Thank you in advance Tag: how do i stop saving a back up saved file Tag: 116567
  - 15
    - Controlling the cursor when clicking on a protected section I'm working with a long template with many sections. Upon opening, it has all the sections protected except for section 1. In section 5, there is a group of radiobuttons (from the control toolbox toolbar). The reason why these are relevant is the following: Whenever I try to click anywhere in sections 3 or 4, the cursor goes automatically to one of those radiobuttons and selects it (it does not click it, but it selects it). Not only does the cursor move but this causes the document itself to scroll down rapidly from the section which I clicked to section 5, where the radiobuttons are located. On the other hand, whenever I try to click anywhere in section 2, since this section is also protected, the cursor flies automatically to the top of the document in section 1. The protection of the document is doing its job by preventing any input of information by making the cursor fly "somewhere" as the user clicks anywhere in the protected sections. I would like to change that "somewhere" and gain some control over where exactly does the cursor go when clicking on a protected section. Can this be done? Is there anyway to intercept the clicking on a protected section? Thank you Juan Lemus Tag: how do i stop saving a back up saved file Tag: 116562
  - 16
    - Macro to change the Background color in 2007 I've changed the Normal.dotm template in Word 2007 to include a dark blue background but apparently the Normal.dotm doesn't store the background color (all my new documents are still white). So how would I go about making an AutoNew macro that will change the color for me? Tag: how do i stop saving a back up saved file Tag: 116558
  - 17
    - Type Mismatch error when calling Sub with apparently correct types I have the following code: Sub ClearSection() If True Then For Each t In ActiveDocument.Tables ClearOneSection (t) Next t Else ClearOneSection (Selection.Tables(1)) End If End Sub Sub ClearOneSection(ByVal t As Table) ' Do something End Sub For some reason, the Else statement will throw a Type Mismatch error during runtime. The If statement runs correctly. Does anyone have any ideas why this might be the case? Any help is greatly appreciated. Tag: how do i stop saving a back up saved file Tag: 116546
  - 18
    - Word 2007 behaviour when opened from setup hi, whenever i open the readme file from some setup, it opens in Word 2007. However at this time the Word 2007 shows up the username as "System" in username option of Word options. Also, i observed that Word 2007 theme reverts as Blue even though I had changed it to Black. However, if i open the same readme file after setup quits, Word 2007 opens with normal settings (i.e theme is what was set earlier and even username is properly shown) Has anyone come accross this scenario...? Thanks, ~Anita Tag: how do i stop saving a back up saved file Tag: 116540
  - 19
    - How to create a "find" and "find next" macro? I am working with a team of editors who asked me to create a macro that will go through documents and find certain words that are commonly used incorrectly (but not always), but giving them an opportunity to decide whether or not to change each instance before moving on to the next. Basically, it would go like this: I want to find â??xâ??, â??yâ??, and â??zâ?? in any document I open. I may or may not want to change the items once they are found. How do I create a macro that lets me find the first instance of â??xâ??, change it if I want to, find the next instance of â??xâ??, change it if I want to, etc. through to the end of the document, then start over and search for the first instance of â??yâ??, stop and let me change it if I want to, find the next instance of â??yâ??, stop and let me change it if I want to, and so on? Tag: how do i stop saving a back up saved file Tag: 116539
  - 20
    - Problem with Populating a Word Document from Access 2003 I have this database that has worked great up until now. When created, all users in the office were using Access 2003 and Word 2003. Now, two computers are using Access 2003 and Word 2007. The problem has something to do with the 2007 users when the word document is saved. Only these users can further open up the document to view/edit. The 2003 users, when trying to open up the document get nothing but gargle and a pop up box to select the encoding method to view the document. However, when the 2003 users run this database and create a new document, it is useable by all users still. I know that in Word 2007, you can select SaveAs 97-2003 document when saving, so I am thinking that I have to change the code accordingly somehow. Here is my code that works under the 2003 Office system: Private Sub RunWordTemplate_Click() On Error GoTo Err_RunWordTemplate_Click Dim intAnswerMe As Integer 'Fill in Work Order Description if blank to avoid Null error in Word If IsNull(Me.WODesc.Value) Or _ Me.WODesc = 0 Then intAnswerMe = MsgBox("Please enter in a Work Order Description", vbOKOnly + vbInformation, "Description Needed") Me.WODesc.SetFocus Exit Sub End If Dim oApp As Object 'Variable for Word Dim sFilename As String 'Variable for Auto-Save file name Dim strTemplateName As String 'Variable for Word Template to be used Dim objWORDdoc As Object 'Save Record DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 'Create path to Quotation Template strTemplateName = "\\Sharppc\ServerFiles\ProjectData\Quotations \QuotationTemp.dot" 'Create default SaveName for New Quotation being written sFilename = "\\Sharppc\ServerFiles\ProjectData\Quotations\" & Me.WONum.Value & " - " & Me.CompanyName.Value & ".doc" Set oApp = CreateObject("Word.Application") oApp.Visible = True If Dir(sFilename) = "" Then 'Test to see if created filename already exists 'and if not, open Template to fill in date Set oApp = CreateObject("Word.Basic") 'otherwise just open that filename already With oApp .filenew Template:=strTemplateName 'Set bookmarks in QuotationTemp to equal values of new Quoation Number created .EditBookmark Name:="quotedate", GoTo:=True .Insert (Format(Me.WODate, "mmmm dd, yyyy")) 'insert date of quote .EditBookmark Name:="quotenum", GoTo:=True .Insert (CStr(Me.WONum)) 'insert work order number .EditBookmark Name:="companyname", GoTo:=True .Insert (CStr(Me.CompanyName)) 'insert company name 'This code will make sure that if the street address has two lines, both are inserted If IsNull(DLookup("[CustAdd2]", "ContactsTbl", "[Contact]='" & Me.Contact.Value & "'")) Or _ DLookup("[CustAdd2]", "ContactsTbl", "[Contact]='" & Me.Contact.Value & "'") = 0 Then .EditBookmark Name:="address", GoTo:=True 'insert Line 1 address .Insert ((CStr(DLookup("[CustAdd1]", "ContactsTbl", "[Contact]='" & Me.Contact.Value & "'")))) Else .EditBookmark Name:="address", GoTo:=True 'insert Line 1 & 2 address .Insert (CStr(DLookup("[CustAdd1]", "ContactsTbl", "[Contact]='" & Me.Contact.Value & "'"))) & vbCrLf & (CStr(DLookup("[CustAdd2]", "ContactsTbl", "[Contact]='" & Me.Contact.Value & "'"))) End If .EditBookmark Name:="citystate", GoTo:=True .Insert ((CStr(DLookup("[CustCity]", "ContactsTbl", "[Contact]='" & Me.Contact.Value & "'"))) & ", " & (CStr(DLookup("[StateID]", "ContactsTbl", "[Contact]='" & Me.Contact.Value & "'"))) & " " & (CStr(DLookup("[CustZip]", "ContactsTbl", "[Contact]='" & Me.Contact.Value & "'")))) .EditBookmark Name:="custname", GoTo:=True .Insert (CStr(Me.Contact)) .EditBookmark Name:="subject", GoTo:=True .Insert (CStr(Me.WODesc)) .EditBookmark Name:="firstname", GoTo:=True .Insert (CStr(DLookup("[fName]", "ContactsTbl", "[Contact]='" & Me.Contact.Value & "'")) & ",") .filesaveas Name:=sFilename 'save Quotation with auto save name End With Else 'If filename already exists, just open the file at this point oApp.Documents.Open sFilename oApp.ActiveDocument.Save End If Exit_RunWordTemplate_Click: Exit Sub Err_RunWordTemplate_Click: MsgBox Err.Description Resume Exit_RunWordTemplate_Click End Sub *********************************************** I have tried replacing this line: .filesaveas Name:=sFilename 'save Quotation with auto save name with this code: If oApp.Version = 12 Then .filesaveas Name:=sFilename, _ .FileFormat:=0 Else .filesaveas Name:=sFilename 'save Quotation with auto save name End If But, this does not work either. It was suggest that this line of code: Set oApp = CreateObject("Word.Basic") might be casuing me an issue, but I am pretty much clueless as to how to fix this. I am barely over the newbie range and still learning on the fly, and if someone can point out how to fix this code to work so that it will check to see which version of Word is running and save the file in a 97-2003 format accordingly, I would be MUCH appreciative. I have been looking online and can't seem to pinpoint anything down that works. THank you, Jerry Tag: how do i stop saving a back up saved file Tag: 116537
  - 21
    - Automating "Compress" feature on all pics in Word doc with VB. Hi All In a Word document you can select a picture and then right click and select "Format Picture". On the "Picture" tab you then have the "Compress" button. I want to automate with VB running this "Compress" feature for all the pics in the document to a "Print" size. When I record myself doing this the recorded macro seems to do everything but what I want. Does anyone have code for performing this action? Chrisso Tag: how do i stop saving a back up saved file Tag: 116535
  - 22
    - How can I tell with VB if a document has Markup activated? Hi All I need to ensure that when our Word files are sent to customers that "View-Markup" is not selected. When I record a macro doing this the code is: WordBasic.ViewChanges This means that I cannot tell whether Markup was on already. The code merely toggles. Is it possible to do a test and turn off Markup only when it is on? I cannot assume which way each Word file is configured. Some may have Markup on and others off. Therefore I need a test but with the above generated code I cannot see a way of doing this. Any ideas? Thanks in advance, Chrisso Tag: how do i stop saving a back up saved file Tag: 116534
  - 23
    - Opening Multilple Documents at Once Adobe 7.0 has a very useful feature in its document organizer. If working on multiple pdfs for a project, the user can create a collection with all these documents. With a click of a button one can open all documents simultaneously. Does word have the capability of doing something like this? Tag: how do i stop saving a back up saved file Tag: 116530
  - 24
    - Accessing Fields on an Outlook Template from Word I'm using Word and Outlook 2000. Please let me know if I should be posting this to the Outlook discussion group instead of here. I have a simple function that I use to send an email from Word. In the version I have below, it uses an Outlook template and it works just great. But now they've decided they want to add some textboxes to the Outlook template that need to be filled in by the macro before it sends the template. I have programmed in Word, Excel and Access, but never in Outlook. I have spent several days researching Word references and Outlook references and have not been able to figure out how to fill in the textboxes on the Outlook template before sending it. Since the textboxes are named (in this case "txtPlanName" for one), it seems like it should be doable. From my research, it looks possible, but everything I've tried hasn't worked. Here is my basic code without trying to fill in the textboxes: Function SendEmail(eeEmail$, EmailSubject$, SendNow As Boolean) 'create email with attachment Dim OlApp As Outlook.Application Dim SafeItem As Object Dim oItem As Object Dim utils As Object Dim nspnamespace As Outlook.NameSpace Set OlApp = Outlook.Application Set nspnamespace = OlApp.GetNamespace("Mapi") Set SafeItem = CreateObject("SafeOutlook.SafeMailItem") Set oItem = OlApp.CreateItemFromTemplate("f:\winword\template\test.oft") Set utils = CreateObject("cpioutlook.MAPIUtils") SafeItem.Item = oItem SafeItem.Recipients.Add eeEmail$ SafeItem.Recipients.ResolveAll SafeItem.Subject = EmailSubject$ if SendNow = True then SafeItem.Send else SafeItem.Display end if Set OlApp = Nothing Set nspnamespace = Nothing Set SafeItem = Nothing Set oItem = Nothing End Function Thanks, any help is appreciated. Tag: how do i stop saving a back up saved file Tag: 116526
  - 25
    - Controling Tables Hi, I use code that sends a range of excel tables to bookmarks in word. It all works well (I have modified the following code if curious http://www.vbaexpress.com/kb/getarticle.php?kb_id=133 ) Once a table or picture is sent to word, I'd like to be able to format it from excel (ie flip it 90 degrees or auto fit the table to contents I get a run time error from excel on the 3rd line of the following code: appWrd.Selection.PasteSpecial DataType:=wdPasteRTF, Placement:=wdInLine appWrd.Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter appword.Selection.Tables(1).AutoFitBehavior (wdAutoFitContent) I've tried a few ways of trying to pick up the table i've just created in word, but struggling. Any help would be appreciated. Regards Simon (Cross posted in excel.vba ..... sorry if this is not allowed, but just didnt know if this was excel or word related). Tag: how do i stop saving a back up saved file Tag: 116511

When I save a doc. a back up copy is always saved. I do not want this. How do
I stop it please.

Re: how do i stop saving a back up saved file by macropod

macropod
Tue Aug 12 02:59:17 PDT 2008

Hi Teresa,

In Tools|Options|Save, uncheck the 'Always create backup copy' option.

--
Cheers
macropod
[MVP - Microsoft Word]

"Teresa" <Teresa@discussions.microsoft.com> wrote in message news:71100396-5018-4551-9955-5AC9937EFBC6@microsoft.com...
> When I save a doc. a back up copy is always saved. I do not want this. How do
> I stop it please.

Top

Re: how do i stop saving a back up saved file by Graham

Graham
Tue Aug 12 02:59:56 PDT 2008

You can stop it from tools > options > general, but I would urge you not to.
It solves far more problems than it creates and you can always periodically
delete unwanted backups when you are sure you will no longer need them.

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

Teresa wrote:
> When I save a doc. a back up copy is always saved. I do not want
> this. How do I stop it please.

Top