lagre excel som pdf etter verdi i celle

[Trelkrok]

Hei, jeg driver og lager ett pakkseddelprogram.

Oppstart fil kalles Pakkseddler 2016

Videre har jeg har en fane som kalles "Pakkseddler" og i celle "J2" vises pakkseddelnummer. Jeg følgende makro som endrer nummer ved oppstart av ny pakkseddel og som fungerer fint.

 

Sub Button3_Click()

 

'

    

Dim t As Integer

t = [J2] + 1

Range("j2").Value = t

 

 

 

Alt dette ligger i en mappe som jeg kaller "Pakkseddler 2016"

 

Det jeg ønsker er en makro som lagrer pakkseddelen i PDF i samme mappe som jeg starter i med følgende tekst:

Pakkseddel 1, Pakkseddel 2, Pakkseddel 3 osv etter hvilket nummer som står i arkfane "Pakkseddler" celle J2

 

Håper noen kan hjelpe meg med dette og skjønner hva jeg mener

 

På forhånd takk

 

[Hårek]

Det holder med en tråd. https://www.diskusjon.no/index.php?showtopic=1717756