首页 > 其他分享 >VBA代码解决方案第十七讲:如何选择一个工作表,如何选择多个工作表

VBA代码解决方案第十七讲:如何选择一个工作表,如何选择多个工作表

时间:2024-08-31 19:52:35浏览次数:15  
标签:VBA 17 代码 mynz 第十七 选择 工作 Select

《VBA代码解决方案》(版权10028096)这套教程是我最早推出的教程,目前已经是第三版修订了。这套教程定位于入门后的提高,在学习这套教程过程中,侧重点是要理解及掌握我的“积木编程”思想。要灵活运用教程中的实例像搭积木一样把自己喜欢的代码摆好。

这套教程共三册,一百四十七讲,内容覆盖较广,也是初级和中级间的过渡教程,改版后的内容主要是提供程序源码文件及代码修正为32位和64位兼用代码。今后一段时间会给大家陆续推出。今日的内容是VBA代码解决方案第十七讲:如何选择一个工作表,如何选择多个工作表

VBA代码解决方案第十七讲:如何选择一个工作表,如何选择多个工作表_VBA




【分享成果,随喜正能量】善良的人,总是有福。利己则生,利他则久。心存善良的帮助他人,不是一时兴起,而是要坚持不懈的从实际出发,看到他人所需,切实的帮助到他人。。

第十七讲 如何选择一个工作表,如何选择多个工作表

各位朋友好,今天继续讲解VBA代码解决方案,今天讲解的是第17讲,如何选择一个工作表,如何选择多个工作表。在这一讲中我们将讲解选择单个工作表,选择多个工作表,及遍历工作薄中每个工作表的方法。

1 选择单个工作表的方法

在VBA中需要激活或者选择某个工作表时可以使用Select方法,如下面的代码所示。

代码一:

Sub mynz_17_1() '第17讲 如何选择一个工作表,如何选择多个工作表

Worksheets("17").Select

End Sub


代码截图:

VBA代码解决方案第十七讲:如何选择一个工作表,如何选择多个工作表_解决方案_02



上面的代码非常简单,却是非常有用的,在实际应用中应用的非常广泛。

在VBA中需要激活或者选择某个工作表时也可以使用Activate方法,如下面的代码所示。


代码二:

Sub mynz_17_2() '第17讲 如何选择一个工作表,如何选择多个工作表

Worksheets("17").Activate

End Sub


代码截图:

VBA代码解决方案第十七讲:如何选择一个工作表,如何选择多个工作表_VBA_03



Activate可以视为激活,激活后就可以在这个工作表中进行一些操作了。

代码解析:

a) mynz_17_1过程使用Select方法选择“17”工作表,而mynz_17_2过程则使用Activate方法选择“17”工作表.

b)从表面看两者的作用是相同的,但是如果“17”工作表是隐藏的,Activate方法可以正常运行,而Select方法将会出现错误,这一点要务必注意。

2 选择多个工作表的方法

如果需要同时选中工作簿中的多个工作表,则只能使用Select方法而不能使用Activate方法,如下面的代码所示。

代码三:

Sub mynz_17_3() '第17讲 如何选择一个工作表,如何选择多个工作表

Dim Shs As Worksheet

For Each Shs In Worksheets

Shs.Select False

Next

End Sub


代码截图:

VBA代码解决方案第十七讲:如何选择一个工作表,如何选择多个工作表_VBA_04



  • 注意:工作表不可深度隐藏
    代码四:
    Sub mynz_17_4() '第17讲 如何选择一个工作表,如何选择多个工作表
    Worksheets.Select
    End Sub

    代码截图:
  • 注意:工作表不可深度隐藏


代码五:

Sub mynz_17_5() '第17讲 如何选择一个工作表,如何选择多个工作表

Worksheets(Array("15", "16", "17")).Select

End Sub


代码截图:

VBA代码解决方案第十七讲:如何选择一个工作表,如何选择多个工作表_函数返回_05



代码解析:

a) mynz_17_3过程遍历工作表并使用带参数的Select方法选中所有工作表。应用于Worksheet对象的Select方法的语法如下:


  • Select(Replace)

参数Replace是可选的。如果该值为True,则用指定对象替代当前选定对象。如果该值为False,则延伸当前选定对象以包括任何以前选定的对象


b) mynz_17_4过程使用Worksheets集合的Select方法选中集合中所有的对象。

c) mynz_17_5过程使用Array 函数返回工作簿中的名称为“15”“16”“17”的工作表并使用Worksheets集合的Select方法选中。


3 代码的运行

页面视图:

VBA代码解决方案第十七讲:如何选择一个工作表,如何选择多个工作表_解决方案_06


代码mynz_17_5的运行结果:

