Debug.print的用法

使用Debug.print可以用来更好的调试VBA程序

通过ALT+F11代开VBA编程窗口）

插入模块，接着在窗口中输入以下代码，按F5执行

 

Sub Excute()
 Debug.Print 50 * 20 + 1
End Sub

结果如下：

实例二：

Sub 执行()
  Debug.Print Range("a:a").Count '计算工作表最大的行数
  Debug.Print Range("1:1").Count '计算工作表最大的列数
  Debug.Print Application.CountA(Range("a:a")) '计算工作表已经使用的列数 计算最后一行
  Debug.Print Application.CountA(Range("1:1")) '计算工作表已经使用的列数 计算最后一列
End Sub

Excle中内容如下：

 

执行结果如下：