Dim strFolderPath As String
strFolderPath = “C:\temp\”
ThisWorkbook.FollowHyperlink (strFolderPath)
Dieser Code öffnet einen bestimmten Ordner, aber ich muss einen Ordner öffnen, der in einer Excel-Tabelle gespeichert ist, wie unten gezeigt:
Ich brauche den Code um den Pfad auszulesen und den Ordner unter dem bestehenden Pfad in Excel zu öffnen
Antwort1
Du meinst so etwas wie unten?
With ThisWorkbook.Sheets("Sheet1")
Range("C2").Hyperlinks(1).Follow
End with
Wenn Ihre Adressen keine echten Hyperlinks sind:
With ThisWorkbook.Sheets("Sheet1")
ThisWorkbook.FollowHyperlink Address:=.Range("C2").Value, NewWindow:=False, AddHistory:=True
End with
Beachten Sie auch, dass Ihre Werte derzeit keine Erweiterung haben. Möglicherweise möchten Sie diese in der Zelle oder über VBA hinzufügen:
Address:=.Range("C2").Value & ".extention"