Може да срещнете някои проблеми с вашия VBA код, но как да откриете проблема? Понякога вашият VBA код може да се нуждае от отстраняване на грешки. Продължете да четете, за да откриете четирите най-често срещани метода за отстраняване на грешки в Excel VBA код:
-
Разглеждане на кода
-
Вмъкване на функции MsgBox на различни места във вашия код
-
Вмъкване на оператори Debug.Print
-
Използване на вградените в Excel инструменти за отстраняване на грешки
Разглеждане на вашия код
Може би най-простата техника за отстраняване на грешки е просто да разгледате внимателно кода си, за да видите дали можете да откриете проблема. Този метод, разбира се, изисква знания и опит. С други думи, трябва да знаете какво правите. Ако имате късмет, грешката изскача веднага и вие се удряте по челото и казвате: „О!“ Когато болката в челото намалее, можете да отстраните проблема.
Обърнете внимание на използването на думите „Ако имате късмет“. Това е така, защото често откривате грешки, когато работите по програмата си осем часа наред, 2 сутринта е и работите с кофеин и воля. В такива моменти имате късмет, ако дори можете да видите кода си, камо ли да намерите грешките. Затова не се учудвайте, ако простото изследване на кода ви не е достатъчно, за да ви накара да намерите и изтриете всички грешки, които съдържа.
Използване на функцията MsgBox
Често срещан проблем в много програми включва една или повече променливи, които не приемат стойностите, които очаквате. В такива случаи наблюдението на променливата(ите), докато кодът ви се изпълнява, е полезна техника за отстраняване на грешки. Един от начините да направите това е като вмъкнете временни функции MsgBox във вашата рутина. Например, ако имате променлива с име CellCount, можете да вмъкнете следния израз:
MsgBox CellCount
Когато изпълнявате рутината, функцията MsgBox показва стойността на CellCount.
Често е полезно да се показват стойностите на две или повече променливи в полето за съобщения. Следното изявление показва текущата стойност на две променливи: LoopIndex (1) и CellCount (72), разделени с интервал.
MsgBox LoopIndex & “ “ & CellCount
Забележете, че двете променливи са комбинирани с оператора за конкатенация (&) и вмъкнете символ за интервал между тях. В противен случай полето за съобщение обединява двете стойности, което ги прави да изглеждат като една стойност. Можете също да използвате вградената константа, vbNewLine, вместо символа за интервал. vbNewLine вмъква прекъсване за подаване на ред, което показва текста на нов ред. Следното изявление показва три променливи, всяка на отделен ред:
Използване на поле за съобщения за показване на стойността на три променливи.
MsgBox LoopIndex & vbNewLine & CellCount & vbNewLine & MyVal
Тази техника не се ограничава до наблюдение на променливи. Можете да използвате поле за съобщения, за да покажете всякаква полезна информация, докато кодът ви работи. Например, ако кодът ви преминава през поредица от листове, следното изявление показва името и типа на активния лист:
MsgBox ActiveSheet.Name & “ “ & TypeName (ActiveSheet)
Ако вашето съобщение показва нещо неочаквано, натиснете Ctrl+Break и ще видите диалогов прозорец, който ви казва, че изпълнението на кода е прекъснато, имате четири избора:
-
Щракнете върху бутона Продължи. Кодът продължава да се изпълнява.
-
Щракнете върху бутона Край. Изпълнението спира.
-
Щракнете върху бутона Отстраняване на грешки. VBE преминава в режим на отстраняване на грешки.
-
Щракнете върху бутона Помощ. Помощен екран ви казва, че сте натиснали Ctrl+Break. С други думи, не е много полезно.
Натискането на Ctrl+Break спира изпълнението на вашия код и ви дава някои възможности за избор.
Ако клавиатурата ви няма клавиш Break, опитайте да натиснете Ctrl+ScrollLock.
Чувствайте се свободни да използвате функциите на MsgBox често, когато отстранявате грешки в кода си. Просто се уверете, че ги премахвате, след като идентифицирате и коригирате проблема.
Вмъкване на оператори Debug.Print
Като алтернатива на използването на функции MsgBox във вашия код, можете да вмъкнете един или повече временни оператори Debug.Print. Използвайте тези изрази, за да отпечатате стойността на една или повече променливи в прозореца Immediate. Ето пример, който показва стойностите на три променливи:
Debug.Print LoopIndex, CellCount, MyVal
Забележете, че променливите са разделени със запетаи. Можете да покажете толкова променливи, колкото искате с един израз на Debug.Print.
Debug.Print изпраща изход към прозореца Immediate, дори ако този прозорец е скрит. Ако прозорецът Immediate на VBE не се вижда, натиснете Ctrl+G (или изберете View → Immediate Window). Ето някои резултати в прозореца Immediate.
Инструкция Debug.Print изпраща изход към прозореца Immediate.
За разлика от MsgBox, операторите Debug.Print не спират вашия код. Така че трябва да държите под око прозореца Immediate, за да видите какво се случва.
След като отстраните грешките в кода си, не забравяйте да премахнете всички изрази Debug.Print. Дори големи компании като Microsoft понякога забравят да премахнат своите изявления Debug.Print. В няколко предишни версии на Excel всеки път, когато се отвори добавката Analysis ToolPak, ще видите няколко странни съобщения в прозореца Immediate. Този проблем най-накрая беше отстранен в Excel 2007.
Използване на VBA дебъгера
Дизайнерите на Excel са добре запознати с концепцията за бъгове. Следователно Excel включва набор от инструменти за отстраняване на грешки, които могат да ви помогнат да коригирате проблеми във вашия VBA код.