自动化测试——Excel的自动化(VBA)
2013-12-31 16:11
274 查看
1.定义全局变量:Public xx,不用赋值
2.选中单元格:
3.插入行:(插入列类似)
4.删除:
5.获取当前表的路径
6.获取当前路径下的所有文件
7.设置单元格的值
8.打开另外一张Excel表
9.设置函数:
10.获取字符
11.Collection 与dictionary:
之所以提到他们,是因为有时候需要动态的数组的时候,用他们的Add方法比较方便。要要注意的是用dictionary的时候不能像Collection.Item(index)来获取值,而是需要重新定义两个数组,分别得到dictionary的Items 与Keys,然后再用数组的index来获值。此外dictionary有个exists方法,类似于某种语言的contain方法.....
12.函数:
"=COUNTIFS(D21:D92,"U",E21:E92,"<>")" ,相对应的U的行,不为空的行数的和
"=COUNTIF(D21:D92,""*H*"")" ,带有H的行数
13.随机整数,取模: Int(Rnd * 100 + 1) Mod 3
14.设置单元格背景颜色:
15.其实,VBA,VBS,VB.net毕竟都是VB一家的,很多内置函数用法上基本一样,像Instr,Ubound,Lcase,Split......
16.借用代码:
不知道文明处理的时候,可以先录制宏,然后借用它的代码。。。。。
‘获取当前sheet的名字 Public sName sName = ActivateSheet.Name
2.选中单元格:
Worksheets(sName).Range(strRange).Select
3.插入行:(插入列类似)
Selection..EntireRow.Insert
4.删除:
Selection.EntireRow.Delete
5.获取当前表的路径
currentFilePath = ThisWorkbook.Path
6.获取当前路径下的所有文件
set fso = CreateObject("Scripting.FileSystemObject") set tmpFolder = fso.GetFolder(currentFilePath) set allFiles = tmpFolder.Files
7.设置单元格的值
worksheets(1).Cells(row,column).Value = "xxx" Range(strRagne).value = "xxx"
8.打开另外一张Excel表
Dim exlB As New Excel.Application Dim WsheetB As Excel.Worksheet exlB.Workbooks.Open (ExlPath) Set WsheetB = exlB.Sheets(sName) If WsheetB.Name = "" Then Set WsheetB = exlB.Worksheets(1) End If Set WsheetB = Nothing exlB.Workbooks.Close Set exlB = Nothing exlB.Quit
9.设置函数:
worksheets(1).Cells(row,column).Value = "=SUM(A1:A2)"
10.获取字符
'如需得到"E“,则可以这样 Cstr(Chr(69))
11.Collection 与dictionary:
之所以提到他们,是因为有时候需要动态的数组的时候,用他们的Add方法比较方便。要要注意的是用dictionary的时候不能像Collection.Item(index)来获取值,而是需要重新定义两个数组,分别得到dictionary的Items 与Keys,然后再用数组的index来获值。此外dictionary有个exists方法,类似于某种语言的contain方法.....
12.函数:
"=COUNTIFS(D21:D92,"U",E21:E92,"<>")" ,相对应的U的行,不为空的行数的和
"=COUNTIF(D21:D92,""*H*"")" ,带有H的行数
13.随机整数,取模: Int(Rnd * 100 + 1) Mod 3
14.设置单元格背景颜色:
Worksheets(2).Cells(row, column).Interior.ColorIndex = 2 ’白色:2,黄色:6
15.其实,VBA,VBS,VB.net毕竟都是VB一家的,很多内置函数用法上基本一样,像Instr,Ubound,Lcase,Split......
16.借用代码:
不知道文明处理的时候,可以先录制宏,然后借用它的代码。。。。。
相关文章推荐
- 数据分析(入门篇)-第四章-让报告自动化(VBA)-Part1(Excel报告自动化)
- [原创]VBA实现汇总excel,将多个Excel文件内容复制到一个Excel文件中
- Excel VBA - 遍历某个文件夹中文件、文件夹及批量建立txt
- 使用UI Automation实现自动化测试--7.2 (模拟键盘复杂操作在自动化测试中的应用)
- 自动化测试的类型以及对测试自动化的几个误区
- ★★★Excel-VBA操作文件四大方法之三
- selenium自动化测试中,采用jxl实现参数化(从Excel中读取数据)
- [自动化平台系列] - 初次使用 Macaca-前端自动化测试(3)
- VBA中操作Excel常用方法总结
- vba 读取excel
- 用python做自动化测试--Andriod App 的自动化-Appium的那些坑
- 各种Excel VBA的命令
- Excel+VBA+之快速上手
- 重大改变!Python或将取代VBA,成为Excel官方脚本语言!
- Python或将取代VBA,成为Excel官方脚本语言
- 【VBA】EXCEL通过VBA生成SQL,自动生成创建表结构SQL
- 自动化测试===【转】Robot Framework作者建议如何选择自动化测试框架
- 用VBA创建EXCEL表的桌面快捷
- Access 2007/2010 VBA查询结果导出为Excel 2007文件
- 用VBA实现Excel中某单元格不能为空