求助，如果用EXCEL函数获得指定工作簿的名称，另附10种通过VBA形式获得工作簿名的方法

作者：汇星创业网 | 来源：互联网 | 2023-05-19 15:21

如题，我现在写一个公式，想动态获取工作簿的名称如sheet1\sheet2等，还请各位高手赐教一下，非常感激。详细说明：我要写的公式如下：SUMPRODU

如题，我现在写一个公式，想动态获取工作簿的名称如sheet1\sheet2等，还请各位高手赐教一下，非常感激。

详细说明：

    我要写的公式如下：
        =SUMPRODUCT('6月核减'!$F$2:$F$1000*ISNUMBER(FIND(A3,'6月核减'!$B$2:$B$1000))*('6月核减'!$E$2:$E$1000=C3))

    也就是说，我要动态获得“6月核减”这个工作簿名，因为这个是按月份来的，还有7月核减、8月核减....等

另附10种函数方法获取当前工作薄名！

定义名称法9种
1.=MID(GET.CELL(32),2,FIND("]",GET.CELL(32))-2)
2.=GET.WORKBOOK(16)
3.=GET.CELL(66)
4.=GET.DOCUMENT(88)
5.=MID(GET.DOCUMENT(1),2,FIND("]",GET.DOCUMENT(1))-2)
6.=MID(GET.DOCUMENT(76),2,FIND("]",GET.DOCUMENT(76))-2)
7.=MID(GET.WINDOW(1),2,FIND("]",GET.WINDOW(1))-2)
8.=MID(GET.WINDOW(30),2,FIND("]",GET.WINDOW(30))-2)
9.=MID(GET.CELL(62),2,FIND("]",GET.CELL(62))-2)
一种普通函数法
1.=MID(CELL("filename"),FIND("[",CELL("filename"))+1,FIND("]",CELL("filename"))-FIND("[",CELL("filename"))-1)

10 个解决方案

#1

for i=1 to 12

=SUMPRODUCT('" & i & "月核减'!$F$2:$F$1000*ISNUMBER(FIND(A3,'" & i & "月核减'!$B$2:$B$1000))*('" & i & "月核减'!$E$2:$E$1000=C3))

#2

引用 1 楼 li163 的回复:

VB code
for i=1 to 12
=SUMPRODUCT('" & i & "月核减'!$F$2:$F$1000*ISNUMBER(FIND(A3,'" & i & "月核减'!$B$2:$B$1000))*('" & i & "月核减'!$E$2:$E$1000=C3))

li163 你好，非常感谢你的回复

你的意思是只需将表格名称“6月核减”中的“6”换成【" & i & "】吗？
前面的【for i=1 to 12】for循环语句是啥意思咧？这个公式我是要写到excel表格中的喔。不是vba形式

#3

不是vba

#4

额，我按你的方法将“6”换成【" & D6 & "】，行不通喔.直接出现#REF!值了。没有加【for i=1 to 12】for循环语句.

#5

将“6”换成【" & D6 & "】就是字符串拼接操作吧？呵呵

#6

不要用循环了，你根据什么来变化？比如我根据数据（单元格里的月份），也可以根据单元格的信息来变化

#7

'6月核减'
***********
这个到底是工作簿还是工作表？

#8

引用 7 楼 li163 的回复:

'6月核减'
***********
这个到底是工作簿还是工作表？

是工作表sheet!!!!

#9

Option Explicit



'窗体Form1上放一个列表框List1，一个命令按钮Command1，一个通用对话框CommonDialog1

'引用对象库Microsoft Excel 11.0 Object Library

Dim xlExcel As Excel.Application

Dim xlBook As Excel.Workbook

Dim xlSheet As Excel.Worksheet



Private Sub Command1_Click()

    On Error GoTo Errhandler

    CommonDialog1.Filter = "Excel(*.xls) |*.xls|AllFile(*.*)|*.*"

    CommonDialog1.FilterIndex = 1

    CommonDialog1.ShowOpen

    Set xlExcel = New Excel.Application ' CreateObject("Excel.Application")

    xlExcel.Workbooks.Open CommonDialog1.FileName

    Set xlBook = xlExcel.Workbooks(CommonDialog1.FileTitle)

    List1.Clear

    For Each xlSheet In xlBook.Worksheets

        List1.AddItem xlSheet.Name

    Next

    Debug.Print xlBook.Worksheets.Count

Errhandler:

    xlBook.Close

    xlExcel.Quit

    Set xlSheet = Nothing

    Set xlBook = Nothing

    Set xlExcel = Nothing

End Sub



Private Sub Form_Load()

    Command1.Caption = "枚举Excel表中所有sheet表"

End Sub

#10

有直接用函数获得的不？

推荐阅读

text
利用Visual Basic开发SAP接口程序初探的方法与原理

本文介绍了利用Visual Basic开发SAP接口程序的方法与原理，以及SAP R/3系统的特点和二次开发平台ABAP的使用。通过程序接口自动读取SAP R/3的数据表或视图，在外部进行处理和利用水晶报表等工具生成符合中国人习惯的报表样式。具体介绍了RFC调用的原理和模型，并强调本文主要不讨论SAP R/3函数的开发，而是针对使用SAP的公司的非ABAP开发人员提供了初步的接口程序开发指导。 ... [详细]

蜡笔小新 2023-12-13 10:56:31
copy
手把手教你使用GraphPad Prism和Excel绘制回归分析结果的森林图

