在当前选定的行中自动打开超链接

Posted 2021-04-16

我正在尝试对“战地4”中广泛的游戏时间中超过6TB的视频剪辑和游戏记录进行分类，标记和数据库分类，并且为了尽可能提高效率，我已经插入了超链接到我的硬盘上的文件进入电子表格，这样我就可以单击，视频将开始在VLC中播放。

但是，由于我已经有超过10,000个文件需要标记和处理（我知道，这有点荒谬），我希望通过使电子表格在我进入下一行后自动“点击”超链接来改进过程。

我有很多我可能会使用的常见类别的列，基本上我想输入给定视频文件的一系列标签，点击输入，列表中的下一个视频文件将开始在VLC中播放，没有我甚至切换窗口，点击，或任何东西。

我对Excel很陌生，但这个项目本质上是我学习和发展的一种方式。

额外的问题：有没有比像以下各种教程更好的方式来做你自己的过滤：https://www.youtube.com/watch?v=tCahRfEGj1g？

遗憾的是，对于大型列表，这种方法效率不高，所以我希望有更好的方法。谢谢！

答案

只因为战地4很棒，所以我会试一试：

考虑玩Worksheet_SelectionChange事件。

在你的情况下，它看起来像这样：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Cells(1, 2).Value = Target.Row
    If Cells(1, 2) <> Cells(1, 3) Then
        Cells(Target.Row, 1).Hyperlinks(1).Follow
        Cells(1, 3).Value = Target.Row
    End If
End Sub

可能.Follow不可行：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Cells(1, 2).Value = Target.Row
    If Cells(1, 2) <> Cells(1, 3) Then
        Activeworkbook.FollowHyperlink address:=Cells(Target.Row, 1).Text
        Cells(1, 3).Value = Target.Row
    End If
End Sub

它将检查行中是否有变化。摆脱细胞的背景。

祝你的项目好运。