VBA专题学习

VBA_learning | 2019-08-23 20:13:03 | 阅读 162 次 | 评论(3)

规范书写代码

规范命名:根据过程相关性,有意义的单词,首字母大写

规范缩进:

1.首句从tab开始缩进

2.遇if与for内语句用tab缩进

3.遇嵌套时继续tab缩进

必要注释

=======================================================

 构建知识体系:

对象->属性->方法   

 

三大对象:

1.工作簿

2.工作表 sheet

3.单元格

三种属性:

1.name属性

包含后缀

2.path属性

返回的是工作簿所在文件夹路径

3.fullname属性

返回的是工作簿的完整路径

 

方法:是动态的,是动作

工作表:新增,激活,删除

新增worksheets.add

激活worksheets("sheet2").activate

删除Worksheets(1).Delete

工作簿:

新增workbooks.add

打开Workbooks.Open "完整路径"

事件:满足某条件一瞬间的触发器(代码)

       是针对对象而言的

激活工作表

 activate

点开工作表会出发事件

工作表改变选择项

 selection change

所选择的项改变会触发事件        

工作表内容有任何变动

 change

工作表的事件要放到工作表里,不可能放在模块

thisworkbook:

打开工作簿 open

关闭工作簿 beforeclose

 

窗体:是一张画布;一个前端

作画工具:控件

后台:工作表可以作为后台

控件:安全控件,默认的

     不安全控件,ocx第三方控件,dll动态链接库

 

======================================

代码:

Dim

定义变量

Sub

函数头

Msgbox

弹出消息

Thisworkbook

当前代码所在的工作簿

Activeworkbook

正在激活的工作簿

工作表代码表示方式:

1.worksheets("sheet1")  

名称引用

2.worksheets(1)

索引引用 顺序:用目测

3.codename

直接sheet1.  sheet2.

单元格代码表示方式:

1.range

2.cells   

1.单个单元格

2.单元格区域

3.单元格地址的引用

======================================

判断

If  条件 then 

Else if

End if

 

循环

批处理多工作表:

1.for each

2.for

 

for i = 2 to worksheets.count

next i

 

======================================

练习:

给每个工作表固定位置赋值:

获取每个工作表指定单元格数据:

拆分工作表为工作簿

sht.copy

activeworkbook.saveas filename:=thisworkbook.path & "\" & sht.name & ".xlsx"

 ActiveWorkbook.Close True

文章评论,共3条
Avatar
1楼: Cyberoe2 发表于 2019-08-23 20:13   回复
随着学习的进度更新笔记
Avatar
2楼: qunxingw 发表于 2019-08-28 17:06   回复
vab 像特种兵的一把匕首
Avatar
3楼: Cyberoe2 发表于 2019-09-13 12:23   回复
以下是引用qunxingw在2019-08-28 17:06的发言1

vab 像特种兵的一把匕首
^_^ 新手刚开始学
游客请输入验证码
文章分类
文章归档
阅读排行