注册 登录
编程论坛 VB6论坛

敬请各位高手查看 Excel(2003)的工作簿是否有隐藏的代码?谢谢。

HVB6 发布于 2014-11-01 11:56, 1106 次点击
附件的“人员”工作表的A列(A2开始)是设置数据有效性,但却看不到这方面的代码,为何?
只有本站会员才能查看附件,请 登录

敬请各位高手帮忙查看一下。
7 回复
#2
xzlxzlxzl2014-11-01 19:28
代码都是在视图--宏--点选所需宏名--编辑,然后就看到代码了,比如你人员表里的让a2开始有效,大概就是下述代码完成的吧

Sub 提取姓名()
'
' 提取姓名 Macro
' 宏由 微软用户 录制,时间: 2013-2-21
'





x = Sheets("人员").Range("A65535").End(xlUp).Row - 1 '统计人员表行数
  
 s = ""
For i = 2 To x + 1     '大概i=2就是从第二行开始抽取人名吧
 s = s + Sheets("人员").Range("b" & CStr(i)) + "、"
.
.
.
#3
HVB62014-11-01 20:53
回复 2 楼 xzlxzlxzl
单击附件的“人员”工作表的A列(A2开始)的一个单元格,
此单元格的右边就出现一个倒三角按钮,点击此按钮,
出现一列数据:早
            上
            中
            下
            晚
            夜

但附件中的所有代码中,却无这一列数据的“字体”,为何?
#4
xzlxzlxzl2014-11-01 22:16
这是在编辑表格时设定的,不需要代码,比如:点选B2---按住shift键不放,同时点选B20,这时会选择b2到b20的单元格,点击菜单>>数据>>有效性>>允许:序列>>来源:可以输入具体值, 如“男,女”>>确定,这时,你点取表格b2,你会发现有倒三角按钮了,并出现“男,女”的选项。
在百度里搜索“excel如何把单元格做成组合框的样式”就会找到,我也是刚刚百度学到的。其实我excel连做个简单的统计都不会。
#5
xzlxzlxzl2014-11-01 22:27
发图片试试
只有本站会员才能查看附件,请 登录

只有本站会员才能查看附件,请 登录
#6
HVB62014-11-01 22:57
回复 5 楼 xzlxzlxzl
截图很漂亮,是如何上传帖子里?
#7
静夜思2014-11-01 23:02
以下是引用HVB6在2014-11-1 22:57:39的发言:

截图很漂亮,是如何上传帖子里?

只有本站会员才能查看附件,请 登录
#8
HVB62014-11-02 08:30
回复 7 楼 静夜思
[attach]77772[/attach]
测试成功。谢谢。

[ 本帖最后由 HVB6 于 2014-11-2 08:32 编辑 ]
1