Verlinkung durch VBA

Forumthread: Verlinkung durch VBA
4 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Verlinkung durch VBA

18.10.2017 13:57:38

Martina

Hallo Excelspezis,
ich stehe vor einer kleinen Mauer und komme nicht weiter.
Ich möchte gerne mit einem Klickbutton in meiner Userform eine Verlinkung einfügen.
Also wenn ich den Button klicke, soll das Fenster öffnen, welches sich unter
Eifügen, Link einfügen öffnet.
Bin für jeden Ansatz dankbar.
LG
Martina

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Verlinkung durch VBA

18.10.2017 14:10:19

Sandra
AW: Verlinkung durch VBA

18.10.2017 14:39:31

Martina
Gerne, wünsche ich Dir auch...(owT)

18.10.2017 14:44:59

Sandra
AW: Verlinkung durch VBA

18.10.2017 14:11:24

Bernd

AW: Verlinkung durch VBA

18.10.2017 14:10:19

Sandra

Hallo Martina,
versuchs mal hiermit, dem gewünschten Button mit folgendem Code versehen:

Public Sub hyperlinköffnen()
Application.Dialogs(xlDialogInsertHyperlink).Show
End Sub

Liebe Grüße Sandra

AW: Verlinkung durch VBA

18.10.2017 14:39:31

Martina

Vielen Dank euch beiden. Klappt wunderbar.
Liebe Grüße und eine schöne Restwoche .

Gerne, wünsche ich Dir auch...(owT)

18.10.2017 14:44:59

Sandra

AW: Verlinkung durch VBA

18.10.2017 14:11:24

Bernd

Hi,
im Netz gefunden, eventuell auch eine Lösung:

Sub Hyperlink()
Dim Angebot
'Hyperlink für Angebot generieren
MsgBox "Verzeichnis," & Chr(13) & _
"bitte im folgenden Fenster auswählen, damit es als Hyperlink eingefügt wird.",  _
vbInformation, "Hinweis"
Angebot = Application.GetOpenFilename
If Angebot  False Then
Sheets("Tabelle1").Range("A1").Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=Angebot, _
SubAddress:="", TextToDisplay:="Link zur Datei"
End If
End Sub

MfG Bernd

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!