Jag är fullständig newbie på att skapa makron och har helt kört fast på en sak som borde vara simpel.
Jag hoppas på er hjälp!

Jag har ett flertal filer i excel som jag ska göra ett påslag på och sedan spara som PDF med samma namn som arbetsboken heter.
Just sparandebiten strular här... Jag fattar inte hur en sparar med unikt namn för varje ny arbetsbok. Mitt makro vill ju spara över tidigare skapad fil hela tiden.
Såhär ser det ut nu:
 

Sub SITSSE()

'

' SITSSE Makro

'

' Kortkommando: Ctrl+Skift+Q

'

    Range("N3").Select

    ActiveCell.FormulaR1C1 = "1.15"

    Range("N4").Select

    ChDir "C:\Users\Maria-SITS\Dropbox\PRISLISTOR\STORN\2016-04-01"

    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _

        "C:\Users\Maria-SITS\Dropbox\PRISLISTOR\STORN\2016-04-01\PEGGYPrislista SE2016.pdf" _

        , Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _

        :=False, OpenAfterPublish:=False

        MName = ActiveSheet.Name & ".xls"

MDir = ActiveWorkbook.Path

ActiveWorkbook.SaveAs Filename:=MDir & "\" & MName

    ActiveWindow.Close

End Sub


Hjälp?

Tack för hjälpen sist!
Nu sitter jag med samma projekt på nytt med nya prislistor på g. Har tyvärr inte sparat den slutliga koden från förra gången.
Mina PDF'r sparas, men nu sparas de med namnet "Personal.xlsb" vilket är namnet för min arbetsbok med makros. Jag har dolt denna arbetsbok men ändå så blir det såhär.
Jag misstänker att det har att göra med den där ordningen på sparande osv att göra, men jag vet inte hur det ska se ut...
Hjälp mig please? Tack!

Såhär ser koden ut nu:


 Sub PDF()