dir不要副檔名 在 コバにゃんチャンネル Youtube 的最讚貼文
「dir不要副檔名」的推薦目錄：
- 關於dir不要副檔名 在 コバにゃんチャンネル Youtube 的最讚貼文
- 關於dir不要副檔名 在 大象中醫 Youtube 的最讚貼文
- 關於dir不要副檔名 在 大象中醫 Youtube 的最讚貼文
- 關於dir不要副檔名 在 [問題] 工作表合併，不要放副檔名- 看板Office 的評價
- 關於dir不要副檔名 在 國立臺東高級中學高三電腦網路概論期末考試卷 的評價
- 關於dir不要副檔名 在 列出資料夾內檔名的方法 - Mike's Notes 的評價
- 關於dir不要副檔名 在 你要不要學一點點DOS的指令?! 的評價
- 關於dir不要副檔名 在 XP如何改檔名而不選到副檔名 - Mobile01 的評價
- 關於dir不要副檔名 在 如何把一個線上的網站抓下來成為全靜態網頁 - GitHub 的評價
dir不要副檔名 在 國立臺東高級中學高三電腦網路概論期末考試卷 的推薦與評價
( C )下列關於Windows XP 中的檔案類型及副檔名的說明，何者錯誤？ ... (A)可以設定不要將檔案移到資源回收筒，在移除檔案時立即執行刪除 (B)有容量限制 (C)可以還原 ... ... <看更多>
dir不要副檔名 在 列出資料夾內檔名的方法 - Mike's Notes 的推薦與評價
將以上存成 列出資料夾內檔名(不含路徑).bat ，放到該資料夾中，雙擊滑鼠即可。 @echo off dir /b /on /s >list.txt. 將以上存成 列出 ... ... <看更多>
dir不要副檔名 在 [問題] 工作表合併，不要放副檔名- 看板Office 的推薦與評價
(若是和其他不同軟體互動之問題 請記得一併填寫)
軟體:
版本:excel xlsx
簡單描述一下狀況好
我有一個資料夾
裡面有二十個excel
每個excel都有五個工作表
分別是 資產 負債 權益 資產分析 負債分析
我輸入以下VBA
把每個excel裡面的‘’資產分析‘’
抓出來合併到一個excel
合併後的excel會有20個工作表
工作表名稱以原本二十個excel的名稱命名
但是後面會加上.xlsx
VBA代碼：將工作簿的指定工作表合併到主工作簿中：
Sub MergeSheets2()
'Updated by Extendoffice 2019/2/20
Dim xStrPath As String
Dim xStrFName As String
Dim xWS As Worksheet
Dim xMWS As Worksheet
Dim xTWB As Workbook
Dim xStrAWBName As String
Dim xI As Integer
On Error Resume Next
xStrPath = " C:\Users\a0921\Desktop\科餘\"
xStrName = "資產分析"
xArr = Split(xStrName, ",")
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xTWB = ThisWorkbook
xStrFName = Dir(xStrPath & "*.xlsx")
Do While Len(xStrFName) > 0
Workbooks.Open Filename:=xStrPath & xStrFName, ReadOnly:=True
xStrAWBName = ActiveWorkbook.Name
For Each xWS In ActiveWorkbook.Sheets
For xI = 0 To UBound(xArr)
If xWS.Name = xArr(xI) Then
xWS.Copy After:=xTWB.Sheets(xTWB.Sheets.count)
Set xMWS = xTWB.Sheets(xTWB.Sheets.count)
xMWS.Name = xStrAWBName
Exit For
End If
Next xI
Next xWS
Workbooks(xStrAWBName).Close
xStrFName = Dir()
Loop
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End Sub
這樣合併完之後
每個工作表的名稱都會帶有.xlsx
我還需要一個一個刪除
想請問高手如何不要有.xlsx呢
拜託 願贈特大星巴克予以解惑之人
-----
Sent from JPTT on my iPhone
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 39.14.26.114 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1677958234.A.A2B.html
※ 編輯: SergioLeone (39.14.26.114 臺灣), 03/05/2023 03:33:33
※ 編輯: SergioLeone (39.14.26.114 臺灣), 03/05/2023 14:26:12
... <看更多>