VBA(制作自定义按钮)
(2010-08-13 21:50:09)
标签:
杂谈 |
分类: VBA |
第一章
1)制作自定义按钮的那个ExceI文件不能被删除,不能被移动位置,所在的文件夹不
能改名,否则单击这个按钮的时候,不会有预期的执行结果。
2)修改新菜单或定义按钮时必须进入“工具栏—自定义—框架”中,否则,右击修改不会有效果;
3)如果文件名为:auto_open的程序就会自动执行;但按住Shift键,文件就不会自动运行了。
第二章 用Excel VBA 选择和操作 Excel 对象
sub 选择并赋值()——宏文件名
End Sub——宏结尾
1. 当前工作表中活动单元格(Activecell)
ActiveSheet 当前工作簿中的当前工作表,即当前编辑的Excel文件中正在编辑的工作表...activecell
当前工作表中活动单元格...ActiveChart 当前工作簿中的活动图表
2、Formula
公式, 方程式
3、Rem 后面的句子叫“注释语句”,注释语句在程序中是不会被执行的;
4、temp 变量
第一节
sub aaaa()
end sub
sub aaaa()
rem 选择第1行第2列的单元格
cells(1,2).select
activecell.value=888
end sub
sub aaaa
row_il=1
clm_il=2
temp=888
cells(row_il,clm_il).select
activecell.value=temp
end sub
sub aaaa
sheets("seet1").cells(1,2).value=888
end sub
sub aaaa
temp=cells(1.1).value
cells(2.3).value=temp
end sub
第二节
sub bbbb
cells(1,1).value=avtivecell.row
cells(2,3).value=avtivecell.column
end sub
第三节
rang("a1:a3").select
计算选中的单元格
temp1=selection.rows.count
temp2=selection.columns.count
cells(1,1).value=temp1
cells(1,2).value=temp2
第四节 选择范围之内的单元格循环
sub cccc
k=1
for each c in selection
temp=c.value
if temp>9 then
cells(k,5).value=temp
k=k+1
end if
next c
第五节
19页
end sub

加载中…