Майкрософтын бүх оффисын програмууд автоматжуулалтыг дэмждэг. Тэд COM сервер хэлбэрээр ажиллуулж, баримт бичигт суулгасан эсвэл гадаад скриптээс ашиглаж болно. Тиймээс, та vba скриптээс Excel баримт бичигт өгөгдөл бичиж болно.
Шаардлагатай
- - Microsoft Excel програм суулгасан;
- - Visual Basic редактор / текст засварлагч.
Зааварчилгаа
1-р алхам
Vba кодыг байрлуулах савыг үүсгээрэй. Хэрэв скриптийг баримт бичигт оруулах гэж байгаа бол тохирох файлыг Microsoft Excel дээр байршуулна уу. Alt + F11 товчийг дарж Visual Basic Editor-ийг нээнэ үү. Шаардлагатай бол шинэ модуль үүсгээрэй (Insert цэс дэх Module зүйл). Модуль эсвэл маягтуудын аль нэгийг нээнэ үү. Өөрийн маягтыг хянах зохицуулагчийг үүсгэж эсвэл зүгээр л модульд процедур нэмж оруулаарай. Жишээлбэл:
Дэд тест ()
Дуусах дэд
Хэрэв та бие даасан скрипт боловсруулж байгаа бол (өөрөөр хэлбэл Windows Script Host-ийн дор ажиллуулах болно), текст засварлагч дээр vbs өргөтгөлтэй файл үүсгэж болно.
Алхам 2
Баримт бичигт оруулсан скриптэд процедурын эхэнд хувьсах зарлал нэмж оруулна уу.
Бүдэг oWorkbook-ийг Excel байдлаар. Ажлын ном
Dim oSheet As Excel. Worksheet
Эхнийх нь Excel-ийн ажлын номны объектын лавлагаа хадгалах, хоёр дахь нь хуудсанд зориулагдсан болно.
Алхам 3
Объектын лавлагаа бүхий хувьсагчийг эхлүүлэх. Vbs скриптэд Excel програмын объектыг үүсгээрэй (ингэснээр Excel програмыг COM сервер болгон ажиллуулах болно):
OApplication = CreateObject-ийг тохируулах ("Excel. Application").
Баримтанд суулгасан скриптэд oApplication хувьсагчийн оронд глобал програмын объектыг ашиглах болно. Одоо байгаа Excel програмыг сонгож эсвэл шинээр нээнэ үү. Жишээлбэл:
OWorkbook = Application тохируулна уу. Ажлын ном (1)
OWorkbook = Application. Workbooks ("Book1") тохируулах
OWorkbook = oApplication. Workbooks. Open-ийг тохируулах ("D: / vic / холбогдох / tmp / test.xls")
Номын хүссэн хуудасны холбоосыг авна уу.
OSheet = oApplication. Sheets-ийг тохируулах ("Sheet1")
Алхам 4
Vba скриптээс Excel-д өгөгдөл бичих. Өмнөх алхам дээр дурдсан ажлын номны хуудасны объектын өмч болох Cells цуглуулгыг oSheet хувьсагч дотор ашиглана уу. Нэг нүдэнд мөр бичих жишээ нь дараах байдалтай байж болно.
oSheet. Cells (1, 1) = "Мөрийг A1 нүдэнд бичнэ"
Алхам 5
Vbs скриптэд өгөгдлийг хадгалах кодыг нэмж оруулаад Excel програмыг унтраана уу:
o Ажлын дэвтэр. Хадгалах
o Хэрэглээ. Гарах
Алхам 6
Скриптийг хадгалж ажиллуулна уу. Visual Basic Editor дээр Ctrl + S товчийг дараад процедурын их хэсэгт курсороо байрлуулаад F5 товчийг дарна уу. Vbs скриптийг дискэнд хадгалаад ердийн файл хэлбэрээр ажиллуулна уу.
