Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. TyphoonDIGITS

    Microsoft Marco to "Save As" in a specified folder on desktop.

    Can you copy and paste this code with your alterations so it asks me what to name my file? This does what I want except the naming thing. Thanks for your response! Sub CustomerService() ' ' CustomerService Macro ' ' Selection.WholeStory Selection.Font.Size = 8...
  2. TyphoonDIGITS

    Microsoft Marco to "Save As" in a specified folder on desktop.

    How about this one. I think I can just make one macro for each folder but I want the program to ask me what to name each file before saving. Any ideas? I think i have to add something to replace the ActiveDocument.SaveAS FileName:="xxx" xxx part. Help! Sub CustomerService() ' '...
  3. TyphoonDIGITS

    Microsoft Marco to "Save As" in a specified folder on desktop.

    Here's what I've got so far. Sub Macro1() ' ' Macro1 Macro ' ' Selection.WholeStory Selection.Font.Size = 8 ChangeFileOpenDirectory "C:\Users\my.name\Desktop\SPECIFIEDFOLDER\" ActiveDocument.SaveAS FileName:="nameofdoc.docx", FileFormat:= _ wdFormatText...
  4. TyphoonDIGITS

    Microsoft Marco to "Save As" in a specified folder on desktop.

    Can this be done? I want it to perform these steps in this order. 1. Highlight all and change font to 8. 2. Save to one of several folers on desktop. 2.. I will be making a bunch of these macros to use with each having their own specified folder. Need help with the starting code for this.

Part and Inventory Search

Back
Top