VB打印excel vba输出

Private Sub Command1_Click()
Dim S() As String, FileName As String, i As Integer, j AsInteger
Dim xlApp
Dim xlBook
Dim xlSheet
FileName = App.Path & "1.xls"'程序所在目录下的文件,请修改
Set xlApp =CreateObject("Excel.Application")'创建EXCEL对象
VB打印excel vba输出
xlApp.DisplayAlerts =False'不显示对话框
Set xlBook =xlApp.Workbooks.Open(FileName)'打开已经存在的EXCEL工件簿文件
xlApp.Visible =True'设置EXCEL对象可见
Set xlSheet=xlBook.Worksheets("Sheet1")'设置活动工作表
xlSheet.Cells(1, 1) = ""'清除单元格内容
xlSheet.Cells(1, 1) =1'修改单元格内容
xlSheet.PrintOut '打印工作表
xlBook.SaveAsFileName:=FileName'保存工作表,结束时一定别忘了保存
xlBook.Close(True) '关闭工作簿这里的True表示退出时保存修改
xlApp.quit'结束EXCEL对象
Set xlApp =Nothing'释放xlApp对象
End Sub

  

爱华网本文地址 » http://www.aihuau.com/a/25101011/44190.html

更多阅读

excel VBA编程入门教程 精 excel vba编程入门

上回看到“excel 编程入门教程”求助贴,不料被别人捷足先登。没想到今天又看到这个求助经验贴,而且又有优先评优支持当然要领取了。本人也算上个世纪的编程老鸟,虽然对于当前的主流技术不是非常精通,但是对于Excel VBA,还是略知一二的。

ExcelVBA之快速上手 excel vba教程

Excel VBA之快速上手转载第一章VBA语言基础第一节 标识符一.定义标识符是一种标识变量、常量、过程、函数、类等语言构成单位的符号,利用它可以完成对变量、常量、过程、函数、类等的引用。二.命名规则1) 字母打头,由字母、数字和下划线

傻瓜都会用Excel VBA教你怎么用VBA excel vba 实例

傻瓜都会用Excel VBA(教你怎么用VBA)——简介VBA是Excel的底层根本。只有明白使用最底层的东西,使用起来才能随心所欲。对于多数读者而言,由于未使用过VBA或者不具备计算机语言知识,所以被VBA直白的语句所

用VB操作Excel的方法 vb6.0操作excel2010

VB是常用的应用软件开发工具之一,由于VB的报表功能有限,而且一但报表格式发生变化,就得相应修改程序,给应用软件的维护工作带来极大的不便。因此有很多程序员现在已经充分利用EXECL的强大报表功来实现报表功能。但由于VB与EXCEL由于分别

声明:《VB打印excel vba输出》为网友岁月并非如歌分享!如侵犯到您的合法权益请联系我们删除