Dim xlApp
Dim xlBook
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open("C:\BAK\Test.xlsm", 0, True)
xlApp.Run "TestOutter"
xlBook.Close
xlApp.Quit
Set xlBook = Nothing
Set xlApp = Nothing
WScript.Quit
posted @
2016-10-27 00:15 萍水相逢 閱讀(148) |
評論 (0) |
編輯 收藏持續更新中
Editor --> EditPlus / Notepad++ / UltraEdit
FTP client --> FlashFXP / FileZilla
SSH and telnet client --> Putty
Office 2010 --> Excel / PowerPoint / Word / OneNote
五筆輸入法 --> 念青五筆 / 萬能五筆
瀏覽器 --> IE8 / Firefox / Google Chrome / Safari / 360
IDE --> Eclipse / RAD / RTC
DB --> DB2 / MySQL
Middleware --> MQ / Websphere
OS --> Win7 / Linux / AIX / OS X
Mobile OS --> IOS / Android / S60 / WinCE / S40
Source control --> SVN / CVS
Zip and Unzip --> WinRAR / 7-Zip / BetterZip
RSS reader --> Feeddemon / Vienna
Mail client and news reader --> Windows Live Mail
GPS --> 凱立德
云存儲 --> 百度云
Build & deploy --> Ant / Maven
Compare --> Beyond compare
即時翻譯 --> IBM智能辭典
Programming & scripting --> Java / HTML / VBS / VBA / Shell script / Cron job / Perl script / Bat script / Javascript / SQL
Social media --> QQ / 新浪微博
Logging framework --> Log4j / Log4E / SLF4J
虛擬光驅 & 刻錄 --> DAEMON Tools / Alcohol / Ashampoo Burning Studio
殺毒軟件 --> Microsoft Security Essentials / Avast
中特軟件 --> Psiphon / Hotspot Shield
視頻播放 --> Microsoft Media Center / 完美解碼
音頻相關 --> Monkey's Audio
下載工具 --> 迅雷 / BitTorrent
posted @
2013-10-22 12:27 萍水相逢 閱讀(178) |
評論 (0) |
編輯 收藏