MacTech Network:   MacTech Forums  |  MacForge.net  |  Computer Memory  |  Register Domains  |  Cables  |  iPod Deals  |  Mac Deals  |  Mac Book Shelf


  MacTech Magazine

The journal of Macintosh technology

 
 

Magazine In Print
  About MacTech  
  Home Page  
  Subscribe  
  Archives DVD  
  Submit News  
  MacTech Forums  
  Get a copy of MacTech RISK FREE  
Google
Entire Web
mactech.com
Mac Community
More...
MacTech Central
  by Category  
  by Company  
  by Product  
MacTech News
  MacTech News  
  Previous News  
  MacTech RSS  
Article Archives
  Show Indices  
  by Volume  
  by Author  
  Source Code FTP  
Inside MacTech
  Writer's Kit  
  Editorial Staff  
  Editorial Calendar  
  Back Issues  
  Advertising  
Contact Us
  Customer Service  
  MacTech Store  
  Legal/Disclaimers  
  Webmaster Feedback  

Moving from Microsoft Office VBA to AppleScript:
MacTech's Guide to Making the Transition

Introduction  |  Table of Contents

Page Prev and Page Next buttons at bottom of the page.

Would you like a hard copy
or PDF of this Guide?

You can get a hard copy sent to you
AND download a PDF now ($19.95)
, or

... just download a PDF ($9.95).

Either way, you get a complimentary
MacTech Magazine Subscription

courtesy of the
Microsoft Mac Business Unit


 

  Magazine Reg. Price:  $50.00 value  
  Guide Reg. Price:  $40.00 value  
  You Save:  over $80.00!  

April, 2007
Page 21



Be ware that when you set an attached template to a document, you will get the Macro Alert warning if your Preferences have that option checked in Security preferences and your template contains macros. (It looks as if you could turn that off temporarily via the automation security property in application, but that doesn't seem to work, which is probably a good thing. It's probably not a bug, but an intentional security feature. They ought to remove it rather than disable it, however.) Of course this should not be an issue in Office 2008 where macros won't work anyway.

Here's the workaround:

set templatePath to "Mac HD:Applications:" & Â

     "Microsoft Office 2004:My Templates:Test Template.dot"

tell application "Microsoft Word"

     set newDoc to make new document

     set attached template of newDoc to templatePath

     insert file at text object of newDoc file name templatePath

end tell

Since we need to use the template path twice we set a variable templatePath to it. If you want to include the page setup settings (the margins, etc.) – a good idea – use the following longer version. It feels like a bit of a hack to have to open the template, but it's so instantaneous that you may not even notice it (its text is the same as the document will have a moment later):

set templatePath to "Mac HD:Applications:" & Â

     "Microsoft Office 2004:My Templates:Test Template.dot"

tell application "Microsoft Word"

     activate

     set newDoc to make new document

     set attached template of newDoc to templatePath

    

   set theTemplate to attached template of newDoc -- a template object now

     set editableTemplate to open as document theTemplate -- a document

     set pageSetupProps to properties of (get page setup of editableTemplate)

     set lineNumberProps to properties of (get line numbering of pageSetupProps)

     close editableTemplate saving no

     tell page setup of newDoc

          set its properties to pageSetupProps

          tell its line numbering

              set its properties to lineNumberProps

          end tell

     end tell

  



 


Click here to find out more about our best subscription bundle deal ever!
2 years of the magazine, and the all new MacTech DVD ... at 70% off!



Click on the cover to
see this month's issue!

TRIAL SUBSCRIPTION
Get a RISK-FREE subscription to the only technical Mac magazine!
 
Nokia Qt Beta
 


MacTech Magazine. www.mactech.com
Toll Free 877-MACTECH, Outside US/Canada: 805-494-9797

Register Low Cost (ok dirt cheap!) Domain Names in the MacTech Domain Store. As low as $1.99!
Save on brand compatible and name brank ink jet and laser supplies.
Save on long distance * Upgrade your Computer
Movies with No Late Fees!

See local info about Westlake Village
SJ * BRJ * BJ * OJ * NITS
Staff Site Links



All contents are Copyright 1984-2008 by Xplain Corporation. All rights reserved.

MacTech is a registered trademark of Xplain Corporation. Xplain, Video Depot, Movie Depot, Palm OS Depot, Explain It, MacDev, MacDev-1, THINK Reference, NetProfessional, NetProLive, JavaTech, WebTech, BeTech, LinuxTech, Apple Expo, MacTech Central and the MacTutorMan are trademarks or service marks of Xplain Corporation. Sprocket is a registered trademark of eSprocket Corporation. Other trademarks and copyrights appearing in this printing or software remain the property of their respective holders.