Как да получите VBA код в модул с Code Windows

Един от начините, по които можете да получите VBA код във VBA модул, е да използвате записа на макроси на Excel, за да запишете вашите действия и да ги конвертирате във VBA код. Въпреки това, не всички задачи могат да бъдат преведени във VBA чрез записване на макрос. Можете също така да въведете кода директно или да копирате кода от един модул и да го поставите в друг.

Въвеждането и редактирането на текст в VBA модул работи както бихте очаквали. Можете да избирате, копирате, изрязвате, поставяте и правите други неща с текста.

Един ред от VBA код може да бъде толкова дълъг, колкото искате. Въпреки това, може да искате да използвате знака за продължаване на реда, за да разбиете дълги редове код. За да продължите един ред код (известен също като оператор ) от един ред на следващия, завършете първия ред с интервал, последван от долно черта (_). След това продължете изявлението на следващия ред. Ето пример за едно изявление, разделено на три реда:

Selection.Sort Key1:=Обхват("A1"), _
Поръчка1:=xlВъзходяща, Заглавка:=xlGuess, _
Ориентация:=xlTopToBottom

Този израз би действал по същия начин, ако беше въведен в един ред (без символи за продължаване на реда).

VBE има множество нива на отмяна и повторение. Ако сте изтрили изявление, което не трябва да имате, използвайте бутона Отмяна на лентата с инструменти (или натиснете Ctrl+Z), докато изявлението се появи отново. След като отмените, можете да използвате бутона Възстановяване, за да извършите промените, които сте отменили.

Готови ли сте да въведете истински код на живо? Опитайте следните стъпки:

Създайте нова работна книга в Excel.

Натиснете Alt+F11, за да активирате VBE.

Щракнете върху името на новата работна книга в прозореца на проекта.

Изберете Вмъкване→Модул, за да вмъкнете VBA модул в проекта.

Въведете следния код в модула:

Sub GuessName()
     Затъмни съобщение като низ
     Dim Ans As Long
     Msg = "Вашето име " & Application.UserName & "?"
     Ans = MsgBox(Msg, vbYesNo)
     Ако Ans = vbNo Тогава MsgBox "О, няма значение."
     Ако Ans = vbYes Тогава MsgBox "Трябва да съм ясновидец!"
Край под

Уверете се, че курсорът е разположен някъде в текста, който сте въвели, и след това натиснете F5, за да изпълните процедурата.

F5 е пряк път за командата Run → Run Sub/UserForm.

Когато въведете кода, посочен в стъпка 5, може да забележите, че VBE прави някои корекции на текста, който въвеждате. Например, след като въведете израза Sub, VBE автоматично вмъква End Sub израза. И ако пропуснете интервала преди или след знак за равенство, VBE вмъква интервала вместо вас. Също така, VBE променя цвета и главните букви на някои текст. Тези промени са начинът на VBE да поддържа нещата спретнати и четими.

Ако сте следвали предишните стъпки, току-що създадохте VBA Sub процедура, известна също като макрос. Когато натиснете F5, Excel изпълнява кода и следва инструкциите. С други думи, Excel оценява всяко изявление и прави това, което сте му казали да направи. Можете да изпълните този макрос произволен брой пъти - въпреки че има тенденция да губи привлекателността си след няколко десетки изпълнения.

Този прост макрос използва следните концепции:

Дефиниране на подпроцедура (първи ред)
Деклариране на променливи (изявленията Dim)
Присвояване на стойности на променливи (Msg и Ans)
Конкатениране (присъединяване) на низ (с помощта на оператора &)
Използване на вградена VBA функция (MsgBox)
Използване на вградени VBA константи (vbYesNo, vbNo и vbYes)
Използване на конструкция If-Then (два пъти)
Завършване на подпроцедура (последният ред)

Както споменахме, можете да копирате и поставите код във VBA модул. Например процедура под или функция, която пишете за един проект, може да бъде полезна и в друг проект. Вместо да губите време за повторно въвеждане на кода, можете да активирате модула и да използвате нормалните процедури за копиране и поставяне (Ctrl+C за копиране и Ctrl+V за поставяне). След като поставите кода в VBA модул, можете да промените кода, ако е необходимо.

Създаване и управление на шаблони за Word 2019

Научете как да създавате и управлявате шаблони за Word 2019 с нашето ръководство. Оптимизирайте документите си с персонализирани стилове.

Как да настроите отстъп на абзаци в Word 2016

Научете как да настроите отстъп на абзаци в Word 2016, за да подобрите визуалната комуникация на вашите документи.

Как да блокирате Microsoft Word да отваря файлове в режим само за четене в Windows

Как да блокирам Microsoft Word да отваря файлове в режим само за четене в Windows Microsoft Word отваря файлове в режим само за четене, което прави невъзможно редактирането им? Не се притеснявайте, методите са по-долу

Как да коригирате неправилно отпечатване на документи на Microsoft Word

Как да коригирате грешки при отпечатването на неправилни документи на Microsoft Word Грешките при отпечатването на документи на Word с променени шрифтове, разхвърляни абзаци, липсващ текст или изгубено съдържание са доста чести. Въпреки това недейте

Изтрийте рисунки с писалка и маркер на вашите слайдове на PowerPoint

Ако сте използвали писалката или маркера, за да рисувате върху слайдовете на PowerPoint по време на презентация, можете да запазите чертежите за следващата презентация или да ги изтриете, така че следващия път, когато го покажете, да започнете с чисти слайдове на PowerPoint. Следвайте тези инструкции, за да изтриете чертежи с писалка и маркери: Изтриване на линии една в […]

Съдържание на библиотеката за стилове в SharePoint 2010

Библиотеката със стилове съдържа CSS файлове, файлове с разширяем език на стиловия език (XSL) и изображения, използвани от предварително дефинирани главни страници, оформления на страници и контроли в SharePoint 2010. За да намерите CSS файлове в библиотеката със стилове на сайт за публикуване: Изберете Действия на сайта→Преглед Цялото съдържание на сайта. Появява се съдържанието на сайта. Библиотеката Style се намира в […]

Форматирайте числата в хиляди и милиони в отчети на Excel

Не затрупвайте аудиторията си с огромни числа. В Microsoft Excel можете да подобрите четливостта на вашите табла за управление и отчети, като форматирате числата си така, че да се показват в хиляди или милиони.

Как да споделяте и следвате сайтове на SharePoint

Научете как да използвате инструменти за социални мрежи на SharePoint, които позволяват на индивиди и групи да общуват, да си сътрудничат, споделят и да се свързват.

Как да конвертирате дати в юлиански формати в Excel

Юлианските дати често се използват в производствени среди като времеви печат и бърза справка за партиден номер. Този тип кодиране на дата позволява на търговците на дребно, потребителите и обслужващите агенти да идентифицират кога е произведен продуктът и по този начин възрастта на продукта. Юлианските дати се използват и в програмирането, военните и астрономията. Различно […]

Как да създадете уеб приложение на Access

Можете да създадете уеб приложение в Access 2016. И така, какво всъщност е уеб приложение? Е, уеб означава, че е онлайн, а приложението е просто съкращение от „приложение“. Персонализирано уеб приложение е онлайн приложение за база данни, достъпно от облака с помощта на браузър. Вие създавате и поддържате уеб приложението в настолната версия […]