【2】excel打开文件路径 3)请问如何用宏命令打开指定路径文件 http://club./thread-811113-1-1.html Sub Macro1() Dim xlapp, mb Set xlapp = CreateObject("Excel.application") xlapp.Visible = False filename = path & "\仓库\单位.xls" Set mb = xlapp.Workbooks.Open(filename) mb.Sheets("进货单").Name = "sheet1" mb.Save xlapp.Quit End Sub 上述宏命令中filename值是\仓库\单位.xls,请问如何设置路径filename中数据为“d:\仓库\单位.xls”, BBS:Workbooks.Open (“d:\仓库\单位.xls”) 2)怎样使Excel启动时自动打开指定路径的所有文件 https://jingyan.baidu.com/article/e75aca85bebe3f142edac686.html 打开Excel/工具/选项/工具选项界面 .... 1)Excel打开文件的路径 文件/信息/ /个人宏工作簿保存路径.默认/ c:\Users(用户)\Administrator\AppData\Roaming\Microsoft\Excel\XLSTART\PERSONAL.XLSB c:\用户\Administrator\AppData\Roaming\Microsoft\Excel\XLSTART\PERSONAL.XLSB ---- 3/在当前excel文件中运行宏,使它打开另一个excel文件并且指定文件名和位置,且直接打印它。 https://wenda.so.com/q/1534871461213699 Sub 创建文件夹() Dim fname '定义变量 fname = ActiveSheet.Range("a1") '指定表格内容 MkDir ("E:\" & fname) ' '创建文件夹 'Workbooks.Open ("E:\" & fname) '打开文件夹 Set Fs = CreateObject("Scripting.FileSystemObject") '复制指定文件到指定文件夹 Fs.copyfile "d:\scan\aa.xlsx", "e:\" & fname & "\aa.xlsx", True ' Set Fs = Nothing End Sub 4/关于在利用Excel窗体按钮打开指定路径文件夹和文件的问题 http://club./thread-985083-1-1.html 5/excel在vba中如何用单元格指定路径,如:sheet1中在A1输入路径或者路径文件,vba中如何读取该路径? https://wenda.so.com/q/1484210527495206 6/请教各位老师:如何用超链打开指定文件夹下的文件 http://club./thread-1141935-1-1.html 7/EXCEL如何用宏实现点击单元格根据单元格内容打开同名文件? https://wenda.so.com/q/1533863725217067 8/用excel打开指定文件夹下的指定文件-命令按钮法 http://club./thread-473078-1-1.html BBS: Shell ("F:\1.bat") 录制宏法 http://club./forum.php?mod=viewthread&tid=472976 参考: sub 打开批处理文件() Shell "D:\清除.bat", vbNormalFocus end sub 【】 |
|
来自: c857084163 > 《VBA》