ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
楼主: 山菊花

不懂VBA也编程

  [复制链接]

TA的精华主题

TA的得分主题

发表于 2008-12-8 22:00 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助

回复 134楼 山菊花 的帖子

本帖已被收录到知识树中,索引项:数据类型和基本语句
老师的"为工作簿添加目录"的思路真是妙.3个实例,层层深入.
但是一旦插入新的sheet,却回不到目录上去了.估计这个问题在老师手中也不成问题吧.

另外,想请问一下,编写代码的开头一句如何确定,有什么规律与语法要求.像您在134楼写的代码首句各表示什么意思,能注释一下吗_____还未入门呵,见笑了
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

[ 本帖最后由 xpm130 于 2008-12-8 22:15 编辑 ]

TA的精华主题

TA的得分主题

发表于 2008-12-8 22:10 | 显示全部楼层
“山菊花”是我久仰的诲人不倦的大师! 跟着学习了!

TA的精华主题

TA的得分主题

 楼主| 发表于 2008-12-8 23:01 | 显示全部楼层
原帖由 xpm130 于 2008-12-8 22:00 发表 (138楼)
但是一旦插入新的sheet,却回不到目录上去了.估计这个问题在老师手中也不成问题吧.

不是问题。
解决的办法有三个。
1、选择新工作表的一个单元格,输入“返回目录”,然后再用键盘或鼠标选择它。
2、在VBE窗口中,按Ctrl+G打开立即窗口,输入:
Sheets("目录").visible=1
回车。
3、如下图所示,在VBE的工程管理器中,选择“目录”模块,按F4打开属性窗口,修改Visible属性值为-1。
属性.jpg


原帖由 xpm130 于 2008-12-8 22:00 发表 (138楼)
另外,想请问一下,编写代码的开头一句如何确定,有什么规律与语法要求.像您在134楼写的代码首句各表示什么意思,能注释一下吗_____还未入门呵,见笑了
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

当用键盘或鼠标选择新的单元格区域时,触发工作表的SelectionChange事件,运行“Private Sub Worksheet_SelectionChange(ByVal Target As Range)”至“End Sub”之间的程序。
在VBE窗口右上角,有个帮助窗口,输入“SelectionChange”,回车,可查询有关帮助内容。

关于事件,请参考帖子:
VBA入门之三《夏夜,我们看萤火虫》:http://club.excelhome.net/thread-183192-1-1.html

TA的精华主题

TA的得分主题

发表于 2008-12-9 01:17 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
学习 学习 。

TA的精华主题

TA的得分主题

发表于 2008-12-9 07:56 | 显示全部楼层

感谢深夜回贴

老师真是诲人不倦,您在昨夜11点多了还回贴指导,深深感动.当加倍努力学习!

TA的精华主题

TA的得分主题

发表于 2008-12-9 11:02 | 显示全部楼层

“山菊花”是我久仰的诲人不倦的大师

跟着学习了!

TA的精华主题

TA的得分主题

发表于 2008-12-10 16:05 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2008-12-11 09:07 | 显示全部楼层
不错,虽然已近60,还是觉的学学不但有用,而且有趣,呵呵,请山菊花继续提供好的东西

TA的精华主题

TA的得分主题

发表于 2008-12-11 11:48 | 显示全部楼层

先谢谢“山”老师!

我仅知道Excel的一点函数皮毛,同事们就称我为“高手”,我心里也知道自己桶里仅有一点水,只是在晃动,别人看起来好象很多。工作中很多问题是需要VBA来解决的,本人也曾买过此类的书,但看不懂。而别人又经常问这问那我也没有办法解决。今天一口气全部下载,回去慢慢消化。所以要非常地谢谢!
本人目前就遇到类似目录的查找问题,用函数一直没有解决。我的目录是关于人事的数据库,总人数、男、女各多少、年龄分组等,另列一个查找,结果遇到同名同姓的就没有办法了.。真要好好学习。

TA的精华主题

TA的得分主题

发表于 2008-12-11 13:48 | 显示全部楼层
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-12-23 00:09 , Processed in 0.037326 second(s), 8 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表