Hirdetés
- sziku69: Szólánc.
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- bambano: Bambanő háza tája
- Candy: AOOSTAR WTR PRO – NAS, alkoss, gyarapíts
- suste: Openwrt Barrier Breaker 14.07 saját verzió Tp-link routerekre
- dobragab: PH! userscript-gyűjtemény
- Luck Dragon: Alza kuponok – aktuális kedvezmények, tippek és tapasztalatok (külön igényre)
- Cifu: Űrhajózás 2025 - Összefoglaló írás
-
LOGOUT
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
Sprite75
tag
Sziasztok
Van nálunk egy rendelésfelvevő táblázat amihez már nagyon sok segítséget kaptam tőletek amikor készült.
Tavaly szeptember óta tökéletesen működik.Van benne egy összesítő lap amit naponta többször is nyomtatnak, akár óránként.
Ezt szeretném megszüntetni, hogy csak erről a lapról egy PDF készüljön egy másik PC megosztott mappájába, és ne kelljen feltétlenül nyomtatni.Barkácsoltam hozzá az alábbi makrót, de azt nem tudom benne megoldani, hogy a készülő PDF file neve tartalmazza a mai dátumot és az óra percet (pl ilyen formátumban 2017.03.30.11.25.pdf)
Jelenleg ha az A44 cellába kézzel beírom így a dátumot és az órát akkor működik, viszont ha =MOST() -al akarom megcsinálni akkor Run-time error hibát kapok.
Próbáltam a barátom (google) által kidobott mások által írt makrókból ilyet vadászni de csak nem sikerült magamnak úgy módosítani, hogy jó legyen
Szóval a kód a következőSub PDFment()
'
' PDFment Makró
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="\\TICKETNYOMTATO\Megosztott\Rendelés\" & Range("A44").Value _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=True
End SubÁt tudná ezt valaki írni úgy hogy ez ilyen legyen a készülő file neve 2017.03.30.11.25.pdf
Előre is köszönöm szépen
Új hozzászólás Aktív témák
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Game Pass Ultimate előfizetések 1 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- The Elder Scrolls Online Imperial Collector s Edition
- Honor Magic5 Lite / 6/128GB / Kártyafüggetlen / 12Hó Garancia
- 27% Számlával! ASUS ROG Loki 1000W 80 PLUS Platinum Tápegység!
- ÁRGARANCIA! Épített KomPhone Ultra 9 285K 32/64GB RAM RX 9070 XT 16GB GAMER PC termékbeszámítással
- ÚRIS10!!! RAMÁRON! LEGION 5 i7-13650HX 32GB RAM 1000GB SSD RTX 5070 8GB
- SanDisk Extreme Portable 8TB (SDSSDE61-8T00-G25) (ELKELT)
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50