Vedhæfte fil når der printes fra Excel

Hvilken Excel-version?

2007

PS: Hvordan ser koden ud vedr. print?

Sådan:

Sub Print_()
    '
    ' Print_ Macro
    '
    '
   
    '
    'Dim my_value As String
   
    'my_value = ActiveSheet.PageSetup.LeftFooter = Range("V791").Value
    With ActiveSheet.PageSetup
   
   
        ActiveSheet.PageSetup.LeftFooter = "&""Myriad Pro""&9" & "  " & _
    (Range("AZ557").Value) & (Range("BA557").Value) & (Range("BB557").Value)
   
 
        'ActiveSheet.PageSetup.LeftFooter = Range("v791").Value
 
        '.CenterFooter = "&D" & Chr(10) & "&T" & Chr(10) & "&N"
       
        .LeftMargin = Application.InchesToPoints(0.7)
        .RightMargin = Application.InchesToPoints(0)
       
        '.LeftFooter = _
        '"&""Myriad Pro,Regular""&9"
       
        .PrintGridlines = False
        .PrintQuality = 600
        .Draft = False
    End With
    ActiveWindow.SelectedSheets.PrintPreview
End Sub

Når du skriver "Vedhæfte fil når der printes fra Excel
" - så tænker jeg umiddelbart på en mail - men mener du blot at pdf-filen også skal udskrives?

Ja. Jeg har måske formuleret mig forkert. Jeg mener, at indholdet i pdf'en skal printes sammen med indholdet i excel-arket. Det bedste vil være, hvis det "vedhæftes", så det kan ses i "Print preview", men ellers at det "bare" printes.

Prøv at "Google" VBA+Print+PDF - har fundet noget der - men mangler endnu en detalje.

Tro mig, jeg har googlet og googlet, men jeg syntes ikke jeg kan finde noget brugbart :)

Jeg tror dig :-)

Det jeg mangler er hvilken referance, der skal avendes for at åbne en pdf-fil fra Excel.

Det jeg har fundet er følgende:

Const stiPDF = "C:\Dokumentation\Ordrebekræftelse_Office_2010.pdf"
Dim strPDFFileName As String
Sub udskrivPDF()
    openPDF
    PrintPDF strPDFFileName
End Sub
Private Sub openPDF()
    strPDFFileName = stiPDF
'    Documents.Open strPDFFileName  <---- her er problemet
End Sub
Private Sub PrintPDF(strPDFFileName As String)
Dim sAdobeReader As String
    sAdobeReader = "C:\Program Files (x86)\Adobe\Reader 9.0\Reader\AcroRd32.exe"
    RetVal = Shell(sAdobeReader & "/P" & Chr(34) & strPDFFileName & Chr(34), 0)
End Sub

Hmmm. Det er jeg ikke dygtig nok til at gennemskue, men jeg kan godt se, at den fejler, hvis jeg sætter koden ind i Visual Basic.
Jeg tænker også om det ikke kan volde problemer at skrive den præcise sti til Acrobat? Der kan jo være forskel på hvor brugerne har programmet liggende?

Nu tænker jeg bare lige højt ;)
Kan man måske linke dokumentet ind i Excel og gøre det til en del af min "print selection"? Jeg har ingen anelse om om det overhovedet kan lade sig gøre - det var bare en tanke :)

Hvor stammer indholdet i PDF-filen fra?

Indholdet er egentlig bare et Indesign dokument, som er konverteret til en pdf. Grunden til, at jeg gerne vil hente pdf'en fra nettet er, at jeg så er sikker på, at jeg altid for den reneste opdaterede version.

Ok - vi må se om der dukker noget op..

God weekend.

Hmmmm. Lukker :(