避免excel工作表函数在VBA中产生运行时错误
发布时间：2022-10-15 10:20:24
大家知道大多数的Excel工作表函数可以用在VBA中，通过下面的方法来调用，例如对A1:A10单元格求和：
Sub Sum1()
MsgBox WorksheetFunction.Sum(Sheet1.Range("A1:A10"))
End Sub
或：
Sub Sum2()
MsgBox Application.Sum(Sheet1.Range("A1:A10"))
End Sub
但是如果在单元格中包含错误，例如上例中的A1:A10区域包含一个“#DIV/0!”错误，运行上述代码后将产生运行时错误。例如出现类似下图的提示：
为避免出现这样的错误，我们可以将单元格中的错误用数值“0”取代。用下面的代码：
Sub ReplaceErrors()
On Error Resume Next
With Sheet1.Range("A1:A10")
.SpecialCells(xlCellTypeFormulas, xlErrors) = 0
MsgBox WorksheetFunction.Sum(.Cells)
End With
On Error GoTo 0
End Sub
或者先进行一个错误检查，并给出提示：
Sub CheckForErrors()
Dim rErrCheck As Range
On Error Resume Next
With Sheet1.Range("A1:A10")
Set rErrCheck = .SpecialCells(xlCellTypeFormulas, xlErrors)
If Not rErrCheck Is Nothing Then
MsgBox "指定的单元格中包含错误！"
Application.Goto .SpecialCells(xlCellTypeFormulas, xlErrors)
Else
MsgBox WorksheetFunction.Sum(.Cells)
End If
End With
On Error GoTo 0
End Sub
0
投稿猜你喜欢
- PS中如何使用再次变换功能？小编最近使用PS处理图片时发现了一个挺好玩的功能——再次变换，下面就与大家进行分享。下面，小编就为大家介绍下PS
在Excel中输入千分号的方法非常多，例如下面的一些方法： 方法一：用输入法 &n- Microsoft Office Powerpoint是 利用 Windows SharePoint Services 停止 合
- 随着Win11系统的推出，很多用户都已经升级更新了新的系统，但是在后续的使用中，有部分用户出现了使用右键会闪屏的情况，这是怎么回事呢？对于这
- win10对比win7系统更改了很多地方，在使用安装第三方软件的过程中，有时候需要我们安装下载的win10是什么版本的，那要怎么查看win1
- 很多使用mac的用户反映mac在线看视频很卡，那么mac看视频卡怎么解决呢？别着急！想知道的伙伴们跟着小编一起来看看mac看视频卡怎么解决？
- 如果你的电脑已经升级到macOS Big Sur，如果你的 Mac 设置了多个用户，为了更方便的切换用户，可以让 用户名显示在状态栏中，要切
- 说起表格，经年在办公室工作的达人们最有发言权，有的小伙伴说，菜鸟和高手的区别只看一点儿便知：那就是看看他们做的WPS表格如何？这可是经验之谈
- 常常 需求复制网上的一些 笔墨打印 进去， 可是粘贴到WPS里 常常会很乱， 经常 另有乱码。 怎样 疾速 收拾整顿网上复制的 笔墨呢， 需
- 众所周知，Win8系统的磁盘占用时有100％情况的发生，直到现在的正式版，依然有用户反映会出现磁盘占用100％的情况，并且还会伴随着电脑卡机
- 我们在使用电脑运行游戏的时候，相信对于使命召唤16的玩家，在游戏运行的过程中一定也遇到过各种各样的问题。那么现在就来看下这篇汇总来解决自己的
- uos系统是一款国产的系统，受到了很多国内小伙伴的热烈追捧，不少人也是慕名想去使用，但是不知道该怎么去安装，下面就给大家带来了详细的安装方法
- 如果你想要把自己的Win10版本进行升级，其实系统会自动给用户推送新版本更新消息，前提是你没有吧系统的推送非关闭。看到退送的新版本，点击就可
- 我们通过PPT设置母版版式的图片背景，我们还可以对ppt母版的的页面进行设置，设置页面格式包括页面的大小和方向，设置母版的页面格式可以统一演
- 自Win10系统诞生以来，Windows系统更新的话题就没断过，近期一位网友说自己电脑win10系统在更新过程中一直失败，无法完成新功能的更
- 众所周知用户很喜欢使用wps这款办公软件，wps软件不仅有着电脑版和手机版，还有着许多使实用且强大的功能，让用户可以在wps软件中收获到很多
- 在wps表格里的数值应该如何计算呢?下面就让小编告诉你wps表格计算数值 的方法。wps表格计算数值的方法：启动WPS文字，新建或打开有如下
- 升级win10正式版后开机无法输入密码按键失灵该怎么办？好多升级win10电脑启动后不能输入密码，或进入后按键失灵。但是重启电脑又好了，该怎
- 使用电脑的人都知道电脑一段时间没有使用的话，系统就会进入自动锁屏的状态。如果有人不想要这个锁屏界面怎么办呢？怎么让电脑永远不进入锁屏界面呢？
- 当Apple TV遥控器已损坏时，我们用什么来替换Apple TV遥控器？当Apple TV遥控器已损坏时我们可以通过iPhone或iPad
