Zoeken naar bestand met celwaarde in naam

[MegaSaxon]

Beste helpers

Ik zou graag een macro willen gebruiken die aan de hand van een celwaarde een bestand in een map zoekt en opent.

Ik heb bijvoorbeeld 123.pdf in map 100-199 staan.
Map 100-199 staat weer in map PDF.
In map PDF staan de mappen 100-199, 200-299, 300-399, enz...

In kolom A staan staan de verschillende waarden, bijvoorbeeld: in cel A1 staat de waarde 100, in A2 staat de waarde 101, in A123 staat de waarde 123.
Nu wil ik graag, door bijvoorbeeld cel A123 te selecteren en op een knop te klikken die gekoppeld is aan een macro, in de map PDF, in de onderliggende mappen naar bestand 123.pdf zoeken en deze openen.

Ik wil hierbij geen hyperlink gebruiken.

Kun je mij hierbij helpen?

 

[oeldere]

Ik wil hierbij geen hyperlink gebruiken.

Waarom wil je dit niet?

 

[Ginger]

Een PDF in Excel openen??? Volgens mij gaat je dat niet lukken!

Groet, Leo

 

[HSV]

Maar een .pdf openen gaat wel met een Excel -macro Leo.

Sub HSV()
 Dim AcroPad As String, bestand As String
 AcroPad = "C:\Program Files\Adobe\Reader 9.0\Reader\AcroRd32.exe"
  bestand = " D:\PDF\" & Mid(Range("A123"), 1, 1) & "00 - " & Mid(Range("A123"), 1, 1) & "99\" & Range("A123") & ".pdf"
 Shell AcroPad & bestand, vbMaximizedFocus
End Sub

Ps. Verander evt. Mid Range("A123"),1,1) naar Mid(Activecell,1,1)

 

[Ginger]

@Harry, nóóit geweten! Dank hiervoor.

Groet, Leo

 

[MegaSaxon]

Beter laat dan nooit, maar dank voor de hulp.