Za kopiranje podatkov iz Excela v Wordovo datoteko z uporabo VBA moramo dostopati do besedne aplikacije z uporabo Excel VBA. V tej vadnici se bomo naučili odpreti besedilno aplikacijo, dodati dokument in vanj kopirati in prilepiti podatke iz Excela.
V tem članku bomo uporabili metodo zgodnje vezave za ustvarjanje predmeta besedne aplikacije namesto pozne vezave. Tukaj lahko podrobno preberete o tem.
Postopek kopiranja Excelovih podatkov v Wordovo datoteko z uporabo Excel VBA
Če želite kopirati podatke iz Excela v besedilno datoteko z uporabo VBA, moramo najprej odpreti Wordovo aplikacijo. Nato mu dodajte dokument (če želite nov dokument). Kopirajte podatke iz datoteke Excel. Izberite odstavek na dokumentu in ga prilepite. Končno shranite in zaprite dokument. Vsak od teh korakov lahko preprosto izvedete iz Excela. Ni vam treba sodelovati z Wordovim dokumentom.
Začnimo s primerom, ne da bi se poglabljali v teorijo. Ker je Iron Man rekel: "Včasih moraš teči, preden lahko hodiš".
Primer: Prilepite Excelove podatke v Word z uporabo VBA
Spodnja koda je primer, kako lahko kopirate nekaj obsegov excela in jih prilepite v nov besedni dokument in ga shranite na pogon, da ga uporabite pozneje
"VBA Code to Write to Copy data from Excel to a Document Sub ExcelToWord ()" Uporaba zgodnje vezave Zatemni wordApp kot Word. Aplikacija Dim mydoc kot Word.Document "Ustvarjanje novega primerka besede samo, če ni drugih primerkov Nastavi wordApp = Novo Word.Application 'Ustvarjanje besedne aplikacije vidno wordApp.Visible = True' Ustvarjanje novega dokumenta Nastavite mydoc = wordApp.Documents.Add () 'kopiranje vsebine z Excelovega lista ThisWorkbook.Worksheets ("sheet1"). Range ("A1: g20 "). Kopiraj" Prilepi na dokument mydoc.Paragrafi (1) .Range.PasteExcelTable _ LinkedToExcel: = False, _ WordFormatting: = False, RTF: = False 'shranjevanje dokumenta mydoc.SaveAs2 "MyDoc"' zapiranje dokumenta mydoc .Close 'Izpraznitev odložišča CutCopyMode = Subsection False End
Pojasnilo Kodeksa:
No, vsak korak v sami kodi sem razložil s komentarji, vendar pa povejmo nekaj besed o vrsticah, ki smo jih uporabili v tem podpoglavju.
"Ustvarjene spremenljivke besedilne aplikacije in vrste dokumenta
Zatemni wordApp kot Word.Application
Dim mydoc kot Word.Document
Tu smo razglasili dve spremenljivki zahtevanih tipov. To lahko storimo, ker smo sklic na besedo aplikacija že dodali. To lahko storite tako, da odprete orodja v meniju. Poišči možnost reference in nato poišči besedo referenca.
'Ustvarjanje novega primerka besede le, če ni drugih primerkov
Nastavi wordApp = Nova Word.Application
"Ustvarjanje aplikacije Word vidno
wordApp.Visible = Res
'Ustvarjanje novega dokumenta
Nastavi mydoc = wordApp.Documents.Add ()
V prvi vrstici zgoraj nameravamo spremenljivko wordApp s predmetom vrste Word.App uporabiti ključno besedo New. S tem se odpre Wordova aplikacija.
V drugi vrstici naredimo besedo aplikacija vidno, da lahko z njo delamo.
V naslednji vrstici besedni aplikaciji dodamo nov dokument s funkcijo Word.Documents.Add (). To je shranjeno v spremenljivki mydoc.
"kopiranje vsebine z Excelovega lista
ThisWorkbook.Worksheets ("sheet1"). Range ("A1: G20"). Copy
Tukaj preprosto kopiramo obseg iz Excela. Gotovo ste to storili že prej. Shranjen je v odložišču.
'Lepljenje na dokument
mydoc.odstavki (1) .Range.PasteExcelTable _
LinkedToExcel: = False, _
Oblikovanje besed: = napačno,
RTF: = Napačno
Za lepljenje podatkov iz odložišča uporabljamo metodo PasteExcelTable iz odstavka.Range razreda mydoc.
'shranjevanje dokumenta
mydoc.SaveAs2 "MyDoc"
'zapiranje dokumenta
mydoc.Zapri
'Izpraznitev odložišča
CutCopyMode = Napačno
Shranjujemo dokument z imenom MyDoc. Nato dokument zapremo s funkcijo Zapri. Končno sprostimo odložišče, ki ga bodo lahko uporabljali drugi.
Torej, fantje, tako lahko ustvarite nov Wordov dokument in vanj kopirate Excelove podatke z uporabo VBA. Nisem se spuščal v podrobnosti, ker bi bil članek izčrpno dolg. To je bilo samo zato, da bi se naučili, kako lahko prilepite v besedilni dokument prek Excela. Upam, da vam je pomagal razumeti postopek. Če imate kakršna koli vprašanja v zvezi s tem člankom, me lahko kontaktirate prek spodnjega razdelka s komentarji.
Uvod v uporabniške obrazce programa Excel VBA| Pojasnil bom, kako ustvariti obrazec v Excelu, kako uporabljati orodje VBA, kako ravnati z vnosi uporabnikov in na koncu kako shraniti vnose uporabnikov. Te teme bomo obravnavali z enim primerom in vodnikom po korakih.
Spremenljivke VBA v Excelu| VBA pomeni Visual Basic for Applications. To je programski jezik podjetja Microsoft. Uporablja se z aplikacijami Microsoft Office, kot so MSExcel, MS-Word in MS-Access, medtem ko so spremenljivke VBA posebne ključne besede.
Spremenljivi obseg programa Excel VBA| V vseh programskih jezikih imamo spremenljivke dostopa, ki določajo, od kod je mogoče dostopati do določene spremenljivke. Excel VBA ni izjema. VBA ima tudi specifikatorje obsega.
Argumenti ByRef in ByVal | Ko se argument posreduje kot argument ByRef na drugo pod -funkcijo ali funkcijo, se pošlje sklic na dejansko spremenljivko. Vse spremembe v kopiji spremenljivke se odražajo v izvirnem argumentu.
Brisanje listov brez potrditvenih pozivov z uporabo VBA v programu Microsoft Excel | Ker z VBA brišete liste, veste, kaj počnete. Excelu želite povedati, naj ne prikaže tega opozorila, in izbrišite prekleti list.
Dodajte in shranite nov delovni zvezek z uporabo VBA v programu Microsoft Excel 2016| V tej kodi smo najprej ustvarili sklic na predmet delovnega zvezka. In potem smo ga inicializirali z novim objektom delovnega zvezka. Prednost tega pristopa je, da lahko preprosto delate na tem novem delovnem zvezku. Tako kot shranjevanje, zapiranje, brisanje itd
Prikaz sporočila v vrstici stanja Excel VBA| Vrstica stanja v Excelu se lahko uporablja kot monitor kode. Ko je vaša koda VBA dolga in z VBA opravljate več nalog, pogosto onemogočite posodobitev zaslona, tako da zaslon ne utripa.
Izklopite opozorilna sporočila z uporabo VBA v programu Microsoft Excel 2016| Ta koda ne samo onemogoči opozorila VBA, ampak tudi poveča časovno učinkovitost kode. Poglejmo, kako.
Priljubljeni članki:
50 bližnjic v Excelu za večjo produktivnost | Poskrbite, da bo vaša naloga hitrejša. S temi 50 bližnjicami boste še hitreje delali v Excelu.
Funkcija VLOOKUP v Excelu | To je ena najpogosteje uporabljenih in priljubljenih funkcij programa Excel, ki se uporablja za iskanje vrednosti iz različnih obsegov in listov.
COUNTIF v Excelu 2016 | Štejte vrednosti s pogoji s to neverjetno funkcijo. Za štetje določenih vrednosti vam ni treba filtrirati podatkov. Funkcija Countif je bistvena za pripravo vaše armaturne plošče.
Kako uporabljati funkcijo SUMIF v Excelu | To je še ena bistvena funkcija armaturne plošče. To vam pomaga povzeti vrednosti za posebne pogoje.