1.首句从tab开始缩进

规范书写代码

专门的学业命名:依照进程相关性,有含义的单词,首字母大写

标准缩进:

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