PDF med felt som navn

Går ud fra at kasse og dato er definerede navne, hvis indhold du vil anvende !!!

fil = "c:\opgørelser\" & [kasse] & " - " & [dato] & ".pdf"

Ja det er korrekte, det er fordi den skal lave flere forskellige alt efter hvilken kasse, men samtidig anvende dato'en fra feltet dato

Indtil videre har jeg

Application.ActivePrinter = "Acrobat PDFWriter på LPT1:"
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
        "Acrobat PDFWriter på LPT1:"

men synes nu ikke der sker noget hvis jeg tilføjer følgende

    fil = "c:\opgørelser\" & Range("kasse") & " - " & Range("dato") & ".pdf"

Nu har jeg prøvet med følgende, arket kommer helt fint op på skærmen i PDF reader, men hvis jeg efterfølgende lukker denne op prøver at åbne filen igen, melder den en fejl og pdf filen fylder også 0 kb

Const stPath As String = "C:\Opgørelse\"
Dim stFilnavn As String
    stFilnavn = "Opgørelse til KTP - " & Range("dato") & ".pdf"
    'udskriv til pdfprinter
    ActiveWindow.SelectedSheets.PrintOut copies:=1, ActivePrinter:="Acrobat PDFWriter på LPT1:", _
            Collate:=True, prtofilename:=stPath & stFilnavn, PrintTofile:=True

Det har jeg ikke umiddelbart en løsning på, ved ikke lige hvornår jeg får tid til at studere det nærmere.

hmm, jeg må jo bare prøve mig selv frem, men jeg lukker bare spørgsmålet nu