如何在Excel中的多个工作表中的相同单元格中创建列表?

网友投稿 180 2023-12-22

如何在Excel中的多个工作表中的相同单元格中创建列表?

假设我们将每个月度销售表部署在一个单独的工作表中,如下图所示,所有销售表的布局都相同。 现在,我们要根据多个工作表中的所有总和值(单元格E6)创建一个列表。 如何完成? 如果要根据每个工作表的总和创建一个动态列表怎么办? 有两种方法供您选择:

使用VBA在多个工作表的同一单元格中创建列表

使用跨多个工作表的相同单元格创建动态列表 Kutools for Excel

轻松地将多个工作表/工作簿合并为一个工作表/工作簿

将来自不同工作簿的数十张工作表合并到一张工作表中可能会很乏味。 但是随着 Kutools for Excel“ 合并(工作表和工作簿) 实用程序,只需单击几下就可以完成!

全功能免费试用 30-天!
使用VBA在多个工作表的同一单元格中创建列表

使用以下VBA代码,您可以轻松地从多个工作表中的指定单元格创建列表。 您可以执行以下操作:

步骤1:选择要从中创建列表的指定单元格。 在本例中,我们选择单元格E6。

步骤2:按 其他 + F11 同时打开“ Microsoft Visual Basic for Applications”窗口,单击 插页 > 模块,然后将以下代码粘贴到模块窗口中。

VBA:从多个工作表中的相同单元格创建列表

Sub CreateList() Dim xAddWs As Worksheet Dim xWs As Worksheet Dim RngAddress As String xTitleId = "KutoolsforExcel" RngAddress = Application.ActiveCell.Address Set xAddWs = Application.ActiveWorkbook.Sheets.Add xAddWs.Name = xTitleId i = 1 For Each xWs In Application.ActiveWorkbook.Worksheets If xWs.Name <> xTitleId Then xAddWs.Cells(i, 1).Value = xWs.Range(RngAddress).Value i = i + 1 End If Next End Sub
Copy

步骤3:按 F5 键或单击 运行 按钮以运行此VBA。

如何在Excel中的多个工作表中的相同单元格中创建列表?

然后将所有工作表上指定单元格中的所有值复制到名为 Kutools对于 Excel。 看截图:

此VBA会将列表填充到新的工作表中,并且列表中的值是静态的,不会随原始值更改。

但是,有时您可能希望将列表填充到指定范围内,并要求列表值始终始终与指定单元格中的原始值相对应。 为了满足这些需求,您应该尝试以下方法。

使用跨多个工作表的相同单元格创建动态列表 Kutools for Excel

此方法将介绍 Kutools for Excel动态参考工作表 实用程序从多个工作表中的相同单元格创建动态列表。

Kutools for Excel - 包括 300 多个方便的 Excel 工具。 全功能免费试用 30-天,无需信用卡! 立即免费试用!

第1步:选择要填充动态列表的范围,然后点击 Kutools > 更多 > 动态参考工作表.

第2步:在打开的“填写工作表引用”对话框中,

(1)点击 填写订单 框,然后从下拉列表中选择一种填充类型。 在我们的情况下,我们选择 垂直填充单元格;

(2)在 填写公式 框中,指定要从中创建动态列表的单元格地址,然后单击 按键  锁定公式。

(3)点击 填充范围 按钮。

现在,您将看到所有工作表中指定单元格中的值均已填充到指定范围内,如下图所示:

当原始值更改时,此指定列表中的相应值将自动更改。

Kutools for Excel - 包括 300 多个方便的 Excel 工具。 全功能免费试用 30-天,无需信用卡! 立即行动吧!

演示
Kutools for Excel 包括适用于Excel的300多种便捷工具,可以在30天之内免费试用。 立即下载并免费试用!
相关文章:

如何将同一单元格从不同的工作表自动填充到Excel中的工作表?

最佳办公生产力工具

将小时转化为分钟 Kutools for Excel!

准备好增强您的 Excel 任务了吗? 利用的力量 Kutools for Excel - 您终极的节省时间的工具。 简化复杂的任务并像专业人士一样浏览数据。 以闪电般的速度体验 Excel!

为什么需要 Kutools for Excel

🛠️  超过 300 项强大功能: Kutools 包含 300 多项高级功能,可简化您在 1500 多种场景中的工作。

📈  卓越的数据处理能力:合并单元格、删除重复项并执行高级数据转换 - 所有这些都不费吹灰之力!

⏱️  高效的批量操作:当你可以聪明地工作时,为什么还要付出额外的努力呢? 轻松批量导入、导出、组合和调整数据。

📊  定制的图表和报告:访问各种附加图表并生成富有洞察力的报告。

🗄️  强大的导航窗格:通过强大的列管理器、工作表管理器和自定义收藏夹获得优势。

📝  七种类型的下拉列表:通过各种功能和类型的下拉列表使数据输入变得轻而易举。

🎓  用户友好:对于初学者来说轻而易举,对于专家来说是一个强大的工具。

立即下载,与 Excel 一起穿越时空!

阅读更多 免费下载... 采购... 
Office Tab 为 Office 带来选项卡式界面,让您的工作更轻松
在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。 每天将您的工作效率提高50%,并减少数百次鼠标单击!
阅读更多 免费下载... 采购... 

版权声明:本文内容由网络用户投稿,版权归原作者所有,本站不拥有其著作权,亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容,请联系我们jiasou666@gmail.com 处理,核实后本网站将在24小时内删除侵权内容。

上一篇:如何在Excel中创建到特定文件夹的超链接?
下一篇:如何从工作簿中创建所有工作表名称的列表?
相关文章