pad naar bestand met 2 variabelen

Oude leerling · 14 mrt 2017

Geacht forum
Ik wil een bestand openen met onderstaande code.

Naam1 is een map met de naam van de klant
In die map zit een bestand met de naam , " klantnaam + Factuurnummer" (Naam2)
Ik heb het geprobeerd met onderstaande code maar dat lukt niet.
Kunt u mij helpen met de juiste code?

Code:

  Sub macro1()
Dim Naam1 As String
Dim Naam2 As String
    Naam1 = Range("B6").Value 'klantnaam
    Naam2 = Range("B6").Value & " " & Range("D16").Value    'klantnaam + faktuurnummer
    
Workbooks.Open Filename:="C:\Users\Gebruiker\Documents\Facturen 2017\" & Naam1 & Naam2".pdf"
End Sub

edmoor · 15 mrt 2017

Dit lijkt me dan voldoende:

Code:

Sub macro1()
    Workbooks.Open Filename:="C:\Users\Gebruiker\Documents\Facturen 2017\" & _
    Range("B6").Value & "\" & Range("B6").Value & " " & Range("D16").Value & ".xlsx"
End Sub

Van .pdf heb ik .xlsx gemaakt. Ik weet niet of je dat bedoelt, maar een PDF bestand kan je niet openen met Workbooks.Open omdat het geen Workbook is.

snb · 15 mrt 2017

Wat is de volledige, uitgeschreven naam (inclusief pad) van het bestand.
Deze controlestappen kun je ook zelf bedenken om in te bouwen in de macro:

Code:

Sub macro1()
    Naam1 = Range("B6").Value 'klantnaam
    msgbox naam1
    Naam2 = Range("B6").Value & " " & Range("D16").Value    'klantnaam + faktuurnummer
    msgbox naam2
    
    msgbox "C:\Users\Gebruiker\Documents\Facturen 2017\" & Naam1 & Naam2".pdf"

'    Workbooks.Open Filename:="C:\Users\Gebruiker\Documents\Facturen 2017\" & Naam1 & Naam2".pdf"
End Sub

Oude leerling · 15 mrt 2017

edmoor,
Jouw code werkt en deed mij ook inzien welke fout ik maakte met mijn code met Naam1 en Naam2
Tussen Naam1 en Naam2 moest nog een "/" geplaatst worden en een & tussen Naam2 en .pdf

Code:

.addattachment "C:\Users\Gebruiker\Documents\Facturen 2017\" & Naam1 & "/" & Naam2 & ".pdf"

snb,
Workbook.open was een probeerseltje het ging om een addattachment
Niet zo slim van me om de vraag op deze manier te stellen.
msgbox was iets nieuws voor me en een prachtig iets , het heeft me geholpen om de oplossing te controleren.
Beide forumleden bedankt voor de oplossingen
Vriendelijke groet , Jaap

pad naar bestand met 2 variabelen

Oude leerling

Gebruiker

edmoor

Inventaris

snb

Verenigingslid

Oude leerling

Gebruiker

Nieuwste berichten

Wij waarderen jouw privacy