Office中国论坛/Access中国论坛

标题: 【紧急】实现双击单元格文字，打开不同文件夹下对应的PDF文件 [打印本页]

作者: adouleonshaw 时间: 2018-9-13 15:59
标题: 【紧急】实现双击单元格文字，打开不同文件夹下对应的PDF文件
文件1、2位于文件夹a中，文件3位于文件夹b中，文件4位于文件夹c中。有很多类似的文件夹，文件夹下有很多不同的PDF文件。
因工作需要，小弟能力有限，敬请各位老师帮我实现：双击单元格下的文件名称，就能打开相应文件夹下的PDF文件。如双击单元格B2中的1，就能打开文件夹a下面的1.pdf文件，双击单元格B4中的3，就能打开文件夹b下面的3.pdf文件

作者: snryga 时间: 2018-9-14 22:44
使用超级链接就行

作者: adouleonshaw 时间: 2018-9-17 08:45

snryga 发表于 2018-9-14 22:44
使用超级链接就行

有超过100个文件夹，几千份文件

作者: ganlinlao 时间: 2018-9-23 12:03
本帖最后由 ganlinlao 于 2018-9-23 12:21 编辑

这个问题其实很简单。
方式1、使用超链接是最简捷的方式。
方式2、第一步：确保你的电脑有一个打开pdf的默认程序，一般会有的，否则你怎么看pdf呢。

第二步：以你的例子为例：至少你要有一个列是用来记录相对文件夹如 A列记录 a、b、c文件夹
[attach]62810[/attach]

第三步：
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 2 And Target.Row > 1 Then '只对B列第2行开始点击有效
Shell "cmd /c start file:///" & ActiveWorkbook.Path & "\" & Target.Cells.Offset(0, -1).Value & "\" & Target.Value & ".pdf"
End If
End Sub

作者: yanwei82123300 时间: 2018-10-15 21:02
我可以解决

作者: adouleonshaw 时间: 2018-10-19 16:06

yanwei82123300 发表于 2018-10-15 21:02
我可以解决

请老师指教！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)