本文介绍了使用GraphPad Prism和Excel绘制回归分析结果的森林图的方法。通过展示森林图，可以更加直观地将回归分析结果可视化。GraphPad Prism是一款专门为医学专业人士设计的绘图软件，同时也兼顾统计分析的功能，操作便捷，可以帮助科研人员轻松绘制出高质量的专业图形。文章以一篇发表在JACC杂志上的研究为例，利用其中的多因素回归分析结果来绘制森林图。通过本文的指导，读者可以学会如何使用GraphPad Prism和Excel绘制回归分析结果的森林图。 ... [详细]

蜡笔小新 2023-12-10 18:32:57
text
是否可以创建一个struct实例数组？ - Is it possible to create an array of struct instances?

Iamtryingtocreateanarrayofstructinstanceslikethis:我试图创建一个这样的struct实例数组：letinstallers: ... [详细]

蜡笔小新 2023-12-10 15:09:37
list
微软头条实习生分享深度学习自学指南

本文介绍了一位微软头条实习生自学深度学习的经验分享，包括学习资源推荐、重要基础知识的学习要点等。作者强调了学好Python和数学基础的重要性，并提供了一些建议。 ... [详细]

蜡笔小新 2023-12-14 20:58:32
list
学习SLAM的女生，很酷

本文介绍了学习SLAM的女生的故事，她们选择SLAM作为研究方向，面临各种学习挑战，但坚持不懈，最终获得成功。文章鼓励未来想走科研道路的女生勇敢追求自己的梦想，同时提到了一位正在英国攻读硕士学位的女生与SLAM结缘的经历。 ... [详细]

蜡笔小新 2023-12-14 17:55:18
list
伊振华作品 | 沈阳市智慧城市运行管理中心的设计与建设

本文介绍了设计师伊振华受邀参与沈阳市智慧城市运行管理中心项目的整体设计，并以数字赋能和创新驱动高质量发展的理念，建设了集成、智慧、高效的一体化城市综合管理平台，促进了城市的数字化转型。该中心被称为当代城市的智能心脏，为沈阳市的智慧城市建设做出了重要贡献。 ... [详细]

蜡笔小新 2023-12-14 16:35:39
text
向QTextEdit拖放文件的方法及实现步骤

本文介绍了在使用QTextEdit时如何实现拖放文件的功能，包括相关的方法和实现步骤。通过重写dragEnterEvent和dropEvent函数，并结合QMimeData和QUrl等类，可以轻松实现向QTextEdit拖放文件的功能。详细的代码实现和说明可以参考本文提供的示例代码。 ... [详细]

蜡笔小新 2023-12-14 16:06:38
text
CSS3选择器的使用方法详解，提高Web开发效率和精准度

本文详细介绍了CSS3新增的选择器方法，包括属性选择器的使用。通过CSS3选择器，可以提高Web开发的效率和精准度，使得查找元素更加方便和快捷。同时，本文还对属性选择器的各种用法进行了详细解释，并给出了相应的代码示例。通过学习本文，读者可以更好地掌握CSS3选择器的使用方法，提升自己的Web开发能力。 ... [详细]

蜡笔小新 2023-12-14 14:37:52
list
推荐系统遇上深度学习(十七）详解推荐系统中的常用评测指标

原创：石晓文小小挖掘机2018-06-18笔者是一个痴迷于挖掘数据中的价值的学习人，希望在平日的工作学习中，挖掘数据的价值， ... [详细]

蜡笔小新 2023-12-13 19:35:25
list
scrapy存入excel时，excel文件被反复擦除重写。文件大小始终不超过100k，请问这种情况改如何解决

怀疑是每次都在新建文件，具体代码如下 ... [详细]

蜡笔小新 2023-12-13 17:53:49
function
Python正则表达式学习记录及常用方法

本文记录了学习Python正则表达式的过程，介绍了re模块的常用方法re.search，并解释了rawstring的作用。正则表达式是一种方便检查字符串匹配模式的工具，通过本文的学习可以掌握Python中使用正则表达式的基本方法。 ... [详细]

蜡笔小新 2023-12-13 16:37:19
function
Go Cobra命令行工具入门教程

本文介绍了Go语言实现的命令行工具Cobra的基本概念、安装方法和入门实践。Cobra被广泛应用于各种项目中，如Kubernetes、Hugo和Github CLI等。通过使用Cobra，我们可以快速创建命令行工具，适用于写测试脚本和各种服务的Admin CLI。文章还通过一个简单的demo演示了Cobra的使用方法。 ... [详细]

蜡笔小新 2023-12-12 20:02:41
list
Postgresql备份和恢复的方法及命令行操作步骤

本文介绍了使用Postgresql进行备份和恢复的方法及命令行操作步骤。通过使用pg_dump命令进行备份，pg_restore命令进行恢复，并设置-h localhost选项，可以完成数据的备份和恢复操作。此外，本文还提供了参考链接以获取更多详细信息。 ... [详细]

蜡笔小新 2023-12-11 10:17:12
text
EPPlus绘制刻度线的方法及示例代码

本文介绍了使用EPPlus绘制刻度线的方法，并提供了示例代码。通过ExcelPackage类和List对象，可以实现在Excel中绘制刻度线的功能。具体的方法和示例代码在文章中进行了详细的介绍和演示。 ... [详细]

蜡笔小新 2023-12-10 19:32:38
js
【机器学习】生成式对抗网络模型综述

生成式对抗网络模型综述摘要生成式对抗网络模型(GAN)是基于深度学习的一种强大的生成模型，可以应用于计算机视觉、自然语言处理、半监督学习等重要领域。生成式对抗网络 ... [详细]

蜡笔小新 2023-12-14 17:51:18

汇星创业网

这个家伙很懒，什么也没留下！

Tags | 热门标签

RankList | 热门文章