Flere ark i excel til en PDF fil
Application.Goto Reference:="Ark1UD"Application.Goto Reference:="Ark2UD"
Application.Goto Reference:="Ark3UD"
'
Sheets(Array("Ark1 diagram", "Ark2 diagram", "Ark3 diagram")) _
.Select
Sheets("Ark1 diagram").Activate
Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Min Mappe.pdf" _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=True
Ovenstående kode samler de 3 sider i excel til en PDF fil og gemmer den.
Jeg vil gerne have det ændret til
1. at jeg kan "bestemme hvilken mappe filen skal gemmes i(som nu)
2. at filnavnet skal komme fra celle T12, Ark1
3. at hvis filen eksisterer, skal der komme en (fejl)meddelse.
Det må være "noget" med save as dialog, der skal frem
Bruger Excel 2013. Makroen skal aktiveres inde fra Excel
