Find a batch macro WORD
[Users questions | Browse:34 | Favorites]
Users questions: Requirements: a folder where all the WORD file (of course this folder all files are WORD format, no other formats) and then click open, select all, font size set to fifth, you can save out.
Experts answer: This is actually very simple, a few lines of code can be compiled instantaneously, Do not have a file to a file, the entire batch automation and save off. To Word2003, for example. Word2007 similar. First, you can use Word to open all the DOC files, then the menu "Tools **- Macro", enter the macro name: All documents small fifth, In the "Macros" Select "Normal.dot (global template), then click" Create ", copy and paste the following code inside it. Whether you are 20 or 50 to open the document, we can say is instantaneous in this is through a loop through all open documents to operate. Doc variable is defined as a document type document, and the Documents on behalf of all open documents, then the ForEach loop through all open documents, each document and select all fonts set to the 9th word (ie, a small No. 5). For later convenience, you You can select the menu "Tools **- custom", click "order" tab on the left "Category" to find the "macro" to the right of this macro command onto the toolbar, click Toolbar after this point button on it, you can also click on the window below the "keyboard" button, find the above, This macro command to set a shortcut. Later want to use an absolute super-convenient. Whether to save or both save and close up to you (you can modify the code), if a new document and the document is never saved the file name, the pop-up "Save As" dialog box, open the document if all , Is automatically saved and closed. Sub all documents small V () OnErrorResumeNextDimdocAsDocumentForEachdocInDocumentsWithdoc.Activate.Applic ation.Selection.WholeStory 'Select All. Application.Selection.Font.Size = 9' font size to 9 (that is, Xiao No.5). Save 'to save the document. Close' close the document E ndWithNextdocEndSubscreen.width*0.35)this.width=screen.width*0.40 *
Experts answer: This is actually very simple, a few lines of code can be compiled instantaneously, Do not have a file to a file, the entire batch automation and save off. To Word2003, for example. Word2007 similar. First, you can use Word to open all the DOC files, then the menu "Tools **- Macro", enter the macro name: All documents small fifth, In the "Macros" Select "Normal.dot (global template), then click" Create ", copy and paste the following code inside it. Whether you are 20 or 50 to open the document, we can say is instantaneous in this is through a loop through all open documents to operate. Doc variable is defined as a document type document, and the Documents on behalf of all open documents, then the ForEach loop through all open documents, each document and select all fonts set to the 9th word (ie, a small No. 5). For later convenience, you You can select the menu "Tools **- custom", click "order" tab on the left "Category" to find the "macro" to the right of this macro command onto the toolbar, click Toolbar after this point button on it, you can also click on the window below the "keyboard" button, find the above, This macro command to set a shortcut. Later want to use an absolute super-convenient. Whether to save or both save and close up to you (you can modify the code), if a new document and the document is never saved the file name, the pop-up "Save As" dialog box, open the document if all , Is automatically saved and closed. Sub all documents small V () OnErrorResumeNextDimdocAsDocumentForEachdocInDocumentsWithdoc.Activate.Applic ation.Selection.WholeStory 'Select All. Application.Selection.Font.Size = 9' font size to 9 (that is, Xiao No.5). Save 'to save the document. Close' close the document E ndWithNextdocEndSubscreen.width*0.35)this.width=screen.width*0.40 *
- There are several new methods of presentation, simply out of.
- What word in how to increase the special symbols
- excel how to filter and distinguish between the number of consecutive
- How will the characters in the cell and breakdown of figures show?
- How to set excel in the integer "0" format
- How to convert PDF text editable word or TXT
- How could such a problem?
- Help explain, EXCEL function of usage, there are accessories.
- Why not let me see My Network Places?
- EXCEL delivery table and more, how do
- This information provided by the users.Thanks!
Computer Knowledge Copyright 2005-2015 All Rights Reserved.