問題已解決

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

84784983| 提問時間:2020 12/09 10:47
溫馨提示:如果以上題目與您遇到的情況不符,可直接提問,隨時問隨時答
速問速答
杰希老師
金牌答疑老師
職稱:中級會計師,初級會計師
你好,可以復(fù)制,否則就要學(xué)習代碼才能搞定了
2020 12/09 10:48
84784983
2020 12/09 10:53
快說代碼 教一下
杰希老師
2020 12/09 10:56
你好,你開通了宏嗎?
84784983
2020 12/09 11:01
老師Σ(?+? o?)シ繼續(xù)說??
84784983
2020 12/09 11:41
怎么只說一點點就不說了
杰希老師
2020 12/09 12:01
你好,需要開通宏數(shù)據(jù)
84784983
2020 12/09 13:22
不要重復(fù) 接著說
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
可以把使用什么函數(shù)說一下嗎?再把步驟說清楚點 謝謝
杰希老師
2020 12/09 15:19
你好,不是函數(shù),是表格里一個叫宏的功能,打開宏,把代碼錄入,運行就可以了。
84784983
2020 12/09 15:21
代碼是什么
杰希老師
2020 12/09 15:53
你好,代碼就是我上面發(fā)給你的那些子母數(shù)字
84784983
2020 12/09 18:27
主要用的是什么功能,實現(xiàn)我的問題
杰希老師
2020 12/09 19:08
你好,上面已經(jīng)回答了,用宏,excel里面的功能區(qū)有宏,輸入代碼,運行,就能實現(xiàn)了。但是宏是一門計算機語言,需要前期的學(xué)習。
84784983
2020 12/09 19:09
只寫代碼是怎么使用也沒有說
杰希老師
2020 12/09 19:11
給您的建議是,之前沒有用過宏,先不要用,后期有時間再去學(xué)習,現(xiàn)在先把幾張表格復(fù)制粘貼過來。
杰希老師
2020 12/09 19:12
打開excel,功能區(qū)打開宏,輸入代碼,點擊運行,等待幾分鐘。
84784983
2020 12/09 19:14
說的都不具體,是怎么學(xué)習使用。
杰希老師
2020 12/09 19:16
您好,宏可以在網(wǎng)上找相關(guān)的培訓(xùn)課程
杰希老師
2020 12/09 19:17
什么是宏 所謂宏,就是一些命令組織在一起,作為一個單獨命令完成一個特定任務(wù)。Microsoft Word中對宏定義為:“宏就是能組織到一起作為一獨立的命令使用的一系列word命令,它能使日常工作變得更容易”。Word使用宏語言Visual Basic將宏作為一系列指令來編寫。 計算機科學(xué)里的宏是一種抽象的,根據(jù)一系列預(yù)定義的規(guī)則替換一定的文本模式。Excel辦公軟件自動集成了“VBA”高級程序語言,用此語言編制出的程序就叫“宏”。使用“VBA”需要有一定的編程基礎(chǔ),并且還會耗費大量的時間,因此,絕大多數(shù)的使用者僅使用了Excel的一般制表功能,很少使用到“VBA”。 解釋器或編譯器在遇到宏時會自動進行這一模式替換。對于編譯語言,宏展開在編譯時發(fā)生,進行宏展的工具常被稱為宏展開器。宏這一術(shù)語也常常被用于許多類似的環(huán)境中,它們是源自宏展開的概念,這包括鍵盤宏和宏語言。絕大多數(shù)情況下,“宏”這個詞的使用暗示著將小命令或動作轉(zhuǎn)化為一系列指令。
杰希老師
2020 12/09 19:19
可以先從了解宏是什么開始,工作中哪些地方會用到宏。然后再去找相關(guān)的課程。
杰希老師
2020 12/09 19:19
宏的用途在于自動化頻繁使用的序列或者是獲得一種更強大的抽象能力--但這常常是一回事。 計算機語言如C或匯編語言有簡單的宏系統(tǒng),由編譯器或匯編器的預(yù)處理器實現(xiàn)。C的宏預(yù)處理器的工作只是簡單的文本搜索和替換,使用附加的文本處理語言如M4,C 程序員可以獲得更精巧的宏。 Lisp類語言如Common Lisp和Scheme有更精巧的宏系統(tǒng): 宏的行為如同是函數(shù)對自身程序文本的變形,并且可以應(yīng)用全部語言來表達這種變形。一個C宏可以定義一段語法的替換,然而一個Lisp的宏卻可以控制一節(jié)代碼的計算。獲得了控制代碼的執(zhí)行順序(見惰性計算和非限制函數(shù))的能力,使得新創(chuàng)建的語法結(jié)構(gòu)與語言內(nèi)建的語法結(jié)構(gòu)不可區(qū)分。 例如,一種Lisp 方言有 cond 而沒有if ,就可以使用宏由前者定義后者。Lisp 語法的去部主要擴展,比如面向?qū)ο蟮腃LOS 系統(tǒng),可以由宏來定義。 宏的典型應(yīng)用 加速日常編輯和格式設(shè)置組合多個命令使對話框中的選項更易于訪問 使一系列復(fù)雜的任務(wù)自動執(zhí)行 應(yīng)用程序也可以使用一種和宏類似機理的系統(tǒng)來允許用戶將一系列(一般是最常使用到的操作)自定義為一個步驟。也就是用戶執(zhí)行一系列操作,并且讓應(yīng)用程序來“記住”這些操作以及順序。更高級的用戶可以通過內(nèi)建的宏編程來直接使用那些應(yīng)用程序的功能。當使用一種不熟悉的宏語言來編程時,比較有效的方法就是記錄用戶希望得到的一連串操作,然后通過閱讀應(yīng)用程序記錄下來的宏文件來理解宏命令的結(jié)構(gòu)組成。
杰希老師
2020 12/09 19:20
這些是我復(fù)制的,幫助您大概了解什么是宏,學(xué)習宏有什么作用
描述你的問題,直接向老師提問
0/400
      提交問題

      您有一張限時會員卡待領(lǐng)取

      00:10:00

      免費領(lǐng)取
      Hi,您好,我是基于人工智能技術(shù)的智能答疑助手,如果有什么問題可以直接問我呦~