拖放文件到VBA窗体，能实现显示文件名及路径吗？

vistababy

弄了一个窗体，把桌面或我的电脑某个文件夹中的文件拖到上面，就显示这个文件的详细路径。
或者能添加某个控件，拖放文件上去显示也行。有吗？

各位大佬，如何实现？
不得法啊。
office2013  64位版，win10 21H2  64位

约定的童话

Private Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
  MsgBox 123
End Sub
试试这种属性

vistababy

约定的童话 发表于 2023-3-30 18:37
Private Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, B ...

你在豆我？

wanghan519

问了ai，说是office2002以后才支持dragdrop事件，要不试试ahk或c#弄个窗口等拖动

micch

为什么要用拖动？如果目的是显示文件路径，那直接用文件选择窗口不就行了，窗体加一个按钮就行了

vistababy

micch 发表于 2023-3-30 19:49
为什么要用拖动？如果目的是显示文件路径，那直接用文件选择窗口不就行了，窗体加一个按钮就行了

有时候感觉拖动更方便，在我的电脑里面看到想要的文件或文件夹，拖过去就行了。

我用着一个软件，作者竟然弄这样的添加文件夹窗口（如图），要一级一级地选，简直是太不方便了。。实在受不了。对了，著名的影子软件shadowdefender排除列表用的也是这种方式添加文件夹的，超不方便，超不喜欢。

micch

我用的win11，右键菜单里就有一个复制文件地址的选项，文件夹标题菜单里也有这个选项。
点一下就复制了，比拖动到窗体省事，起码不用你打开窗体。
如果是批量操作，你只需要在Excel里写一个点击单元格事件，自动从剪切板复制数据就行了

wanghan519

micch 发表于 2023-3-30 23:21
我用的win11，右键菜单里就有一个复制文件地址的选项，文件夹标题菜单里也有这个选项。
点一下就复制了， ...

借宝地问一下大佬，请问win11据说没有ie，那vba里可以用htmlfile对象吗，如果不能我就暂不升级了，谢谢

micch

wanghan519 发表于 2023-3-31 07:10
借宝地问一下大佬，请问win11据说没有ie，那vba里可以用htmlfile对象吗，如果不能我就暂不升级了，谢谢

能用吧，我浏览器直接用的edge，vba后期绑定可以用，好像前阵解析json用过一次