0

我正在尝试编写一个函数来返回工作表上的下一个空白行以插入输入。

代码正在工作,所以我只能总结一下。

我做了类似Set rng = Range("Data!A" & row)的事情然后返回参考。

通过调试,我确定正在创建的范围引用了一个有效的单元格位置。但是,它返回“Nothing”而不是空的 Range 对象。在返回 Range 之前,我已经将该单元格的值设置为“”(空格),然后将其设置回“”。

我的问题分为两部分:
(1)为什么空(单元格值)范围引用总是返回“Nothing”?
(2) 如何正确引用空单元格作为有效的 Range 对象?

4

2 回答 2

0

假设我们有一个范围并希望选择该范围内的第一个真正的空单元格

Sub FirstBlank(r2 As Range)
    Dim r1 As Range
    Set r1 = Cells.SpecialCells(xlCellTypeBlanks)
    If Intersect(r1, r2) Is Nothing Then
        MsgBox "there is nothing to find"
    Else
        r2.Cells.SpecialCells(xlCellTypeBlanks).Cells(1).Select
    End If
End Sub
于 2014-07-11T03:33:19.527 回答
-1

你在代码中有一个错误。

“A”& 行 = “A 300”(其中行=300)

VBA 插入前导空格。

于 2016-02-05T06:16:53.473 回答