zoukankan      html  css  js  c++  java
  • 如何调试Excel VBA代码

    Excel VBA出错时给出的错误信息极少,需要充分利用各种工具来进行调试。

    1.编译错误
    常见的编译错误有:
    错误的源代码格式,比如if后面缺少then:在编辑器中该行会变成红色。
    错误的语法结构,比如if和end if没有对应上:代码运行前会给出编译错误提示。
    类型不匹配:函数输入的参数与定义时的参数类型不同时会出现该类错误。
    变量未定义:指使用了没有申明的变量类型(当Option Explicit时)

    建议:
    格式规范化,严格缩进。VBA插件Smart Indent是一个很好的辅助工具。这样做让源代码更具备可读性,从而更快检测源代码格式和语法结果错误,。
    勾选上「工具——选项——编译器——要求变量声明」,或者在每个代码模块最前面手工加上 Option Explicit 。在代码编辑中,很多错误只是因为手误,这个选项会让编译器强制检查变量申明,从而在编译时便发现错误。

    2.运行中出错或者运行结果错误
    当程序编译没有问题,但运行中出错或者运行的结果与想象中不符,就需要用到VBA的调试功能。下面是VBA提供的几个重要的调试功能,这些功能能让程序停在某些特定的位置上等待检查:
    F9:设置程序断点,在代码左侧栏点击有相同效果。重新按F9即取消断点。
    F8:单步跟踪,当调用子函数会跟踪到子函数内部
    Shift+F8:单步跟踪,但不会进入子函数内部
    Ctrl+Shift+F8:跳出正在跟踪的函数,直接返回上一层函数。
    F5:运行程序,直到出现错误、程序结束或程序断点为止
    Ctrl+F8:运行程序,直到出现错误、程序结束、程序断点或当前光标所在行为止
    debug.print var:在立即窗口中显示var的值
    debug.assert var:当var==false时程序自动停止

    以上命令也可在菜单和命令栏中获取。
    在调试过程中,可通过下面几种方法查看各个变量的值,当变量和预期不一样时,也就找到了程序出错的原因,便能对照修改:

    立即窗口(快捷键Ctrl+G):在该窗口里会显示debut.print的结果值,以及随时计算和运行代码。在代码前面添加「?」,可以在立即窗口中显示运行结果。
    监视窗口:可以将变量以及表达式添加到监视窗口,可以实时查看变量和表达式的值。支持将代码窗口里的变量和表达式拖入到见识窗口
    本地窗口:本地窗口里可以查看目前的local变量和global变量的变量值。
    编辑窗口:将鼠标停在编辑窗口的变量上可显示该变量的值。
    有一些方法可减少程序错误以及降低调试的难度:
    添加重要的代码注释。
    源代码格式规范化,增加代码可读性。VBA插件Smart Indent是一个很好的辅助工具。
    尽可能声明变量类型,少用Variant变量。
    注意函数的参数传递方式,默认为传引用,子函数会修改变量的值。
    尽量将功能函数化,不同的功能分开写。
    避免在VBA中引用绝对地址,如Range("A1")。可先在Excel中定义名称"abc=$A$1",然后引用Range("abc")。
    避免使用ActiveSheet, ActiveWorkbook等可变变量,用Sheet1,ThisWorkbook这种绝对变量。绝对变量不受外界操作影响。

    出处:http://www.elsyy.com/s/article/view-2473-11703

    ========================================================================

    VBA测试与错误处理

    1.测试

    测试代码,检查它是否正确。为确保代码能够正常作用,必须尽力模拟代码运行的不同环境,并检查其正确性。

    程序中的错误一般分为如下几类:

    (1)语法错误(如输入时关键字或标点符号拼写错误) 。

    (2)编译错误(如使用对象的方法时,该对象并不支持这个方法) 。

    (3)运行期间错误(如除0、打开或关闭并不存在的文档、关闭未打开的文档等) 。

    (4)逻辑错误(逻辑锗误是最难查找的错误类型,它们是由程序中使用的逻辑引起的。

    2.调试

    要确保代码中的变量和表达式按照预想的方式运行,可以使用VBA中的各种调试工具跟踪它们。VBE有以下调试工具。

    (1) 中断模式

    ①进入中断模式方法:在过程的开始位置按下F8键(“逐语句”执行)。使用“切断断点“(F9键或者单击当前空白指示器栏)。使用Stop语句。当过程运行时,按下Ctrl+Break键。使用运行期间错误MsgBox对话框。

    ②退出中断模式方法:从运行菜单中选择“运行子过程/用户窗体)”;或者按下F5键,或者单击“调试”工具栏上的“运行子过程/用户窗体”按钮。从“运行”菜单中选择“重新设置”选项,或者单击“调试”工具栏上的“重新设置”按钮。

    (2) 单步执行过程

    ① 单步执行过程:从“调试”菜申中选择“逐过程”选项,或者按下Shift+F8键。

    ②跳出过程(跳过程剩余部份):从“调试”菜单中选择“跳出”选项,或者按下Ctrl十shift十F8键。

    ③运行到光标处(跳过一组语句):从“调试”菜单中选择“运行到光标处”或按下Ctrl+F8键。

    ④设置下一条语句为光标所指语句(要警惕会忽略不执行中间的语句):从“调试”菜单中选择“设置下一条语句”或者按下Ctrl十F9键。

    ⑤“显示下一条语句”选项指明下一个将要执行的语句是什么。当需要在程序窗口中监视很多过程、却丢失了跟踪时,就可使用这个调试功能。

    (3) 监视过程

    ①“本地”窗口(显示当前过程中使用所有变量及其值,还会显示当前加载窗体和控件的属性。):从“视图”菜单中选“本地窗口”选项。

    ②“调用堆栈”对话框(查看所有活动的过程调用):从“视图”菜单中选“调用堆栈”或按下Ctrl+L键。

    ③“立即窗口”(可查询并设置变量值,创建或撤销对象,执行单行命令)。从“视图”菜单中选择“立即窗口”或按下Ctrl+G键。

    ④“监视窗口”(是一个调试工具,在中断模式下可使用它更改变量和表达式的值,以查看不同的值如何影响代码)。从“视图”菜单中选择。

    3.预防错误

    (1)注释 。

    (2)缩进代码:Tab键或启用Too1s(工具)菜单选Options(选项)Editor(编辑器)选项卡中的Auto Indent(自动缩进)。

    (3)使代码模块化。

    (4)显式声明变量:使用Option Explicit语句,或启用工具菜单选“选项”编辑器选项卡中的“需要变量声明”复选框。

     

    (5)避免使用变体Variant(当某变量可能包含NULL值时就只能惟一指定Variant类型了)。

    (6)打开语法检查:启用工具菜单选“选项”编辑器选项卡中“自动语法检测”。

    (7)谨防Dim陷阱:Dim str1, str2 As String   '并未声明str1变量。

    4.错误处理

    调试只能够发现可以预测的错误,要处理不可预测的和不可避免的错误时,就必须使用错误处理。通过启用错误处理,捕获并提示错误处理,可以使程序更健壮。就可以使应用程序更稳定、更健壮。如果应用程序中包含了好几个过程,那么可以考虑采用集中式错误处理程序。

    (1) 捕获错误:On Error Goto line (On Error Goto 0会在当前过程禁用错误处理程序) 在这个语法中,line指定了发生运行期间错误时控制将跳转到的代码行。

    (2) 编写错误处理程序:给用户显示错误信息;提示补救方法;允许继续或取消操作。使用Err对象:

    属性

    说明

    Number

    存储最后一个错误的数字ID。这是默认属性

    Description

    存储说明错误的有关信息

    Source

    包含发生了错误的对象名或应用程序名

    HelpFile

    包含帮助文件的名字

    HelpContextID

    包含错误号对应的帮助上下文ID

    LastDLLError

    包含最后一次调用DLL的系统错误代码

    Raise方法可以让用户自定义错误处理信息,还可把错误处理信息传回调用过程: Err.Raise number[, source, description, helpFile, helpContext]

    Clear方法清除Err对象的所有属性值:Err.Clear (当调用On Error, Exit Sub, Exit Function, Exit Property, Resume 等语句时,会自动调用Err.Clear方法。)

    (3) 退出错误处理程序:

    ①0n error Resume:当错误处理程序已经修复错误后,可以用它来返回控制给引起错误的语句。但注意如果错误还在的话,会引起无限循环。

    ②0n error Resume Next:忽略错误语句,继续下一句。

    ③Resume [LineLabel]: 把控制传递给行标号(必须和Resume语句处在同一个过程中)所在点的语句。

    ④也可使用Exit Sub或者Exit Function甚至End语句退出已产生错误的过程,但这些语句应放在错误处理程序之前,这样当未产生错误时就不会执行错误处理程序。

    出处:http://blog.163.com/xing_aixin/blog/static/372355052008377252250/

  • 相关阅读:
    不完全恢复用例
    全自动 TSPITR基于RMANSCN
    restore和recover的区别
    DG不同机器自己总结
    将10g RAC库用rman 的方式备份并恢复到异机 刚试验通过与大家分享
    Linux RH5平台下使用Oracle ASM创建数据库
    crs_stat状态失败后unregister掉相关进程
    ocr is not shared across all the nodes in the clus
    RMAN 备份与恢复 实例
    基于LINUX的Oracle+10G+RAC管理维护
  • 原文地址:https://www.cnblogs.com/mq0036/p/4242148.html
Copyright © 2011-2022 走看看