excel - 1004错误:未找到任何单元格，容易解决吗？

This question already has answers here:

Deleting Empty rows in Excel using VBA

（5个答案）

5年前关闭。

在我的宏中，我有一个段，它查看一个范围，找到并填充空白单元格。

Range("E10:A" & CStr(bottom - 1)).Select
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.Value = "N/A"

哪里

bottom = ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Row

当该范围内存在空白单元格时，此方法非常有效，但抛出“ 1004错误：未找到任何单元格”。在specialcells.select行。我很难想到一种解决此问题的简便方法。

我知道我可以在范围内循环以首先检查空白单元格，但是我觉得这种方法很慢而且很笨拙。

有谁有更快和/或更容易的解决方案？

PS：我知道我可以合并上面的代码行，我只是在这里这样布局，以便于理解。

    Range("E10:A" & CStr(bottom - 1)).SpecialCells(xlCellTypeBlanks).Value = "N/A"

最佳答案

为了避免错误弹出，您可以做的是添加错误处理程序

例如：

Sub Main()
    On Error GoTo NoBlanks
    Range("A1:A10").SpecialCells(xlCellTypeBlanks).Value = "N/A"

NoBlanks:
    Resume Next
    ' or add code here to execute when there are no empty cells
End Sub

关于excel - 1004错误:未找到任何单元格，容易解决吗？，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/25380886/

上一篇：vba - 在 Excel VBA 中将字符串转换为十六进制

下一篇：vba - 命名图表时出现内存不足错误

相关文章：

vba - 根据类别从列表中随机选择一个项目，根据不同的数字重复次数

vba - Excel VBA - 如何逐行读取csv文件而不是整个文件

excel - 如何在 Microsoft Excel 2007 中自动进行 Web 查询登录以下载数据？

excel - VBA 将分隔 rune 本文件转换为 Excel

excel - 使用 VBA 在 Excel 2010 中查找和替换 Powerpoint 2010 中的文本

vba - Excel VBA 仅在中断模式下执行突出显示单元格

VBA 脚本卡在 Workbook.Close 处

c - 动态分配不在循环中工作

java - 为什么 Eclipse 的表达式 View 在某些类上会失败？

visual-studio-2008 - 不要中断 Visual Studio 2008 中已处理的异常