Na kopírovanie údajov z Excelu do súboru programu Word pomocou VBA potrebujeme prístup k aplikácii Word pomocou programu Excel VBA. V tomto návode sa naučíme, ako otvoriť aplikáciu Word, pridať dokument a skopírovať a vložiť do nej údaje z Excelu.
V tomto článku použijeme metódu Early Binding na vytvorenie objektu aplikácie Word namiesto použitia neskorej väzby. Podrobne si o tom môžete prečítať tu.
Proces kopírovania údajov programu Excel do súboru programu Word pomocou programu Excel VBA
Ak chcete skopírovať údaje z programu Excel do súboru programu Word pomocou jazyka VBA, musíte samozrejme najskôr otvoriť aplikáciu Word. Potom k nemu pridajte dokument (ak chcete nový dokument). Skopírujte údaje zo súboru programu Excel. Vyberte odsek v dokumente a prilepte ho. Nakoniec dokument uložte a zatvorte. Každý z týchto krokov je možné vykonať jednoducho z Excelu. S dokumentom programu Word nebudete musieť komunikovať.
Začnime s príkladom bez toho, aby sme sa dostali ďalej k teórii. Pretože Iron Man povedal: „Niekedy musíš bežať, než môžeš chodiť“.
Príklad: Prilepte údaje programu Excel do programu Word pomocou VBA
Nasledujúci kód je príkladom toho, ako môžete skopírovať určitý rozsah programu Excel a vložiť ho do nového dokumentu programu Word a uložiť ho na disk, aby ste ho mohli použiť neskôr.
„Kód VBA na zápis a kopírovanie údajov z Excelu do dokumentu Sub ExcelToWord ()“ Použitie včasnej väzby Dim wordApp ako Word. Aplikácia Dim mydoc ako Word.Document „Vytvorenie novej inštancie slova iba vtedy, ak neexistujú žiadne ďalšie inštancie Nastaviť wordApp = New Word.Application 'Making word App Visible wordApp.Visible = True' Vytvorenie nového dokumentu Set mydoc = wordApp.Documents.Add () 'kopírovanie obsahu z excelového listu ThisWorkbook.Worksheets ("sheet1"). Range ("A1: g20 "). Skopírujte 'Vkladanie na dokument mydoc.Paragrafy (1) .Range.PasteExcelTable _ LinkedToExcel: = False, _ WordFormatting: = False, RTF: = False' uloženie dokumentu mydoc.SaveAs2" MyDoc "'zatvorenie dokumentu mydoc .Zavrite 'Vyprázdnenie schránky CutCopyMode = Falošný koniec Sub
Vysvetlenie kódu:
Každý krok v samotnom kóde som vysvetlil pomocou komentárov, ale povedzme si niečo o riadkoch, ktoré sme použili v tejto časti.
'Vytvorené premenné aplikácie Word a typu dokumentu
Dim wordApp As Word.Application
Dim mydoc ako Word.Document
Tu sme deklarovali dve premenné požadovaných typov. Môžeme to urobiť, pretože odkaz na slovo aplikácia sme už pridali. Môžete to urobiť tak, že prejdete na nástroje v ponuke. Nájdite možnosť referencie a potom vyhľadajte slovo odkaz.
„Vytvorenie novej inštancie slova iba vtedy, ak neexistujú žiadne ďalšie inštancie
Set wordApp = New Word.Application
„Zviditeľnenie aplikácie Word
wordApp.Visible = Pravda
„Vytvorenie nového dokumentu
Nastaviť mydoc = wordApp.Documents.Add ()
V prvom riadku vyššie zamýšľame premennú wordApp s objektom typu Word.App pomocou kľúčového slova New. Tým sa otvorí aplikácia Word.
V druhom riadku zviditeľňujeme slovo aplikácia, aby sme s ním mohli pracovať.
V nasledujúcom riadku pridáme nový dokument do aplikácie Word pomocou funkcie Word.Documents.Add (). Toto je uložené v premennej mydoc.
„kopírovanie obsahu z listu programu Excel
ThisWorkbook.Worksheets ("sheet1"). Range ("A1: G20"). Copy
Tu jednoducho kopírujeme rozsah z Excelu. Určite ste to už urobili. Je uložený v schránke.
„Prilepenie k dokumentu
mydoc.Paragraphs (1) .Range.PasteExcelTable _
LinkedToExcel: = nepravda, _
Formátovanie textu: = nepravda,
RTF: = nepravdivé
Na vkladanie údajov zo schránky používame triedu mydoc PasteExcelTable z odseku.Range.
„uloženie dokumentu
mydoc.SaveAs2 "MyDoc"
„zatvorenie dokumentu
mydoc.Zavrieť
„Vyprázdnenie schránky
CutCopyMode = False
Ukladáme dokument s názvom MyDoc. Potom dokument zatvoríme pomocou funkcie Zavrieť. Nakoniec uvoľníme schránku, ktorú budú používať ostatní.
Takže áno, chlapci, takto môžete vytvoriť nový dokument programu Word a skopírovať do neho údaje programu Excel pomocou jazyka VBA. Nešiel som do podrobností, pretože by bol článok vyčerpávajúco dlhý. Cieľom bolo iba zistiť, ako môžete prilepiť do dokumentu programu Word prostredníctvom programu Excel. Dúfam, že vám to pomohlo porozumieť postupu. Ak máte akékoľvek otázky týkajúce sa tohto článku, môžete ma kontaktovať prostredníctvom nižšie uvedenej sekcie komentárov.
Začíname s UserForms programu Excel VBA| Vysvetlím, ako vytvoriť formulár v programe Excel, ako používať panel nástrojov VBA, ako zaobchádzať s užívateľskými vstupmi a nakoniec, ako ich uložiť. Tieto témy si prejdeme na jednom príklade a sprievodcovi krok za krokom.
Premenné VBA v Exceli| VBA je skratka pre Visual Basic for Applications. Je to programovací jazyk od spoločnosti Microsoft. Používa sa s aplikáciami balíka Microsoft Office, ako sú MSExcel, MS-Word a MS-Access, zatiaľ čo premenné VBA sú špecifické kľúčové slová.
Variabilný rozsah Excel VBA| Vo všetkých programovacích jazykoch máme špecifikátory prístupu k premenným, ktoré definujú, odkiaľ je k definovanej premennej prístup. Excel VBA nie je výnimkou. VBA má tiež špecifikátory rozsahu.
Argumenty ByRef a ByVal | Keď je argument odoslaný ako argument ByRef do iného podradeného prvku alebo funkcie, odošle sa odkaz na skutočnú premennú. Všetky zmeny vykonané v kópii premennej sa prejavia v pôvodnom argumente.
Odstráňte hárky bez výziev na potvrdenie pomocou VBA v programe Microsoft Excel | Keďže odstraňujete hárky pomocou jazyka VBA, viete, čo robíte. Chcete Excelu povedať, aby toto upozornenie nezobrazoval a vymazal ten prekliaty hárok.
Pridajte a uložte nový zošit pomocou jazyka VBA v programe Microsoft Excel 2016| V tomto kóde sme najskôr vytvorili odkaz na objekt zošita. A potom sme to inicializovali novým objektom zošita. Výhodou tohto prístupu je, že môžete ľahko vykonávať operácie s týmto novým zošitom. Rovnako ako ukladanie, zatváranie, mazanie atď
Zobrazte správu na stavovom riadku programu Excel VBA| Stavový riadok v Exceli je možné použiť ako monitor kódu. Keď je váš kód VBA dlhý a vykonávate niekoľko úloh pomocou jazyka VBA, často vypnete aktualizáciu obrazovky, aby ste videli, že obrazovka bliká.
Vypnite varovné správy pomocou VBA v programe Microsoft Excel 2016| Tento kód nielenže deaktivuje upozornenia VBA, ale tiež zvyšuje časovú účinnosť kódu. Pozrime sa ako.
Populárne články:
50 skratiek programu Excel na zvýšenie produktivity | Vykonajte svoju úlohu rýchlejšie. Týchto 50 skratiek vám umožní pracovať ešte rýchlejšie v Exceli.
Funkcia VLOOKUP v programe Excel | Toto je jedna z najpoužívanejších a najobľúbenejších funkcií programu Excel, ktorá sa používa na vyhľadávanie hodnôt z rôznych rozsahov a hárkov.
COUNTIF v Exceli 2016 | Počítajte hodnoty s podmienkami pomocou tejto úžasnej funkcie. Na počítanie konkrétnych hodnôt nie je potrebné filtrovať údaje. Funkcia Countif je potrebná na prípravu palubnej dosky.
Ako používať funkciu SUMIF v programe Excel | Toto je ďalšia zásadná funkcia palubnej dosky. To vám pomôže zhrnúť hodnoty za konkrétnych podmienok.