Schaltfläche für PDF-Datei

[cuba]

Hallo Forum

Habe in Modul 1 die unten angefügte Schaltfläche eingebaut, aber da öffnet sich nicht das PDF sondern Excel mit vieln unslesbaren Zeichen.
Alle anderen Schaltflächen funktionieren, sind aber für Excel-Listen

Sub Schaltfläche185_Klicken()
Workbooks.Open "c:\xxxxx-Sales\Preislisten\CH-Preisliste-2015.pdf"
End Sub


Was genau mache ich da falsch?

Gruss
cuba

[Rabe]

Hi,

Was genau mache ich da falsch?

Du öffnest ein PDF als Workbook, das kann nicht gehen.

[cuba]

Hi,

Was genau mache ich da falsch?

Du öffnest ein PDF als Workbook, das kann nicht gehen.

OK..... Rabe

Gibt es eine andere Lösung, mit der ich ein PDF über eine Schlatfläche öffnen kann?

LG
cuba

[Peter]

Hallo,

ich habe mit VBA nicht viel am Hut, aber so funktioniert es bei mir unter XL2010:

Code:

Sub Schaltfläche1_Klicken()
Set wshshell = CreateObject("WScript.Shell")
  wshshell.Run "C:\test\TEST.PDF"
End Sub

[cuba]

Hallo Leute

Habe die Zelle in der gleichen Farbe wie die Buttons gefärbt und mir einen Hyperlink, nicht unterstrichen und in schwarzer Schrift gebaut. so geht es auch, obwohl es mich interessiert hätte, ob das wirklich nicht mit einem Formularstuerungselement funktioniert hätte.

LG
cuba

[Rabe]

Hi,

obwohl es mich interessiert hätte, ob das wirklich nicht mit einem Formularstuerungselement funktioniert hätte.

klar, wenn Du Peters Makro mit Deinem Formularsteuerelement aufrufst!