Makro für Hyperlink

Question

Hallo Leute,
Ich habe da ein kleines Problem, bei dem ich nicht selber weiterkomme.
Ich möchte ein Makro in eine Tabelle einfügen, der eine Vorlagedatei im XLT Vormat geöffnet wird.
Danke für die schnellen Antworten.

Answer 1

Hallo,

benutze doch den Makrorecorder, und zeichne Datei Neu auf.

Gruß Hajo

Answer 2

Hallo Hajo Zi
Das was du vorschlägst mag ja richtig sein, nur bin ich jetzt immer noch nicht schlauer.
Hab leider keine Ahnung was ich machen soll!

Könnstest Du mir vielleicht genauere Anweisungen geben?

Bis jetzt habe ich bloss folgenden Cod im Netz kopiert:

Sub Hypertest()
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
"P:\6.1_Vorlagen\Kalkulation + Bestellung\Leitfadenzeiten_Fassade.xlt"
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=False
End Sub

Dieser öffnet zwar die geforderte Datei, aber leider nur in xls Version.
Gleichzeitig wird der Hyperlink bei der schon geöffneten Datei geschrieben, was ich aber eigentlich gar nicht möchte.

über weitere Vorschläge würde ich mich sehr freuen.

Answer 3

Hallo Namenloser,

nachfolgendes Makro sollte Deine Vorlagendatei öffnen.

Kopiere das Makro in ein StandardModul und starte es z.B. über eine Befehlsschaltfläche
Teste das Makro aber bitte in einer Testdatei und nicht gleich in Deiner Originaldatei.

Sub Hypertest()
Workbooks.Open Filename:="P:\6.1_Vorlagen\Kalkulation _
+ Bestellung\Leitfadenzeiten_Fassade.xlt", Editable:=True
End SubbSolltest Du nicht wissen, wie Du den Code in Deine Datei bekommst, dann schau mal auf meiner HP in der Rubrik Anleitungen und dort dann in der Anleitungsnummer 3 nach. Dort stelle ich dazu eine bebilderte Anleitung zur Verfügung, die Dir sicherlich helfen wird.

Bei Fragen melde Dich.

MfG,
Oliver
[sub]Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du[/sub]
[sup] ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.[/sup]

Answer 4

Hallo Oliver

Besten Dank für deine Hilfe
Genau dass ist es, wonach ich gesucht habe.

Gruss Peter

Answer 5

Hallo Peter,

gerne geschehen. Freut mich, dass alles funktioniert. Danke auch für die Rückmeldung.

MfG,
Oliver
[sub]Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du[/sub]
[sup] ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.[/sup]