VB操作EXCEL文件
用VB操作Excel(VB6.0)(整理)
首先创建Excel对象,使用ComObj:
Dim ExcelID as Excel.Application
Set ExcelID as new Excel.Application
1)显示当前窗口:
ExcelID.Visible:=True
2)更改Excel标题栏:
ExcelID.Caption:='应用程序调用MicrosoftExcel'
3)添加新工作簿:
ExcelID.WorkBooks.Add
4)打开已存在的工作簿:
ExcelID.WorkBooks.Open('C:\Excel\Demo.xls')
5)设置第2个工作表为活动工作表:
ExcelID.WorkSheets[2].Activate
或ExcelID.WorkSheets['Sheet2'].Activate
6)给单元格赋值:
ExcelID.Cells[1,4].Value:='第一行第四列'
7)设置指定列的宽度(单位:字符个数),以第一列为例:
ExcelID.ActiveSheet.Columns[1].ColumnsWidth:=5
8)设置指定行的高度(单位:磅)(1磅=0.035厘米),以第二行为例:
ExcelID.ActiveSheet.Rows[2].RowHeight:=1/0.035;//1厘米
9)在第8行之前插入分页符:
ExcelID.WorkSheets[1].Rows[8].PageBreak:=1
10)在第8列之前删除分页符:
ExcelID.ActiveSheet.Columns[4].PageBreak:=0
11)指定边框线宽度:
ExcelID.ActiveSheet.Range['B3:D4'].Borders[2].Weight:=3
1-左 2-右 3-顶4-底 5-斜(\) 6-斜(/)
12)清除第一行第四列单元格公式:
ExcelID.ActiveSheet.Cells[1,4].ClearContents
13)设置第一行字体属性:
ExcelID.ActiveSheet.Rows[1].Font.Name:='隶书'
ExcelID.ActiveSheet.Rows[1].Font.Color :=clBlue
ExcelID.ActiveSheet.Rows[1].Font.Bold :=True
ExcelID.ActiveSheet.Rows[1].Font.UnderLine:=True
14)进行页面设置:
a.页眉:
ExcelID.ActiveSheet.PageSetup.CenterHeader:='报表演示'
b.页脚:
ExcelID.ActiveSheet.PageSetup.CenterFooter:='第&P页'
c.页眉到顶端边距2cm:
ExcelID.ActiveSheet.PageSetup.HeaderMargin:=2/0.035
d.页脚到底端边距3cm:
ExcelID.ActiveSheet.PageSetup.HeaderMargin:=3/0.035
e.顶边距2cm:
ExcelID.ActiveSheet.PageSetup.TopMargin:=2/0.035
f.底边距2cm:
ExcelID.ActiveSheet.PageSetup.BottomMargin:=2/0.035
g.左边距2cm:
ExcelID.ActiveSheet.PageSetup.LeftMargin:=2/0.035
h.右边距2cm:
ExcelID.ActiveSheet.PageSetup.RightMargin:=2/0.035
i.页面水平居中:
ExcelID.ActiveSheet.PageSetup.CenterHorizontally:=2/0.035
j.页面垂直居中:
ExcelID.ActiveSheet.PageSetup.CenterVertically:=2/0.035
k.打印单元格网线:
ExcelID.ActiveSheet.PageSetup.PrintGridLines:=True
15)拷贝操作:
a.拷贝整个工作表:
ExcelID.ActiveSheet.Used.Range.Copy
b.拷贝指定区域:
ExcelID.ActiveSheet.Range['A1:E2'].Copy
c.从A1位置开始粘贴:
ExcelID.ActiveSheet.Range.['A1'].PasteSpecial
d.从文件尾部开始粘贴:
ExcelID.ActiveSheet.Range.PasteSpecial
16)插入一行或一列:
a.ExcelID.ActiveSheet.Rows[2].Insert
b.ExcelID.ActiveSheet.Columns[1].Insert
17)删除一行或一列:
a.ExcelID.ActiveSheet.Rows[2].Delete
b.ExcelID.ActiveSheet.Columns[1].Delete
18)打印预览工作表:
ExcelID.ActiveSheet.PrintPreview
19)打印输出工作表:
ExcelID.ActiveSheet.PrintOut
20)工作表保存:
IfnotExcelID.ActiveWorkBook.Savedthen
ExcelID.ActiveSheet.PrintPreview
Endif
21)工作表另存为:
ExcelID.SaveAs('C:\Excel\Demo1.xls')
22)放弃存盘:
ExcelID.ActiveWorkBook.Saved:=True
23)关闭工作簿:
ExcelID.WorkBooks.Close
24)退出Excel:
ExcelID.Quit
25)设置工作表密码:
ExcelID.ActiveSheet.Protect"123",DrawingObjects:=True,Contents:=True,Scenarios:=True
26)EXCEL的显示方式为最大化
ExcelID.Application.WindowState=xlMaximized
27)工作薄显示方式为最大化
ExcelID.ActiveWindow.WindowState=xlMaximized
28)设置打开默认工作薄数量
ExcelID.SheetsInNewWorkbook=3
29)关闭时是否提示保存(true保存;false不保存)
ExcelID.DisplayAlerts=False
30)设置拆分窗口,及固定行位置
ExcelID.ActiveWindow.SplitRow=1
ExcelID.ActiveWindow.FreezePanes=True
31)设置打印时固定打印内容
ExcelID.ActiveSheet.PageSetup.PrintTitleRows="$1:$1"
32)设置打印标题
ExcelID.ActiveSheet.PageSetup.PrintTitleColumns=""
33)设置显示方式(分页方式显示)
ExcelID.ActiveWindow.View=xlPageBreakPreview
34)设置显示比例
ExcelID.ActiveWindow.Zoom=100
35)让Excel响应DDE请求
Ex.Application.IgnoreRemoteRequests=False
摘录自:http://www.cnblogs.com/rosesmall/p/5048705.html
VB操作EXCEL文件的更多相关文章
- VB操作EXCEL文件大全
Private Sub writeToExcel(strTmp1() As String, colTmp1 As Collection)'' Dim tmp1 Dim i1 As Integer, i ...
- Java生成和操作Excel文件(转载)
Java生成和操作Excel文件 JAVA EXCEL API:是一开放源码项目,通过它Java开发人员可以读取Excel文件的内容.创建新的Excel文件.更新已经存在的Excel文件.使用该A ...
- Java生成和操作Excel文件
JAVA EXCEL API:是一开放源码项目,通过它Java开发人员可以读取Excel文件的内容.创建新的Excel文件.更新已经存在的Excel文件.使用该API非Windows操作系统也可以通过 ...
- java 操作excel 文件
JAVA EXCEL API:是一开放源码项目,通过它Java开发人员可以读取Excel文件的内容.创建新的Excel文件.更新已经存在的Excel文件.使用该API非Windows操作系统也可以通过 ...
- java使用Apache POI操作excel文件
官方介绍 HSSF is the POI Project's pure Java implementation of the Excel '97(-2007) file format. XSSF is ...
- C#操作Excel文件(转)
摘要:本文介绍了Excel对象.C#中的受管代码和非受管代码,并介绍了COM组件在.net环境中的使用. 关键词:受管代码:非受管代码:Excel对象:动态连接库 引言 Excel是微软公司办公自动化 ...
- 记录python接口自动化测试--把操作excel文件的方法封装起来(第五目)
前面补充了如何来操作excel文件,这次把如何获取excel文件的sheet对象.行数.单元格数据的方法进行封装,方便后面调用 handle_excel.py# coding:utf-8 import ...
- python3:操作excel文件
前提:自动化接口测试中,可以将用例放在excel中管理.结合实际情况讲解如何操作excel文件 1.安装xlrd:pip install xlrd 2.导入模块:import xlrd 3.打开Exc ...
- python 操作Excel文件
1 安装xlrd.xlwt.xlutils cmd下输入: pip install xlrd #读取excel pip install xlwt #写入excel pi ...
随机推荐
- CRC32
CRC32生成多项式:X32+X26+X23+X22+X16+X12+X11+X10+X8+X7+X5+X4+X2+X+1 对应的16进制表示为:0x4C11DB7 下面贴CRC32查表法生成代码: ...
- python读取文件夹
import os def getFiles(rootDir): if os.path.isfile(rootDir): print(rootDir) elif os.path.isdir(rootD ...
- JSONP是如何工作的
我对这个问题的探究来源于一个需求: 当访问某个页面的时候,需要向另外一个网站报告一下这次访问的信息. 其实发一个跨域的请求就能大致实现这个需求.我们发跨域的例子其实很常见,例如请求一个第三方的图片.引 ...
- SqlServer按中文数字排序
表数据: 按名称排序 并不能得到一二三四五六的顺序 select * from LiWei order by name 找到中文数字在'一二三四五六七八九十'的位置 select id,name,SU ...
- Ajax入门(一)
最近开始学习Ajax了0.0,虽然其他的还没巩固,但既然学了就先写下来吧... Ajax的定义呢,百度吧= =...就觉得最实用的地方就是页面无刷新,但网页实现了与后台的同步更新. 1, 首先创建 ...
- 【WPF】最近在学习wpf 的绑定,,
最近在学习wpf 的绑定,,1.简单的说就是版前端和后端用自己的方法给分开了2.baseVm 模型 baseCmd 命令3.命令传参修改的只是界面里的属性,而不修改其它的值4.前端改变后端, 后端改变 ...
- 详解三种缓存过期策略LFU,FIFO,LRU(附带实现代码)
在学操作系统的时候,就会接触到缓存调度算法,缓存页面调度算法:先分配一定的页面空间,使用页面的时候首先去查询空间是否有该页面的缓存,如果有的话直接拿出来,如果没有的话先查询,如果页面空间没有满的时候, ...
- php设计模式--面向对象
php链式操作的实现: 特点:1.链式操作一般存在于面向对象的情况下链式操作才有意义 /* * SQL语句组合实例类,始发文章web开发笔记 * 学习用,非专业类 * */ class sql{ pr ...
- Servlet中以HashMap存放临时变量,解决跳转新页面请求参数过多时浏览器地址栏超长
具体使用方法如下: 1.在跳转之前将需要的参数串encodeURIComponent后作为参数value,UUID作为key一起POST到Servlet保存到HashMap中: 2.在Servlet发 ...
- Vue.js基础篇实战--一个ToDoList小应用
距离开始学Vue已经过去一个多月了,总想把学到的东西柔和在一起,做点东西出来,于是有了这个Todolist小应用. 使用vuex 纯粹基础,没有用到web pack,vuex,npm,下次把它改造一下 ...