Tôi tin rằng gọi explorer với đối số chọn, explorer.exe /select,"C:\folder\file.xyz"
, nên làm điều này cho bạn.
Để sử dụng điều này trong Excel:
Tạo một siêu liên kết tham chiếu đến cùng một ô mà liên kết nằm trong:
Sau đó, trong trình soạn thảo VBA, hãy thêm phần này vào Bảng chứa siêu liên kết:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$E$3" Then
Shell "explorer.exe /select,""C:\Users\Jonno\Documents\Test\New folder\Test.xlsx""", vbNormalFocus
End If
End Sub
Nhấp vào nó sau đó sẽ mở một cửa sổ thám hiểm với một tập tin được tô sáng. Bạn có thể thay đổi điều này để sử dụng giá trị trong ô dưới dạng tệp nếu cần hoặc khi bạn nhấp vào bất kỳ siêu liên kết nào, chúng sẽ được xử lý theo cùng một cách bằng cách xóa câu lệnh IF.