Hirdetés
- Luck Dragon: Asszociációs játék. :)
- Elektromos rásegítésű kerékpárok
- Meggyi001: Áram nélkül....méltóság nélkül.....
- sziku69: Szólánc.
- sziku69: Fűzzük össze a szavakat :)
- Mr Dini: Mindent a StreamSharkról!
- gban: Ingyen kellene, de tegnapra
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
- hcl: GPT diszk kisebbre klónozása
-
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
-
Fferi50
Topikgazda
válasz
Pikkolo^^
#32160
üzenetére
Szia!
Igen, meg kell nyitnod hozzá a Word alkalmazást az Excel makróban, abba kreálni egy új dokumentumot és az Excel tartalmat belemásolod.
Sub wordos()
Dim wrd As Object, wd As Document
Set wrd = CreateObject("word.application") 'Word nyit
wrd.Visible = True
Set wd = wrd.documents.Add 'új dokumentumot nyit
ActiveSheet.UsedRange.Copy 'kijelölöd a másolandó területet (pl. Range("A1:F25")
wrd.Selection.Paste 'ha képként szeretnéd beilleszteni, akkor PasteSpecial, paraméterekkel HELP segít
wrd.Activate
wd.Save 'itt meg kell adnod, hogy milyen néven mented
wrd.Quit ' Word bezár
End SubFigyelem! A makró futtatása előtt a VBA ablak Tools Menüjében a References menüpontban be kell jelölnöd a megfelelő Microsoft Word könyvtárat!!! (pl. 2016-os nál Microsoft Word 16.0 Object Library).
Üdv.
Új hozzászólás Aktív témák
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- PC Game Pass előfizetés
- MS SQL Server 2016, 2017, 2019
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - 15% AKCIÓ
- 27% - GIGABYTE RX 7900 XTX GAMING OC 24GB GDDR6 Videokártya! BeszámítOK
- (TÖBB DARAB, KÉSZLETEN) SAMSUNG/ KINGSTON DDR4 8GB RAM - Memoria modul
- HP Pavilion 15 - 15,6" Full HD - Intel Pentium N3710 - 4GB - 500GB HDD - Win10 PRO - MAGYAR - DWD R
- Sony Ps5 konzol slim
- ÁRGARANCIA! Épített KomPhone i5 12400F 16/32/64GB RAM RTX 3060 12GB GAMER PC termékbeszámítással
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50