① excel 如何用宏取打開的excel文件名
如果先打開A，再打開B那就可以用msgbox
workbooks(2).name來取得B的
文件名
。
② 如何用excel宏提取文件名生成目錄
寫了一小部分，可以獲取文件夾下所有文件名稱，路徑，大小，創建日期，不知道能否對你有幫助。
1.添加VBA代碼，選擇新插入的模塊後，插入以下代碼
Sub getpath()
Range("A2:C1000").ClearContents '清空A2：C1000列
On Error Resume Next
Dim shell As Variant
Set shell = CreateObject("Shell.Application")
Set filePath = shell.BrowseForFolder(&O0, "選擇文件夾", &H1 + &H10, "") '獲取文件夾路徑地址
Set shell = Nothing
If filePath Is Nothing Then '檢測是否獲得有效路徑，如取消直接跳出程序
Exit Sub
Else
gg = filePath.Items.Item.Path
End If
Set obj = CreateObject("Scripting.FileSystemObject") '定義變數
Set fld = obj.getfolder(gg) '獲取路徑
For Each ff In fld.Files '遍歷文件夾里文件
m = m + 1
Cells(m + 1, 1) = ff.Name
Cells(m + 1, 2) = ff.Path
Cells(m + 1, 3) = ff.Size
Cells(m + 1, 4) = ff.DateCreated
Next
End Sub
2.運行宏（alt+F8），宏的名稱為getpath
③ excel 如何用宏取打開的excel文件名
如果你只是想鏈接引用其他工作簿中某工作表數據的數據，則不是必須把第二個文件打開才可以。只需要在要引用的單元格（當然也可以在你的宏程序中，根據需要改動）把引用地址寫好就可以了，類似於
='C:\[Book2.xls]Sheet1'!$A2
④ 如何用excel宏提取文件名生成目錄如何用excel宏提取文件名生成目錄比如要從C盤提取其所有的文件名（
方法一：
1、在那個文件夾內新建一個.TXT文件（如wenjian.txt），用記事本單開輸入
dir> 1.txt
保存退出
將剛才的.TXT（wenjian.txt）更名為.bat文件（wenjian.bat）
雙擊wenjian.bat文件運行一次，在文件夾內多出一個1.txt文件
打開1.txt文件，將其中的內容粘貼到Excel中，數據——分列處理就可以得到你要的文件名列表了！
方法二：
在那個文件夾下新建Excel文件，打開新建的Excel文件，右擊工作表標簽（如Sheet1），查看代碼——在代碼編輯器中輸入以下代碼：
Sub aaa()
f = Dir("c:\*.*")
han = 1
Do While f > ""
Cells(han, 1).Value = f
han = han + 1
f = Dir
Loop
End Sub
回到Excel表格中，工具——宏——宏——選擇Sheet1.Test——執行
看看效果吧！
另外可以到http://www.excelhome.net/，看看有沒有更適合你的。
⑤ EXCEL2013里自定義命令按鈕指定的宏前總是帶文件名，怎麼能夠去掉
可以導出文件，然後用文本編輯器打開，刪除文件名相關信息，再導入回去。
⑥ excel宏，以固定單元格數值為文件名，打開相應excel文件
有這么幾個問題：
1 MkDir語句中的括弧里應為 ("E:\" & fname) '創建文件夾。
——注意引號和&的配合。
2 打開文件夾語句不對。那個open是打開指定文件的語句
3 對象創建後注意關閉（清理後再離場）
測試後的完整代碼為：
Sub 創建文件夾()
Dim fname '定義變數
fname = ActiveSheet.Range("a1") '指定表格內容
MkDir ("E:\" & fname) ' '創建文件夾
'Workbooks.Open ("E:\" & fname) '打開文件夾
Set Fs = CreateObject("Scripting.FileSystemObject") '復制指定文件到指定文件夾
Fs.file "d:\scan\aa.xlsx", "e:\" & fname & "\aa.xlsx", True '
Set Fs = Nothing
End Sub