访问excel单元的.name.name属性,同时迭代usedrange

我试图在工作表中迭代使用的范围,并将给定的.name.name属性与cStringBuilder匹配,以备将来在Web应用程序中使用。

但是我遇到了append函数和使用单元格的.name.name属性的错误。

如果我使用类似Worksheets("MAIN").Range("F2").name.name我提取正确的信息。 但是for循环不起作用。

如果我使用cell.name它会提取正确的单元格值。 但是我必须匹配一个.name.name属性,因为我无法确定数据总是在表单的什么位置。

我得到的错误消息是: Run-time error '1004': Application-defined or object-defined error

这是我正在编写的代码。

 Public Function Testing() As cStringBuilder Dim strJson As cStringBuilder Set strJson = New cStringBuilder For Each cell In Worksheets("MAIN").UsedRange If cell.Value <> "" Then strJson.Append (cell.name.name) End If Next Testing = strJson End Function 

 For Each cell In Worksheets("MAIN").UsedRange On Error Resume Next Debug.Print cell.Name.Name Next cell 

这似乎适用于我,如果没有名字,你会得到一个错误。