使用宏重命名包含单元格内容的 Excel 工作表

您所在的位置:网站首页 excel对工作表重新命名 使用宏重命名包含单元格内容的 Excel 工作表

使用宏重命名包含单元格内容的 Excel 工作表

#使用宏重命名包含单元格内容的 Excel 工作表| 来源: 网络整理| 查看: 265

分步:使用宏重命名包含单元格内容的 Excel 工作表 项目 04/13/2023 适用于: Excel for Microsoft 365, Excel 2019, Excel 2016, Excel 2013, Excel 2010, Excel 2007, Excel 2003

本文由 Microsoft MVP Raddini Rahayu 撰写。

情况

以下是每周销售活动报告。 例如,本例中有 15 人。 管理员报表 Nancy 将每个销售数据汇总到一个文件中,其中所有销售在每个工作表上都分隔。 为了轻松排列数据,Nancy 给出的每个工作表名称都与该工作表上的销售名称匹配。 起初,Nancy 对此感到自在,但随着数据的增加和快速处理的需求,Nancy 非常不知所措。 为了克服此问题,Nancy 希望根据每个工作表上的销售名称自动更改名称表,而无需手动重命名。

解决方案

克服南希问题的最佳解决方案是使用宏。 此宏专为该文件中的每个工作表设计,而不考虑工作表的数量。 每个工作表的名称将根据已在每个工作表的相同位置确定的销售名称进行更改。

如何执行 第一步

设计报表格式并指定将放置销售名称的单元格位置。 在这种情况下,位置位于单元格 J2 中。 此报表格式应在每个工作表上相同。

将工作表名称保留在默认名称 (Sheet1、Sheet2、Sheet3 等) 。

最后一步 宏编码步骤

在了解将放置销售名称的单元格位置后,现在我们可以继续下一步,即宏编码。

在 “开发人员” 选项卡上,选择“代码”类别中的 Visual Basic ,或在键盘上按键组合 Alt+F11,以便显示 Visual Basic 窗口。

在项目任务窗格中,单击 (工作簿名称) ,然后在 “插入” 菜单上选择 “模块 ”并编写以下脚本:

Sub RenameSheet() Dim rs As Worksheet For Each rs In Sheets rs.Name = rs.Range("B5") Next rs End Sub

按键盘上的 F5 键,如果没有调试,请关闭 Visual Basic 窗口并返回到 Excel。 如果已调试,请检查脚本。

返回到 Excel,查看如果代码正确,现在每个工作表的名称将根据每个工作表上的现有销售名称进行重命名。

就是这样。 希望有用。

第三方信息免责声明

本文中提到的第三方产品由 Microsoft 以外的其他公司提供。 Microsoft 不对这些产品的性能或可靠性提供任何明示或暗示性担保。



【本文地址】


今日新闻


推荐新闻


CopyRight 2018-2019 办公设备维修网 版权所有 豫ICP备15022753号-3