S.azon1953 Postad 26 februari, 2020 Share Postad 26 februari, 2020 Jag har skapat den här enkla koden och jag vill skriva ut mitt resultat till en pdf-fil där filnamnet skall skapas av de 3 angivna cellerna, jag får inga felmeddelanden och det är bara cell H17 och C17 som finns med i filnamnet .pdf . Allt fungerar utom att cell E8 är inte inkluderat i filnamnet . Vad är problemet ? Sub Utskrift() Dim wb As Workbook Dim NewFN As String With Blad2 ' Skapa filnamnet av 2 celler .pdf NewFN = PathBuilder(.Range("H17"), .Range("C17"), .Range("E8"), "pdf") .ExportAsFixedFormat Type:=xlTypePDF, Filename:=NewFN End With End Sub Function PathBuilder(rnSource1 As Range, rnSource2 As Range, rnSource3 As Range, suffix As String) As String Dim basePath As String basePath = "C:\" PathBuilder = basePath & rnSource1.Value & rnSource2.Value & rnSource3.Value & "." & suffix End Function Länk till kommentar Dela på andra webbplatser More sharing options...
Solution S.azon1953 Postad 26 februari, 2020 Trådskapare Solution Share Postad 26 februari, 2020 Hej EForum, Jag får svara själv och det var enbart en typisk excel händelse och tankevurpa. Jag hade sammanfogade celler och därför adresserades in rätt cell. Koden är hundra procent korrekt om ni vill använda den. Tack för ett utmärkt forum Cecilia reagerade på detta 1 Länk till kommentar Dela på andra webbplatser More sharing options...
Monshi Postad 26 februari, 2020 Share Postad 26 februari, 2020 Välkommen till Eforum Cecilia reagerade på detta 1 Länk till kommentar Dela på andra webbplatser More sharing options...
Rekommendera Poster