问题已解决

老师是如何把下面这多个单独表合并到一个表格的分别sheet1 sheet2 等等单元表格中 ?谢谢

84784983| 提问时间:2020 12/09 10:47
温馨提示:如果以上题目与您遇到的情况不符,可直接提问,随时问随时答
速问速答
杰希老师
金牌答疑老师
职称:中级会计师,初级会计师
你好,可以复制,否则就要学习代码才能搞定了
2020 12/09 10:48
84784983
2020 12/09 10:53
快说代码 教一下
杰希老师
2020 12/09 10:56
你好,你开通了宏吗?
84784983
2020 12/09 11:01
老师Σ(๑+⌓ o。)シ继续说??
84784983
2020 12/09 11:41
怎么只说一点点就不说了
杰希老师
2020 12/09 12:01
你好,需要开通宏数据
84784983
2020 12/09 13:22
不要重复 接着说
84784983
2020 12/09 14:50
你会不会 不会就不要接这个问题
杰希老师
2020 12/09 14:52
你好,代码如下: Sub 合并当前目录下所有工作簿的全部工作表() Dim MyPath, MyName, AWbName Dim Wb As Workbook, WbN As String Dim G As Long Dim Num As Long Dim BOX As String Application.ScreenUpdating = False MyPath = ActiveWorkbook.Path MyName = Dir(MyPath & "\" & "*.xls") AWbName = ActiveWorkbook.Name Num = 0 Do While MyName <> "" If MyName <> AWbName Then Set Wb = Workbooks.Open(MyPath & "\" & MyName) Num = Num + 1 With Workbooks(1).ActiveSheet .Cells(.Range("B65536").End(xlUp).Row + 2, 1) = Left(MyName, Len(MyName) - 4) For G = 1 To Sheets.Count Wb.Sheets(G).UsedRange.Copy .Cells(.Range("B65536").End(xlUp).Row + 1, 1) Next WbN = WbN & Chr(13) & Wb.Name Wb.Close False End With End If MyName = Dir Loop Range("B1").Select Application.ScreenUpdating = True MsgBox "共合并了" & Num & "个工作薄下的全部工作表。如下:" & Chr(13) & WbN, vbInformation, "提示" End Sub
84784983
2020 12/09 15:18
可以把使用什么函数说一下吗?再把步骤说清楚点 谢谢
杰希老师
2020 12/09 15:19
你好,不是函数,是表格里一个叫宏的功能,打开宏,把代码录入,运行就可以了。
84784983
2020 12/09 15:21
代码是什么
杰希老师
2020 12/09 15:53
你好,代码就是我上面发给你的那些子母数字
84784983
2020 12/09 18:27
主要用的是什么功能,实现我的问题
杰希老师
2020 12/09 19:08
你好,上面已经回答了,用宏,excel里面的功能区有宏,输入代码,运行,就能实现了。但是宏是一门计算机语言,需要前期的学习。
84784983
2020 12/09 19:09
只写代码是怎么使用也没有说
杰希老师
2020 12/09 19:11
给您的建议是,之前没有用过宏,先不要用,后期有时间再去学习,现在先把几张表格复制粘贴过来。
杰希老师
2020 12/09 19:12
打开excel,功能区打开宏,输入代码,点击运行,等待几分钟。
84784983
2020 12/09 19:14
说的都不具体,是怎么学习使用。
杰希老师
2020 12/09 19:16
您好,宏可以在网上找相关的培训课程
杰希老师
2020 12/09 19:17
什么是宏 所谓宏,就是一些命令组织在一起,作为一个单独命令完成一个特定任务。Microsoft Word中对宏定义为:“宏就是能组织到一起作为一独立的命令使用的一系列word命令,它能使日常工作变得更容易”。Word使用宏语言Visual Basic将宏作为一系列指令来编写。 计算机科学里的宏是一种抽象的,根据一系列预定义的规则替换一定的文本模式。Excel办公软件自动集成了“VBA”高级程序语言,用此语言编制出的程序就叫“宏”。使用“VBA”需要有一定的编程基础,并且还会耗费大量的时间,因此,绝大多数的使用者仅使用了Excel的一般制表功能,很少使用到“VBA”。 解释器或编译器在遇到宏时会自动进行这一模式替换。对于编译语言,宏展开在编译时发生,进行宏展的工具常被称为宏展开器。宏这一术语也常常被用于许多类似的环境中,它们是源自宏展开的概念,这包括键盘宏和宏语言。绝大多数情况下,“宏”这个词的使用暗示着将小命令或动作转化为一系列指令。
杰希老师
2020 12/09 19:19
可以先从了解宏是什么开始,工作中哪些地方会用到宏。然后再去找相关的课程。
杰希老师
2020 12/09 19:19
宏的用途在于自动化频繁使用的序列或者是获得一种更强大的抽象能力--但这常常是一回事。 计算机语言如C或汇编语言有简单的宏系统,由编译器或汇编器的预处理器实现。C的宏预处理器的工作只是简单的文本搜索和替换,使用附加的文本处理语言如M4,C 程序员可以获得更精巧的宏。 Lisp类语言如Common Lisp和Scheme有更精巧的宏系统: 宏的行为如同是函数对自身程序文本的变形,并且可以应用全部语言来表达这种变形。一个C宏可以定义一段语法的替换,然而一个Lisp的宏却可以控制一节代码的计算。获得了控制代码的执行顺序(见惰性计算和非限制函数)的能力,使得新创建的语法结构与语言内建的语法结构不可区分。 例如,一种Lisp 方言有 cond 而没有if ,就可以使用宏由前者定义后者。Lisp 语法的去部主要扩展,比如面向对象的CLOS 系统,可以由宏来定义。 宏的典型应用 加速日常编辑和格式设置组合多个命令使对话框中的选项更易于访问 使一系列复杂的任务自动执行 应用程序也可以使用一种和宏类似机理的系统来允许用户将一系列(一般是最常使用到的操作)自定义为一个步骤。也就是用户执行一系列操作,并且让应用程序来“记住”这些操作以及顺序。更高级的用户可以通过内建的宏编程来直接使用那些应用程序的功能。当使用一种不熟悉的宏语言来编程时,比较有效的方法就是记录用户希望得到的一连串操作,然后通过阅读应用程序记录下来的宏文件来理解宏命令的结构组成。
杰希老师
2020 12/09 19:20
这些是我复制的,帮助您大概了解什么是宏,学习宏有什么作用
描述你的问题,直接向老师提问
0/400
      提交问题

      您有一张限时会员卡待领取

      00:10:00

      免费领取
      Hi,您好,我是基于人工智能技术的智能答疑助手,如果有什么问题可以直接问我呦~