懒码农。。。。。。

  博客园 :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理 ::

2010年6月21日

摘要: Dim strExcelFilePath,objDialog,tfileSet objDialog = CreateObject("UserAccounts.CommonDialog")objDialog.Filter = "Excel 2003|*.xls|Excel 2007|*.xlsx"objDialog.InitialDir = CreateObject( "WScript.Shell"... 阅读全文
posted @ 2010-06-21 16:13 阿彬 阅读(2657) 评论(0) 推荐(0) 编辑