Hjælp til "Gem som" Makro
Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=5072
Udskrevet den: 03.Dec.2024 kl. 18:45
Emne: Hjælp til "Gem som" Makro
Besked fra: Nignag
Emne: Hjælp til "Gem som" Makro
Posteringsdato: 19.Apr.2024 kl. 14:46
|
Jeg skal lave en makro hvor mange skal gemme et faneblad som PDF via exporter funktionen. Mit problem er, at jeg gerne vil stoppe makroen ved "Publicer som" vinduet, så man selv skal indtaste filnavn. Men dette er ikke muligt, da "Stop indspilning" ikke er muligt. Nogen som kan hjælpe?
|
Svar:
Besked fra: Bjarnehansen
Posteringsdato: 19.Apr.2024 kl. 15:07
|
Prøv at /topic662.html - upload dit ark så vil det være letter at hjælpe dig ------------- Husk, at trykke på [Tak], hvis du kan lide et indlæg. Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag. Med venlig hilsen - Bjarne Hansen - Microsoft 365 DK |
Besked fra: maxzpad
Posteringsdato: 22.Apr.2024 kl. 10:21
| Jeg tænker, det kan løses med en InputBox i makroen, hvor brugerne indtaster det ønskede filnavn, som så opfanges i en streng-variabel, som anvendes i "udskriv til PDF"-kaldet. |
Besked fra: Bjarnehansen
Posteringsdato: 22.Apr.2024 kl. 10:27
|
uploads/397/Master-Timeseddel_version_2.00.003_til_DFR.xlsm" rel="nofollow - uploads/397/Master-Timeseddel_version_2.00.003_til_DFR.xlsm prøv at om der er noget du kan bruge til inspiration den danner PDF fil navnet ud fra dit navn måned og år som den gemmer på fanen setup ------------- Husk, at trykke på [Tak], hvis du kan lide et indlæg. Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag. Med venlig hilsen - Bjarne Hansen - Microsoft 365 DK |
Besked fra: Bjarnehansen
Posteringsdato: 06.Maj.2024 kl. 13:08
nå han er nok løbet igen....... ------------- Husk, at trykke på [Tak], hvis du kan lide et indlæg. Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag. Med venlig hilsen - Bjarne Hansen - Microsoft 365 DK |
Besked fra: Nignag
Posteringsdato: 21.Jun.2024 kl. 10:25
|
Hej Igen Kan se at jeg aldrig fik reageret på jeres fine svar. Jeg løste det med følgende makro ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "K:\Industri\DIST XX Projekter TLJ\Indkøringer\" & Range("B6") & " - " & Range("D21") & " - " & Range("J21") & " - " & Range("N21").Value _ , Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _ :=False, OpenAfterPublish:=False |