За да копираме данни от Excel във файл на Word с помощта на VBA, трябва да имаме достъп до приложението за думи с помощта на Excel VBA. В този урок ще научим как да отворите приложение за думи, да добавите документ и да копирате и поставите данни от Excel в него.
В тази статия ще използваме метода за ранно свързване, за да създадем обект на приложение за думи, вместо да използваме късното свързване. Можете да прочетете подробно за това тук.
Процесът на копиране на Excel данни в Word файл с помощта на Excel VBA
За да копирате данни от Excel в word файл, използвайки VBA, първо трябва да отворим Word приложението, разбира се. След това добавете документ към него (ако искате нов документ). Копирайте данни от Excel файл. Изберете абзаца на документа и го поставете. Накрая запишете и затворете документа. Всяка от тези стъпки може да се направи лесно от Excel. Няма да е необходимо да взаимодействате с документа на Word.
Нека започнем с един пример, без да навлизаме повече в теорията. Защото Iron Man каза: „Понякога трябва да бягаш, преди да можеш да ходиш“.
Пример: Поставяне на Excel данни в Word с помощта на VBA
Кодът по -долу е пример за това как можете да копирате някакъв диапазон от excel и да го поставите в нов документ на word и да го запишете на устройството, за да използвате по -късно
„VBA код за записване, за да копирате данни от Excel в документ Sub ExcelToWord ()„ Използване на ранно свързване Dim wordApp като Word. Word.Application 'Осъществяване на Word App Видимо wordApp.Visible = True' Създаване на нов документ Задайте mydoc = wordApp.Documents.Add () 'копиране на съдържанието от Excel лист ThisWorkbook.Worksheets ("лист1"). Обхват ("A1: g20 "). Копирайте" Поставяне върху документа mydoc.Paragraphs (1) .Range.PasteExcelTable _ LinkedToExcel: = False, _ WordFormatting: = False, RTF: = False "запазване на документа mydoc.SaveAs2" MyDoc "" затваряне на документа mydoc .Close 'Изпразване на клипборда CutCopyMode = Subsection False End
Обяснение на кодекса:
Е, аз обясних всяка стъпка в самия код, използвайки коментари, но нека да кажем няколко думи за редовете, които сме използвали в този под.
„Създадени променливи за приложение за думи и тип документ
Затъмнете wordApp като Word.Application
Dim mydoc като Word.Document
Тук декларирахме две променливи от необходимите типове. Можем да направим това, защото вече добавихме препратката към думата приложение. Можете да направите това, като отидете на инструменти в менюто. Намерете опцията за препратки и след това потърсете думата препратка.
„Създаване на нов екземпляр на дума само ако няма други инстанции
Задайте wordApp = Нова Word.Application
„Направете приложението Word видимо
wordApp.Visible = Вярно
„Създаване на нов документ
Задайте mydoc = wordApp.Documents.Add ()
В първия ред по -горе намеряваме променливата wordApp с обект от тип Word.App, използвайки ключовата дума New. Това ще отвори Word приложението.
Във втория ред правим думата приложение видима, за да можем да работим с нея.
В следващия ред добавяме нов документ към приложението word с помощта на функцията Word.Documents.Add (). Това се съхранява в променливата mydoc.
„копиране на съдържанието от Excel лист
ThisWorkbook.Worksheets ("sheet1"). Range ("A1: G20"). Copy
Тук просто копираме диапазон от excel. Сигурно сте го правили преди. Той се съхранява в клипборда.
'Поставяне върху документа
mydoc.Paragraphs (1). Range.PasteExcelTable _
LinkedToExcel: = False, _
WordFormatting: = False,
RTF: = невярно
Използваме метода PasteExcelTable от Paragraph.Range клас на mydoc за поставяне на данни от клипборда.
'запазване на документа
mydoc.SaveAs2 "MyDoc"
'затваряне на документа
mydoc.Затвори
„Изпразване на клипборда
CutCopyMode = False
Запазваме документа с името MyDoc. След това затваряме документа с помощта на функцията за затваряне. Накрая пускаме клипборда, който да се използва от други.
Така че да, момчета, това е начинът, по който можете да създадете нов документ на Word и да копирате данни от Excel в него с помощта на VBA. Не съм навлизал в подробности, тъй като това би направило статията изтощително дълга. Това беше само за да научите как можете да поставите в документ на Word чрез Excel. Надявам се да ви е помогнал да разберете процеса. Ако имате въпроси относно тази статия, можете да се свържете с мен чрез секцията за коментари по -долу.
Първи стъпки с потребителските формуляри на Excel VBA| Ще обясня как да създам формуляр в excel, как да използвам VBA инструментариума, как да боравя с потребителските входни данни и накрая как да съхранявам потребителските входни данни. Ще преминем през тези теми, като използваме един пример и стъпка по стъпка ръководство.
VBA променливи в Excel| VBA означава Visual Basic за приложения. Това е език за програмиране от Microsoft. Използва се с приложения на Microsoft Office като MSExcel, MS-Word и MS-Access, докато VBA променливите са специфични ключови думи.
Променлив обхват на Excel VBA| Във всички езици за програмиране имаме променливи спецификатори за достъп, които определят от къде може да се получи достъп до определена променлива. Excel VBA не е изключение. VBA също има спецификатори на обхвата.
Аргументи на ByRef и ByVal | Когато един аргумент се предава като аргумент ByRef на различна под -функция или функция, се изпраща препратката към действителната променлива. Всички промени, направени в копието на променливата, ще се отразят в първоначалния аргумент.
Изтриване на листове без подкани за потвърждение с помощта на VBA в Microsoft Excel | Тъй като изтривате листове с помощта на VBA, знаете какво правите. Бихте искали да кажете на Excel да не показва това предупреждение и да изтрие проклетия лист.
Добавяне и запазване на нова работна книга с помощта на VBA в Microsoft Excel 2016| В този код първо създадохме препратка към обект на работна книга. И тогава го инициализирахме с нов обект на работна книга. Ползата от този подход е, че можете лесно да извършвате операции с тази нова работна книга. Като запазване, затваряне, изтриване и т.н.
Показване на съобщение в лентата за състоянието на Excel VBA| Лентата на състоянието в Excel може да се използва като монитор на кодове. Когато вашият VBA код е дълъг и изпълнявате няколко задачи с помощта на VBA, често деактивирате актуализацията на екрана, така че да не виждате този екран да трепти.
Изключете предупредителните съобщения с помощта на VBA в Microsoft Excel 2016| Този код не само деактивира сигналите за VBA, но също така увеличава ефективността на кода във времето. Да видим как.
Популярни статии:
50 преки пътища в Excel за повишаване на вашата производителност | Бъдете по -бързи в задачата си. Тези 50 преки пътища ще ви накарат да работите още по -бързо в Excel.
Функцията VLOOKUP в Excel | Това е една от най -използваните и популярни функции на excel, която се използва за търсене на стойност от различни диапазони и листове.
COUNTIF в Excel 2016 | Пребройте стойностите с условия, използвайки тази невероятна функция. Не е необходимо да филтрирате данните си, за да броите конкретни стойности. Функцията Countif е от съществено значение за подготовката на вашето табло.
Как да използвате функцията SUMIF в Excel | Това е друга основна функция на таблото. Това ви помага да обобщите стойностите при конкретни условия.