問題已解決
老師是如何把下面這多個單獨表合并到一個表格的分別sheet1 sheet2 等等單元表格中 ?謝謝



你好,可以復制,否則就要學習代碼才能搞定了
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
這些是我復制的,幫助您大概了解什么是宏,學習宏有什么作用
