Makro med "Opret PDF/Email"

Jeg har lige optaget denne ved at flytte funktionen "Udgiv som PDF eller XPS" op på båndet:
-----
Sub Udskriv_PDF()
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "C:\Documents and Settings\X\Skrivebord\Mappe2.pdf", Quality:= _
        xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=True
End Sub
-----
HUSK at rette stien til den rette på din PC!
/Be_Nice

Hvad mener du med at du har flyttet funktionen op på båndet?

"Båndet" er dine nye genveje til ofte brugte kommandoer i Excel - du får lige lidt info omkring "Båndet" sakset direkte fra Excel hjælp:
-----
Båndet, som er en del af Microsoft Office Fluent-brugergrænseflade, har til formål at gøre det let at finde de kommandoer, du skal bruge til at udføre en opgave. Kommandoer er organiseret i logiske grupper, som er samlet under faner. Da hver fane er relateret til en bestemt type aktivitet, f.eks. skrivning af en side eller oprettelse af et layout for en side, er det ikke muligt at tilpasse båndet uden at bruge XML- og programmeringskode.

Følgende er fanen Indsæt på båndet i Microsoft Office Word 2007.

Ting, du ikke kan gøre
Tilføje kommandoer eller ændre placeringen af kommandoerne på båndet
Ændre eller fjerne en kommando eller gruppe på båndet
Føje faner til båndet, medmindre du bruger XML- og programmeringskode
Skifte til værktøjslinjer og menuer fra tidligere versioner af Microsoft Office
Ting, du kan gøre
Minimere båndet for at skaffe mere plads på skærmbilledet
Flytte værktøjslinjen Hurtig adgang for at placere den under eller over båndet
Tilpasse værktøjslinjen Hurtig adgang for at tilføje knapper, som repræsenterer de kommandoer, du bruger ofte
Bruge XML- og programmeringskode til at udvide Fluent-brugergrænseflade ved at tilføje brugerdefinerede faner, knapper, afkrydsningsfelter eller dialogboksstartere. Du kan få yderligere oplysninger ved at gå til MSDN (Microsoft Developer Network).
-----
/Be_Nice

Jeg har prøvet at kopiere din kode ind i min makro. Det virker ikke.
Syntax error!

Og du har husket at ændre stien?
Du kan alternativt gøre samme øvelse som mig, og tilføje den nævnte funktion til "Båndet" og så selv optage en makro - så skulle det gerne fungere.
/Be_Nice

Men den ligger jo på båndet, den funktion jeg gerne vil bruge. Den ligger under eDocPrinter.

eDocPrinter er en ekstern printer du har installeret - og jeg er ikke sikker på om du kan få Excel til at optage en makro med denne (måske kan andre kloge sig på det)
Excel har indbygget pdf printer (den som jeg henviser til) og derfor vil jeg foreslå at du tilføjer denne på "Båndet" for at få det til at virke hos dig.
/Be_Nice

Okay, hvordan får jeg den tilføjet på båndet?

Klik på pilen for at tilpasse værktøjslinien hurtig adgang
Vælg kommandoen "Flere kommandoer" og find/tilføj funktionen "Udgiv som PDF eller XPS".
/Be_Nice

Okay, nu har jeg fået tilføjet knappen, men der sker ingenting når jeg klikker på den.

Så har jeg ikke umiddelbart noget bud på hvad der kan være galt - denne funktion skulle gerne som std. opsætning åbne en dialogboks hvor du kan gemme pdf eller xps.
Måske kan andre eksperter assistere med et bud på hvad du skal gøre for at få det til at virke.
/Be_Nice

Okay, men tak for hjælpen alligevel!