0710 EXCEL窗体工具栏课后整理.docx
- 文档编号:18099165
- 上传时间:2023-08-13
- 格式:DOCX
- 页数:14
- 大小:257.58KB
0710 EXCEL窗体工具栏课后整理.docx
《0710 EXCEL窗体工具栏课后整理.docx》由会员分享,可在线阅读,更多相关《0710 EXCEL窗体工具栏课后整理.docx(14页珍藏版)》请在冰点文库上搜索。
0710EXCEL窗体工具栏课后整理
EXCEL窗体工具栏
主讲
leaf教授(341799277)
特邀嘉宾
小刀(28860417)
特邀嘉宾
andysky(670218239)
主办人
断岩沐雨(304527220)
笔录人
笔锋侠(86994549)
时间:
2007-7-10晚上20:
00-22:
00
地点:
VB小筑(VBAEXCEL:
15979474)
课后整理:
笔锋侠86994549
二〇〇七年七月十日
目录
○、合作阵容:
3
一、窗体工具栏的基本用法3
1.1组合框4
1.2复选框5
1.3微调项6
1.4列表框7
1.5选项按钮7
1.6分组框8
1.7标签9
1.9滚动条9
1.10按钮10
二、Excel对话框5.0简介10
三、窗体工具栏相关技巧12
2.1通过VBA设置列表框的高度12
2.2通过VBA设置按钮的不可用12
○、合作阵容:
以下是技术联盟群现场转播群名和人员一览表:
转播地址
转播人员
新手1班
如水淡淡(467648379)
新手2班
小糊涂(344138489)
新手3班
如水淡淡(467648379)
函数班(后1小时:
赵俭409661877)
紫映竹(3756933)
数组班(后1小时:
赵俭409661877)
紫映竹(3756933)
VBA班
呼吸(727817110)
EXCEL学习群
小糊涂(344138489)
EXCEL交友群
白兔(185862121)
EXCELHOME
白兔(185862121)
EXCEL数据库
白兔(185862121)
EXCEL会计应用
白兔(185862121)
EXCEL
白兔(185862121)
EXCELVBA群
白兔(185862121)
EXCEL吧ZSH站
哈哈215643142
EXCEL技術雜壇
含笑.百合(184815974)
OFS四小龙-_-EXCEL
含笑.百合(184815974)
EXCEL+ACCESS+SQLSVR
沉静如海(58146346)
EXCEL欢乐群
沉静如海(58146346)
EXCEL吧—ZSS
冲小爬(116789560)
EXCEL–吧
展翅(393901342)
OFFICE技术交流群
展翅(393901342)
EXCELVBA-HTCAD
建83代红岩铺(476916077)
感谢以上热情的转播!
一、窗体工具栏的基本用法
【课前说明】操作过程中,所用到的附件请见工作簿《窗体工具栏示例》,所有示例均在此工作簿中。
先认识一下“窗体工具栏”,打开EXCEL,通过如下步骤可以看到窗体工具栏:
【视图】->【工具栏】->【窗体】,窗体工具栏如下图所示:
组合式列表编辑框
图1、窗体工具栏
注意:
因时间关系,下图中灰色的内容今天不讲。
1.1组合框
新建一个Excel工作薄,在工作表1中,点击上图中的“组合框”,在Excel工作表中画出一个适当大小的组合框。
鼠标右键点击这个组合框,选择【设置控件格式】->【控制】,如下图所示:
按照上图进行设置,点击“确定”,结果如右图所示:
。
点击这个组合框,就会显示出星期一到星期日的列表项。
当点击下拉列表的某一项时,发现E3的值跟着变化,星期一对应E3的值是1,星期三对应E3的值是3。
E3的值之所以会变动(与列表框链接),就是因为上图的界面中设置的“单元格链接(Celllink)”是$E$3。
E3的位置是"单元格链接",这里E3值代表了选择了哪行列表项目。
这个值告诉了你选择的是第几个列表项,这样对于做数据分析的时候就很比处理文本串(“星期一”)方便多了。
【※提问】把绝对引用改为相对引用有影响吗?
主要是圈定引用范围。
可以为相对引用,也可以利用名称!
!
【※提问】点击这个下拉列表框时,列表框为何出现个滚动条?
之所以有滚动条,是因为在设置控件格式的时候设置了“下拉显示项数为”5,也就是说列表框中一页显示5行信息,它小于最大条数。
上来就讲这个,目的是为了让大家感情的认识一下,窗体工具栏可以做什么。
窗体工具栏一方面可以为工作表设置一些更加友好的用户界面,让用户对数据的选择及处理更加方便。
另一方面,窗体工具栏是为MSEXCEL5.0Dialog服务的。
关于Excel对话框的信息之后会给大家简单介绍一下。
接下来把窗体工具栏的剩余按钮部分讲解一下。
1.2复选框
点击“复选框”按钮,在C13的位置画一个复选框,这个复选框用来表示简历中是否过了英语四级的信息。
选择这个复选框,鼠标右键可以设置复选框的标题,设置标题为“过英语四级”,具体设置信息见下图:
接下来设置控件的格式,如下图:
其中“已选择”是控件属性的值(默认值),表示控件的状态是处于选择的。
“单元格链接”表示控件的值反映到的单元格,这里面是E13,点击“确定”回到工作表界面。
结果如下图所示:
1.3微调项
同样,在工作表的C18位置画一个微调项
,设置控件格式如下图:
点击“确定”,回到工作表看效果。
C17表示年龄,也是控件的“单元格链接”值。
点击微调按钮的上、下箭头按钮,就可以调整年龄的值。
最小值2表示最小只能调到2,即最小年龄是2;最大值30000表示最大可以调到30000,表示最大年龄是30000。
当然这个值对于人类来说肯定不合理,你可以将这个值调整到100试试看。
步长,表示点击微调项的上、下按钮时的步长,即增加多少值或减少多少值。
比如这个值设置为5,当前值为15,点击上、下按钮的时候只能调到10或20。
设置这个属性值不代表微调项不可以设置值为13,它的最小值2、最大值30000决定了13是合法的,只要手工在C17单元格中输入13即可。
值得一提的是步长是在0~最大值(整理者:
最大值与最小值之差)之间的数。
1.4列表框
它与组合框大同小异,具体细节不讲了,自己研究。
1.5选项按钮
在C30:
C32位置放三个选项按钮。
这三个选项按钮表示求和函数的答案选项,设置它们的标题分别为AVERAGE,MAX,SUM(标题设置方法和复选框是一样的)。
如下图所示:
点击“确定”,点击这几个选项按钮,看看E30的变化。
提示设置控件格式的时候你会发现,设置一个控件格式,其它两个控件格式的值自动被设置了。
1表示选择的是第一个选项,以此类推,但如果想设置一组选项,你会发现没办法,再放上去的选项按钮会被Excel认为与前面三个按钮是一组的。
为解决这个问题,看接下来的“分组框”。
提示在没有分组框的情况下,整个的选项按钮组以一个工作表为容器。
1.6分组框
分组框的目的是分而治之,在B36:
D39、B41:
D44位置放置两个分组框
。
这两个分组框分别表示性别和已婚情况,在两个分组框内分别再放两个选项按钮,如下图:
提示一个分组框就是一个容器
黄色区域就是两组选项按钮的“单元格链接”值对应的区域。
其实Excel的工作表本身就是个容器,所以可以在工作表内放置若干对象,放置的对象不仅仅是窗体控件中的按钮了,图形、图表、图片,OLE对象等。
而窗体工具栏中的分组框其实不是真正意义上的分组,具体为什么不讲了,大家知道就可以了。
1.7标签
它的作用就是用来显示文本的,而Excel有文本框,所以可以不用它。
这里也不复杂,跳过,到下一控件。
1.9滚动条
接下来为大家展示一个有意思的例子,这个例子是让你的一个图片变成Excel界面的放大镜。
在C52、C54位置放置两个滚动条,分别表示行范围、列范围。
如上图添加好滚动条之后,参照下图设置参数:
行滚动条:
列滚动条:
其中E52对应的是行范围的值,E54对应的是列范围的值。
这里面有一个属性值“页步长”,点击非滑块区域其实就是表示翻页,只是在这里不是翻页的概念。
然后在G51位置插入一个图片,然后定义一个名称:
rZoomRange=OFFSET($A$1,0,0,$E$52,$E$54),点击插入的图片,在公式编辑栏中输入=rZoomRange然后看效果。
然后调整图片大小为G52:
J57,调节两个滚动条的值看图片的变化。
1.10按钮
在B61位置放一个“按钮”,在弹出的对话框的“宏名”中输入btnFillCellColor_Clic,点击“录制”,设置当前单元格填充色(背景色)为黄色(整理者:
注意,一定要是当前单元格,点击“录制”之后,不要再进行选择单元格的操作),停止录制。
这个时候,随便点击个单元格,再点击这个按钮,看效果。
接下来给大家简单的介绍一下MSExcel5.0对话框。
二、Excel对话框5.0简介
在工作表标签上点击鼠标右键,选择“插入”,在弹出的对话框中选择“MSExcel5.0对话框”。
如下图所示:
点击“确定”,进入如下界面:
在打开的界面中为对话框表重新名称为“对话框制作”。
上图中看到的类似窗体的东西就是对话框的核心内容,用它可以模拟个窗体出来。
设置窗体标题为“年龄计算器”,插入三个标签,一个文本框,并为标签设置标题,同时为文本框名称为txtBirthday(在公式编辑栏中改名)。
年龄值对应的标签名称改为lblAge,鼠标右键点击文本框,指定宏中输入txtBirthDay(这个是默认值),点击New(新建)按钮,这时自动跳到VBE的代码窗口,将下面代码复制进去:
SubtxtBirthDay()
WithThisWorkbook.DialogSheets("对话框制作")
IfIsDate(.EditBoxes("txtBirthDay").Text)Then
.Labels("lblAge").Caption=DateDiff("yyyy",CDate(.EditBoxes("txtBirthDay").Text),Date)
Else
.Labels("lblAge").Caption="<未知>"
EndIf
EndWith
EndSub
一个简单的宏对话框就做完了,下面来显示这个对话框。
按ALT+F11回到Excel界面,在对话框界面点击鼠标右键,点击“执行对话框”选项,这时就会显示出窗体了。
在“你的生日”文本框中输入你的生日看看有什么效果?
为对话框显示增加一个动作入口点:
新建一个工作表,放置一个按钮,鼠标或键,指定宏,输入btnShowAgeDialog_Click,点击“新建”。
这时自动进入VBE的代码窗口,完善代码如下:
SubbtnShowAgeDialog_Click()
ThisWorkbook.DialogSheets("对话框制作").Show
EndSub
按ALT+F11键回到Excel界面,取消按钮的选择,点击按钮,看效果。
关于窗体控件和主要内容已经全部讲完。
最后补充一点技巧,对于组合框,你会发现它的高度缩小到一程度后就不能再小了。
其实它的高度是可以再小的,不过,要借助VBA,请见下节。
三、窗体工具栏相关技巧
2.1通过VBA设置列表框的高度
选中这个组合框,按ALT+F11键打开VBE窗口,按Ctrl+G打开立即窗口,在立即窗口中输入Selection.Height=13,回车就Ok了。
13可以任意改。
DialogSheets是ThisWorkbook的隐藏成员,打开对象浏览器(VBE界面按F2),在对象浏览器中点击鼠标右键,点击“显示隐藏的成员及属性”,就能够在VBE窗口中看到DialogSheets了。
2.2通过VBA设置按钮的不可用
既然窗体控件工具栏中的控件叫“控件”,那就具备控件的一个通用属性,即是否可用。
这个也是可以设置的,只不过同样需要借助VBA。
ThisWorkbook.DialogSheets("对话框制作").Buttons
(1).Enabled=False
这样,按钮就不可用了。
上面语句中,Buttons
(1),可以用控件的名字代替1,其中Buttons也是隐藏属性,类似的还有EditBox(es)编辑框,Label(s)标签等等。
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 0710 EXCEL窗体工具栏课后整理 EXCEL 窗体 工具栏 课后 整理