Excel VBA um UNC aus der Zelle zu bekommen und öffnen Sie es in explorer.exe

Question

Ich habe eine Datei mit einer Liste von PC-Hostnamen Ich möchte in der Lage sein, eine Verbindung zu dem C-Laufwerk eines bestimmten durch Klicken in eine Zelle oder Schaltfläche oder etwas.

Lassen Sie uns sagen, dass ich zur Zeit den Hostnamen in Spalte A habe ich CONCATENATE verwenden Sie es in einen richtigen Netzwerkpfad zu drehen \\ Hostname \ C $ und setzte sich in Spalte B.

Nun, wie kann ich es so machen Ich kann einfach auf die Zelle in Spalte B klicken, um diesen Speicherort in explorer.exe zu öffnen. Ich habe 450 PCs, also muss ich in der Lage sein, den Bereich anzugeben, füttern Sie den Netzwerkpfad in VBA und öffnen Sie dann das in explorer.exe macht dies Sinn? : P

Würde wirklich, wirklich jede Hilfe zu schätzen wissen. Vielen Dank.

Answer 1

Wickeln Sie den verketteten Wert in einem "Hyperlink()". Ab dann ist es anklickbar und es öffnet sich der Explorer.

Oder Sie legen diesen Code in Ihrem Arbeitsblatt Code-Bereich und doppelklicken Sie auf die Zellen, wo Ihre Links stehen. Aber Sie dürfen es nicht in Kombination mit HYPERLINK verwenden.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 
If Target.Column <> 2 Then Exit Sub 
Dim sh As Object 
Set sh = CreateObject("Wscript.Shell") 
sh.Run ("explorer " & Target.Value) 
Cancel = True 
End Sub