VB.NET中Excel操作实用命令代码示例
在VB.NET编程中,访问和操作Excel电子表格是一种常见的需求。本文将介绍如何使用VB.NET与Excel 2012进行交互,包括创建Excel应用实例、设置可见性、打开工作簿、激活工作表、读写单元格值、调整列宽和行高、插入分页符以及修改边框样式和页面设置等关键操作命令。 首先,我们创建一个Excel应用程序对象,通过`new Excel.Application()`初始化,并设置其可见状态为true,以便用户看到操作效果: ``` Dim myexcel As New Excel.Application() myexcel.Visible = True ``` 接着,我们可以通过`.Workbooks.Add()`方法创建一个新的Excel工作簿,然后通过索引来激活特定工作表,例如,选择第二张工作表: ``` myexcel.Workbooks.Add() myexcel.Worksheets(2).Activate() ``` 读写Excel单元格是基础操作,例如设置单元格D1的值为100: ``` myexcel.Cells(1, 4).Value = 100 ``` 如果需要批量修改单元格范围内的值,可以使用`.Range`对象,如设置D1至D3区域的值: ``` myexcel.Range("D1:D3").Value = {100, 200, 300} ``` 调整列宽和行高时,可以指定行列的索引和宽度或高度,如将第一列的宽度设为20个字符单位: ``` myexcel.ActiveSheet.Columns(1).ColumnWidth = 20 ``` 对于行高,同样可以设置为固定尺寸,如1厘米: ``` myexcel.ActiveSheet.Rows(1).RowHeight = 1 / 0.0351 ' 1厘米的像素值 ``` 分页符的插入和删除也很重要,比如在第20行插入分页符: ``` myexcel.ActiveSheet.Rows(20).PageBreak = True ``` 此外,还可以控制边框样式,例如为B3:D3区域的边框设置粗细为3磅: ``` myexcel.ActiveSheet.Range("B3:D3").Borders(1).Weight = Excel.XlBorderWeight.xlThick ``` 最后,关于页面设置,我们可以设置页眉的居中内容,如包含页码`"&p"`, 并确保在每次打印时刷新: ``` myexcel.ActiveSheet.PageSetup.CenterFooter = "&p" ' 带有页码的中心页眉 ``` 页眉的宽度和页眉、页脚之间的间距可以根据需要调整。通过这些命令,VB.NET可以灵活地操控Excel文件,实现丰富的数据处理和格式化功能。
2012-11-08 09:24:47| 分类: VB.NET |举报|字号 订阅
下载LOFTER我的照片书 |
首先,须在项目里引用: 添加引用->Com->Microsoft Excel 9.0 Object Library (这是EXCEL2000)
1 打开Excel: dim myexcel as new Excel.Application() myexcel.visible=true
2 添加新的工作簿: myexcel.Workbooks.add()
3 设定第二个工作表为活动工作表: myexcel.worksheets(2).Acivate()
4 打开指定的Excel文件: myexcel.workbooks.open("c:\my.xls")
5 显示Excel窗口: myexcel.visible=true
6 更改Excel的标题栏: myexcel.caption="欢迎,欢迎!"
7 为Excel的单元格赋值: myexcel.cells(1,4).value=100 此语句使Excel当前工作表的第一行第四列,即D1单元格等于100, 也可以这样写: myexcel.Range("D1").value=100
8 设置指定列的宽度(单位:字符个数): myexcel.ActiveSheet.colums(1).columnwidth=20 设定当前工作表第1列的宽度为20
9 设置指定行的高度(单位:磅): myexcel.ActiveSheet.rows(1).rowHeight=1/0.035 1磅 =0.035厘米 设置第1行的高度为1CM
10 插入分页符: myexcel.Activesheet.rows(20).pagebreak=1 在第20行前插入分页符
11 删除分页符: myexcel.Activesheet.columns(20).pagebreak=0 在第20列前删除分页符
12 指定边框线的宽度: myexcel.Activesheet.range("B3:D3").borders(1).weight=3 其中borders参数指定单元格边框的位置: 1:左 2:右 3:顶 4:底 5:斜\ 6:斜/
下载后可阅读完整内容,剩余4页未读,立即下载
- 粉丝: 0
- 资源: 4
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
最新资源
- 李兴华Java基础教程:从入门到精通
- U盘与硬盘启动安装教程:从菜鸟到专家
- C++面试宝典:动态内存管理与继承解析
- C++ STL源码深度解析:专家级剖析与关键技术
- C/C++调用DOS命令实战指南
- 神经网络补偿的多传感器航迹融合技术
- GIS中的大地坐标系与椭球体解析
- 海思Hi3515 H.264编解码处理器用户手册
- Oracle基础练习题与解答
- 谷歌地球3D建筑筛选新流程详解
- CFO与CIO携手:数据管理与企业增值的战略
- Eclipse IDE基础教程:从入门到精通
- Shell脚本专家宝典:全面学习与资源指南
- Tomcat安装指南:附带JDK配置步骤
- NA3003A电子水准仪数据格式解析与转换研究
- 自动化专业英语词汇精华:必备术语集锦