VBA代码解决方案第十七讲:如何选择一个工作表,如何选择多个工作表_解决方案_07



今日内容回向:

1 select 方法如何应用?

2 activate 方法如何应用?

3 上述两种方有何不同?



本讲内容参考程序文件:VBA代码解决方案(1-19).xlsm










VBA代码解决方案第十七讲:如何选择一个工作表,如何选择多个工作表_函数返回_08



我20多年的VBA实践经验,全部浓缩在下面的各个教程中:

VBA代码解决方案第十七讲:如何选择一个工作表,如何选择多个工作表_函数返回_09









标签:VBA,17,代码,mynz,第十七,选择,工作,Select
From: https://blog.51cto.com/u_16912668/11883672

相关文章

  • VBA 匹配单元格中的E、N文本,替换写测试用例编号
    '匹配单元格中的E、N文本,替换写测试用例编号SubGetColumnBText()DimtextAsStringDimtargetNAsStringDimtargetEAsStringDimi,j,n,eAsIntegerDimpositionNAsIntegerDimpositionEAsIntegerDimwsAsWorksheetSetws=ThisWorkbook.Worksheets("she......
  • CSP-J 2020 初赛试题解析(第一部分:单项选择题(5-10))
    ......
  • 一个linux服务器安装多个java版本,如何选择指定的 java版本去执行
    linux中有时候可能你由于不同的项目需要使用不同版本的javajdk部署,你就需要在你的linux服务中安装很多个版本的javajdk,那么在linux中如何安装和使用不同版本的javajdk呢?1.安装第一个javajdk版本:到java官网下载一个javajdk版本,并解压,然后配置环境变量。javajdk地址:wge......
  • 10款项目型企业管理系统,选择前需了解
    国内外主流的10款企业项目管理系统对比:PingCode、Worktile、泛微e-office、金蝶云·星瀚、用友项目管理软件、Jira、Monday.com、Asana、Trello、Basecamp。在面对复杂的项目管理需求时,许多企业经常感到手头的工具不足以支撑高效的运作。有效的项目型企业管理系统不仅可以帮......
  • 智能选择:如何筛选合适项目管理软件?
    国内外主流的10款项目管理系统对比:PingCode、Worktile、Teambition、明道云、泛微E-cology、Asana、Trello、Monday.com、ClickUp、Wrike。在项目管理的世界里,选择合适的管理工具似乎是一个令人头疼的问题。你是否经常在众多选项中感到迷茫,不知道哪一个系统能真正提升你的工......
  • 管理农业项目必备 10款项目管理软件评估和选择技巧
    国内外主流的10款农业建设管理系统对比:PingCode、Worktile、建米农业工程项目管理系统、泛普软件的农业项目管理系统、开创云数字农业管理平台、TrimbleAgSoftware、Agworld、FarmLogs、Granular、Conservis。在管理复杂的农业建设项目时,选择合适的管理系统常常让人头疼。......
  • 商贸新锐选择奥哲·云枢低零代码一体化平台,打造数智化All in One
    近日,珠宝行业培育钻石领域商贸新锐克莱梦签约奥哲,借助奥哲·云枢低零代码一体化、AI智能、数据可视化、集成开放等平台能力,为其轻松升级克莱梦核心业务进销存系统,打造数智化AllinOne平台。培育钻石是通过模拟天然钻石的形成过程而合成的人造钻石,它与天然钻石具有相同的物理、......
  • 商贸新锐选择奥哲·云枢低零代码一体化平台,打造数智化All in One
    近日,珠宝行业培育钻石领域商贸新锐克莱梦签约奥哲,借助奥哲·云枢低零代码一体化、AI智能、数据可视化、集成开放等平台能力,为其轻松升级克莱梦核心业务进销存系统,打造数智化AllinOne平台。培育钻石是通过模拟天然钻石的形成过程而合成的人造钻石,它与天然钻石具有相同的物理、......
  • 可用的选择器
    选择器类别选择器用于选择要描述的那个元素,可以理解为HTML元素在CSS中的呈现其类型可以分为全局选择器类别选择器关系选择器类别选择器包括元素选择器伪元素选择器属性选择器类选择器伪类选择器编号选择器关系选择器包括样式相同选择器后代选择器子代选择器邻接......
  • VBA语言専攻简介0831
    VBA语言専攻简介0831在当今世界,几乎没有任何工作是没有计算机的。有些工作需要定期重复相同的过程,最好将它们自动化。一旦任务自动化,只需单击一个按钮即可运行。VBA是实现自动化工作的最为简单的方式,它不需要其他工具,因为它已经与MicrosoftOffice软件集成。VBA是VisualBasicfor......