Oprette to faneblade som PDF og gemme fil me fakturanummeret

Optag det som makro og ret i den - det ser ud til, at det kun er fakturanummeret, der skal rettes.

Du kan måske se på dette program det kan konvertere excel til pdf. Jeg har ikke selv prøvet det så jeg ved ikke helt hvordan det virker.

http://www.weenysoft.com/free-pdf-to-excel-converter.html

Jeg har prøvet deres program til at konvertere html til pdf og det virker rigtig godt.

Nå ja, du skal også have en pdf printer installeret - fx bullzip - er gratis.

Anbefaler PDFCreator som konverter:

http://www.pdfforge.org/blog/pdfcreator-30-release

Forslaget i #2 ser ud til at være den modsatte vej. Fra pdf til Excel.

#5 Ja det burde være den her så:

http://www.weenysoft.com/excel-to-pdf-converter-online.php

#6 Det ser kun ud til at være online

Prøv denne makro:

Sub GemPDF()
    Dim nabnv As String
    navn = Sheets("Faktura").Range("a1").Value
  ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "C:\Excel\Faktura\" & navn & ".pdf", Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
        True
End Sub

De to ark skal være markeret inden du afspiller makroen.

Prøv, at læse denne tråd:
https://www.computerworld.dk/eksperten/spm/1019856

Dette er vist, mere eller mindre, hvad du efterspørger :-)

Svar til jkrons:
Tak…. lige hvad jeg manglede.
Min tanke var at lave en makroknap, der samtidig markerede de to faneblade.
Jeg har derfor tilføjet denne linje i din kode:

Sheets(Array("Faktura", "Bilag")).Select

Det virker som sådan efter hensigten, men problemet er, at i PDF filen vises ”Bilag” før ”Faktura”.
Mit ønske var det modsatte…at fakturaen står først og dernæst bilaget.
Jeg tænker at det skyldes rækkefølgen på fanebladene i min workbook, her er ”Bilag” nemlig placeret  før ”Faktura”
Findes der en smart løsning på det, eller skal jeg ommøblere min  workbook ?

Det er præcist på grund af rækkefølgen :-)

Enten skal du ændre rækkefølgen i din workbook, som du selv nævner, eller også skal du lave en lille sub-rutine i din makro, der ændre rækkefølgen, før udskrift, og ændre tilbage igen, efter udskrift.

#8
Hej igen....
Et yderligere spørgsmål (mer vil ha mer :-) )
Hvis jeg ønsker at gemme den same fil I en anden folder også, hvordan er koden så på det?
DVS at den skal gemme både I : C:\Excel\Faktura\
plus : C:\Excel\Legal\

Så laver du blot samme linje en gang til, men udskifter stien:

Altså både...

  ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "C:\Excel\Faktura\" & navn & ".pdf", Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
        True

...og...

  ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "C:\Excel\Legal\" & navn & ".pdf", Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
        True

Dog vil jeg nok sætte 'OpenAfterPublish" til 'False' på den første...

Du har helt ret i, at Excel udskriver (også til PDF) i den rækkefølge arkene står i mappen, men du gbehøver ikke at lave om på rækkefølgen permanent. Du kan lade makroen gøre det for dig:

Sub GemPDF()
    Dim navn As String
    Dim foerark As String
    navn = Sheets("Faktura").Range("a1").Value
    foerark = Sheets("Faktura").Previous.Name
    Sheets("Faktura").Move Before:=Sheets("Bilag")
    Sheets(Array("Bilag", "Faktura")).Select
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "C:\Excel\Faktura\" & navn & ".pdf", Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
        True
  Sheets("Faktura").Move after:=Sheets(foerark)
End Sub

Her flytter makroen "Fatura" hen før "Bilag", laver pdf-filen og flytter Faktura tilbage, hvor arket oprindeligt var placeret.

#14: Altså, præcist, som jeg skrev i #11  :-)

Takker for brugbart input fra jkrons & Dan Elgaard.

Har implementeret det hele I min fil.....og det virker perfekt :-)