js获取文件夹下所有文件 EXCELvba读取指定文件夹的名字和循环打开文件夹？

EXCELvba读取指定文件夹的名字和循环打开文件夹？如果(ActiveWorkbook.路径& “”替换（&P）(ActiveWorkbook.名称，“.xls”，“”）=“”然后是MkDir

EXCELvba读取指定文件夹的名字和循环打开文件夹？

如果(ActiveWorkbook.路径& “”替换（&P）(ActiveWorkbook.名称，“.xls”，“”）=“”然后是MkDir(ActiveWorkbook.路径& “”替换（&P）(ActiveWorkbook.名称，“.xls”，“”）lieshu=Range（“IV1”）.End（xlToLeft）.column for i=1 To lieshuhangshu=Range（Cells（65536，i），Cells（65536，i））.End（xlUp）.Row Open此工作簿。路径& “”替换（&P）(ActiveWorkbook.名称、“.xls”、“”）&“”&”&“.CStr（Cells（1，i）.Text）&“.txt”输出为#1，k=2挂树打印#1，Cells（k，i）Next Close#1 Next

excel、里里