Da bismo kopirali podatke iz Excela u Word datoteku pomoću VBA -e, moramo pristupiti aplikaciji Word pomoću Excel VBA. U ovom ćemo vodiču naučiti kako otvoriti word aplikaciju, dodati dokument i kopirati-zalijepiti podatke iz programa excel.
U ovom članku ćemo koristiti metodu ranog vezivanja za stvaranje objekta aplikacije riječi umjesto korištenja kasnog vezivanja. Ovdje možete detaljno pročitati o tome.
Postupak kopiranja Excel podataka u Word datoteku pomoću programa Excel VBA
Da bismo kopirali podatke iz programa Excel u datoteku riječi pomoću VBA -a, prvo moramo naravno otvoriti Word aplikaciju. Zatim mu dodajte dokument (ako želite novi dokument). Kopirajte podatke iz excel datoteke. Odaberite odlomak na dokumentu i zalijepite ga. Na kraju spremite i zatvorite dokument. Svaki od ovih koraka može se lako izvesti iz programa Excel. Nećete morati komunicirati s Word dokumentom.
Počnimo s primjerom, a da ne ulazimo dalje u teoriju. Jer Iron Man je rekao: "Ponekad moraš trčati prije nego što počneš hodati".
Primjer: Zalijepite Excel podatke u Word pomoću VBA
Kôd u nastavku je primjer kako možete kopirati neki niz programa Excel i zalijepiti ga u novi word dokument i spremiti na pogon za kasnije korištenje
'VBA kôd za pisanje za kopiranje podataka iz Excela u dokument Pod ExcelToWord ()' Korištenje ranog vezivanja Zatamni wordApp kao Word.Application Zatamni mydoc kao Word.Document 'Stvaranje nove instance riječi samo ako nema drugih instanci Postavi wordApp = New Word.Application 'Postavljanje riječi za aplikaciju vidljivom wordApp.Visible = True' Stvaranje novog dokumenta Postavite mydoc = wordApp.Documents.Add () 'kopiranje sadržaja s Excelove tablice ThisWorkbook.Worksheets ("sheet1"). Raspon ("A1: g20 "). Kopirajte 'Lijepljenje na dokument mydoc.Paragrafi (1) .Range.PasteExcelTable _ LinkedToExcel: = False, _ WordFormatting: = False, RTF: = False' spremanje dokumenta mydoc.SaveAs2" MyDoc "'zatvaranje dokumenta mydoc .Zatvori 'Pražnjenje međuspremnika CutCopyMode = Subsekcija lažnog kraja
Objašnjenje Kodeksa:
Pa, objasnio sam svaki korak u samom kodu koristeći komentare, ali hajde da kažemo nešto o linijama koje smo koristili u ovoj podnaslovu.
'Izrađene varijable aplikacije riječi i vrste dokumenta
Zatamnite wordApp kao Word.Application
Dim mydoc Kao Word.Dokument
Ovdje smo deklarirali dvije varijable potrebnih tipova. To možemo učiniti jer smo već dodali referencu na riječ aplikacija. To možete učiniti ako odete na alate u izborniku. Opcija Pronađi reference, a zatim potražite riječ referenca.
'Stvaranje nove instance riječi samo ako nema drugih instanci
Postavi wordApp = Nova Word.Application
'Postavljanje riječi aplikaciji vidljivom
wordApp.Visible = Istina
'Izrada novog dokumenta
Postavi mydoc = wordApp.Documents.Add ()
U prvom retku gore namjeravamo varijablu wordApp objektom tipa Word.App pomoću ključne riječi New. Ovo će otvoriti Word aplikaciju.
U drugom retku riječ aplikacija činimo vidljivom kako bismo mogli raditi s njom.
U sljedećem retku dodajemo novi dokument u aplikaciju word pomoću funkcije Word.Documents.Add (). To je pohranjeno u varijabli mydoc.
'kopiranje sadržaja s Excelove tablice
ThisWorkbook.Worksheets ("sheet1"). Raspon ("A1: G20"). Kopiraj
Ovdje jednostavno kopiramo raspon iz programa excel. Sigurno ste to već učinili. Pohranjuje se u međuspremnik.
'Lijepljenje na dokument
mydoc.Paragrafi (1) .Range.PasteExcelTable _
LinkedToExcel: = Netačno, _
Formatiranje riječi: = Netačno,
RTF: = Netačno
Koristimo metodu PasteExcelTable iz paragrafa.Range klase mydoc za lijepljenje podataka iz međuspremnika.
'spremanje dokumenta
mydoc.SaveAs2 "MyDoc"
'zatvaranje dokumenta
mydoc.Zatvorite
'Pražnjenje međuspremnika
CutCopyMode = Netačno
Spremamo dokument s imenom MyDoc. Zatim zatvorimo dokument pomoću funkcije Zatvori. Na kraju puštamo međuspremnik da ga koriste drugi.
Pa da, dečki, ovako možete stvoriti novi Wordov dokument i kopirati Excel podatke u njega pomoću VBA. Nisam ulazio u detalje jer bi članak bio iscrpljujuće dug. Ovo je bilo samo zato da biste saznali kako možete zalijepiti u Word dokument putem programa Excel. Nadam se da vam je pomoglo u razumijevanju procesa. Ako imate pitanja u vezi ovog članka, možete me kontaktirati putem donjeg odjeljka komentara.
Početak korištenja Excel VBA korisničkih obrazaca| Objasnit ću kako stvoriti obrazac u Excelu, kako koristiti VBA alatni okvir, kako rukovati korisničkim ulazima i na kraju kako pohraniti korisničke unose. Kroz ove ćemo teme proći jednim primjerom i vodičem korak po korak.
VBA varijable u Excelu| VBA znači Visual Basic for Applications. To je programski jezik iz Microsofta. Koristi se s aplikacijama Microsoft Office kao što su MSExcel, MS-Word i MS-Access, dok su VBA varijable određene ključne riječi.
Excel VBA varijabilni opseg| U svim programskim jezicima imamo specifikatore pristupa varijablama koji definiraju odakle se može pristupiti definiranoj varijabli. Excel VBA nije iznimka. VBA također ima specifikatore opsega.
Argumenti ByRefa i ByVala | Kada se argument prenese kao ByRef argument na drugu pod -funkciju ili funkciju, šalje se referenca stvarne varijable. Sve promjene napravljene u kopiji varijable odrazit će se u izvornom argumentu.
Brisanje listova bez upita za potvrdu pomoću VBA u programu Microsoft Excel | Budući da brišete listove pomoću VBA -a, znate što radite. Htjeli biste Excel reći da ne prikazuje ovo upozorenje i izbrisati prokleti list.
Dodajte i spremite novu radnu knjigu pomoću VBA -a u programu Microsoft Excel 2016| U ovom smo kodu najprije stvorili referencu na objekt radne knjige. Zatim smo ga inicijalizirali novim objektom radne knjige. Prednost ovog pristupa je u tome što s ovom novom radnom knjigom možete lako raditi. Kao spremanje, zatvaranje, brisanje itd
Prikažite poruku na statusnoj traci programa Excel VBA| Statusna traka u Excelu može se koristiti kao monitor koda. Kad je vaš VBA kôd dugačak i obavite nekoliko zadataka pomoću VBA -a, često onemogućujete ažuriranje zaslona kako ne biste vidjeli kako zaslon treperi.
Isključite poruke upozorenja pomoću VBA u programu Microsoft Excel 2016| Ovaj kôd ne samo da onemogućuje VBA upozorenja, već i povećava vremensku učinkovitost koda. Pogledajmo kako.
Popularni članci:
50 Excel prečaca za povećanje vaše produktivnosti | Budite brži u izvršavanju svojih zadataka. Ovih 50 prečaca učinit će da radite još brže na Excelu.
Funkcija VLOOKUP u Excelu | Ovo je jedna od najčešće korištenih i popularnih funkcija programa Excel koja se koristi za traženje vrijednosti iz različitih raspona i listova.
COUNTIF u Excelu 2016 | Brojte vrijednosti s uvjetima pomoću ove nevjerojatne funkcije. Ne morate filtrirati svoje podatke da biste brojali određene vrijednosti. Funkcija Countif bitna je za pripremu vaše nadzorne ploče.
Kako koristiti funkciju SUMIF u Excelu | Ovo je još jedna bitna funkcija nadzorne ploče. To vam pomaže pri zbrajanju vrijednosti u posebnim uvjetima.
