| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1106 人关注过本帖
标题:敬请各位高手查看 Excel(2003)的工作簿是否有隐藏的代码?谢谢。
只看楼主 加入收藏
HVB6
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:15
帖 子:322
专家分:561
注 册:2013-10-30
结帖率:98.36%
收藏
已结贴  问题点数:20 回复次数:7 
敬请各位高手查看 Excel(2003)的工作簿是否有隐藏的代码?谢谢。
附件的“人员”工作表的A列(A2开始)是设置数据有效性,但却看不到这方面的代码,为何?
排班表(考勤版).rar (79.8 KB)

敬请各位高手帮忙查看一下。
搜索更多相关主题的帖子: 工作表 Excel 
2014-11-01 11:56
xzlxzlxzl
Rank: 15Rank: 15Rank: 15Rank: 15Rank: 15
来 自:湖北
等 级:贵宾
威 望:125
帖 子:1091
专家分:5825
注 册:2014-5-3
收藏
得分:10 
代码都是在视图--宏--点选所需宏名--编辑,然后就看到代码了,比如你人员表里的让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)) + "、"
.
.
.
2014-11-01 19:28
HVB6
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:15
帖 子:322
专家分:561
注 册:2013-10-30
收藏
得分:0 
回复 2 楼 xzlxzlxzl
单击附件的“人员”工作表的A列(A2开始)的一个单元格,
此单元格的右边就出现一个倒三角按钮,点击此按钮,
出现一列数据:早
            
            
            
            
            

但附件中的所有代码中,却无这一列数据的“字体”,为何?
2014-11-01 20:53
xzlxzlxzl
Rank: 15Rank: 15Rank: 15Rank: 15Rank: 15
来 自:湖北
等 级:贵宾
威 望:125
帖 子:1091
专家分:5825
注 册:2014-5-3
收藏
得分:0 
这是在编辑表格时设定的,不需要代码,比如:点选B2---按住shift键不放,同时点选B20,这时会选择b2到b20的单元格,点击菜单>>数据>>有效性>>允许:序列>>来源:可以输入具体值, 如“男,女”>>确定,这时,你点取表格b2,你会发现有倒三角按钮了,并出现“男,女”的选项。
在百度里搜索“excel如何把单元格做成组合框的样式”就会找到,我也是刚刚百度学到的。其实我excel连做个简单的统计都不会。
2014-11-01 22:16
xzlxzlxzl
Rank: 15Rank: 15Rank: 15Rank: 15Rank: 15
来 自:湖北
等 级:贵宾
威 望:125
帖 子:1091
专家分:5825
注 册:2014-5-3
收藏
得分:0 
发图片试试
图片附件: 游客没有浏览图片的权限,请 登录注册

图片附件: 游客没有浏览图片的权限,请 登录注册
收到的鲜花
  • HVB62014-11-01 22:54 送鲜花  3朵   附言:非常感谢
2014-11-01 22:27
HVB6
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:15
帖 子:322
专家分:561
注 册:2013-10-30
收藏
得分:0 
回复 5 楼 xzlxzlxzl
截图很漂亮,是如何上传帖子里?
2014-11-01 22:57
静夜思
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:济南的冬天
等 级:管理员
威 望:11
帖 子:8902
专家分:2567
注 册:2004-3-25
收藏
得分:10 
以下是引用HVB6在2014-11-1 22:57:39的发言:

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

图片附件: 游客没有浏览图片的权限,请 登录注册
收到的鲜花
  • HVB62014-11-02 08:34 送鲜花  3朵   附言:测试成功。谢谢。

畅所欲言
2014-11-01 23:02
HVB6
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:15
帖 子:322
专家分:561
注 册:2013-10-30
收藏
得分:0 
回复 7 楼 静夜思
[attach]77772[/attach]
测试成功。谢谢。

[ 本帖最后由 HVB6 于 2014-11-2 08:32 编辑 ]
2014-11-02 08:30
快速回复:敬请各位高手查看 Excel(2003)的工作簿是否有隐藏的代码?谢谢。
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015951 second(s), 10 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved