[算表] VBA读取资料夹的图片

楼主: kinbaku1 (~GUCCI BOY~)   2016-05-16 22:46:02
软件:office excel word
版本:2010
想请教版上高手
因为我想要读取图片汇入我的档案里
Dim oFl As File
Dim oFldr As Folder
Dim fso As New FileSystemObject
strFileLocation = ActiveDocument.Path
strFileLocation = "d:\pic"==>这里是直接去开D槽的pic
Set oFldr = fso.GetFolder(strFileLocation)
想请问一下,我如果是想要自己开我自己执行后去选取的档案
类似我们做"开启旧档"这个方法
去选我们要开的档案或资料夹
在这个地方要怎么改会比较好呢?
谢谢~
作者: soyoso (我是耀宗)   2016-05-16 23:04:00
application.filedialog()资料夹msofiledialogfolderpicker档案msofiledialogfilepicker跳出视窗以show,取得选取的路径&子目录或档名以selecteditems
楼主: kinbaku1 (~GUCCI BOY~)   2016-05-16 23:43:00
谢谢s大大,可以用了3Q~

Links booklink

Contact Us: admin [ a t ] ucptt.com