VBS操作Excel常见方法
作者 佚名
来源 ASP编程
浏览
发布时间 2013-07-09
复制代码 代码如下: Dim Excel Set Excel = CreateObject("Excel.Application") ''不显示提示信息,这样保存的时候就不会提示是否要覆盖原文件 Excel.DisplayAlerts=FALSE ''调用EXCEL文件的时候不显示 Excel.visible=FALSE Excel.workbooks.open("D:\test.XLS") ''将sheet1设置为活动sheet Excel.workbooks(1).activate ''插入行,这条我找MSDN都没找到,最后乱试试出来的 Excel.ActiveSheet.rows(1).insert Excel.ActiveSheet.Cells(1,1).Value = Date Excel.ActiveSheet.Cells(1,2).Value = "row1" Excel.ActiveSheet.Cells(1,3).Value = "comment1" Excel.ActiveSheet.rows(2).insert Excel.ActiveSheet.Cells(2,1).Value = Date Excel.ActiveSheet.Cells(2,4).Value = "row2" Excel.ActiveSheet.Cells(2,7).Value = "comment2" Excel.save Excel.quit Set Excel = Nothing Excel.ActiveSheet.rows(1).insert 不用找MSDN，在EXCEL帮助中就能找到，看“编程信息”/“Microsoft Excel Visual Basic 参考”/“属性”/“Q-R”/“Rows 属性”的介绍，和“编程信息”/“Microsoft Excel Visual Basic 参考”/“方法”/“I-L”/“Insert 方法”的介绍，就能明白这条语句的语法。 因为在EXCEL的VBA中，“Rows”、“Columns”、“Cells”属性返回的都是Range对象，所以对它们的应用可以等同Range对象的应用。 例如：你在EXCEL的VBA编辑器中可以这样写 cells(1,1).value="abc" cells(1,1).wraptext=false 在写这些语句时，你应该注意到，在写完“cells(1,1).”之后，并没有弹出应该弹出的属性/方法列表，但是这些语句确实可以正常运行。 我的方法是：在EXCEL中录制宏，然后在EXCEL的VBA编辑器中修改语句，调试运行无误后再粘贴到VBS语句中，进行适当的修改。 |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢! |
你可能对下面的文章感兴趣
关于VBS操作Excel常见方法的所有评论
