我的代码在第一时间没有工作,唯一的问题是事实,结果返回为每个细胞的数量超过擅长细胞字符的限制(这是另一个问题)。否则,我的代码工作
实际真正的问题,我是擅长细胞字符的限制。这可以通过改变数组的大小,我在寻找可以解决我的目的。
当我缩小了2维范围来搜索,或我正在寻找的值小于流行/阵列中更独特,或者实际上在某些情况下除去我的通配符(执行更严格的搜索),结果(即小于32767个字符长)开始返回\变得可见。
所以,我的整个原来的问题是愚蠢和unneccissary。本来应该更多的时候结果的字符长度超过过人之处细胞字符限制返回的结果visability。我应该已经检查/意识到,自己第一次。
-----这是一个问题:
我试图单元格地址转换成单元格的内容(或值)。
If UCase(xCell.value) Like SearchTerm Then
FunctionT = FunctionT & Range(Range(xCell.Address(0, 0)).row, Range(xCell.Address(0, 0)).Column).Text & " // "
它可以返回的行数和这些地址的列数和单元格地址,但不能返回这些单元格的内容。这是为什么?
试过range.value和range.text。
至少我的行数和列数。
但是,当我尝试不工作:
Cells(Range(xCell.Address(0, 0)).row, Range(xCell.Address(0, 0)).Column).value
甚至只是
Cells(Range(xCell.Address(0, 0)).row, Range(xCell.Address(0, 0)).Column)
不知道你想要做什么,而是让这个尝试。
与将行:
FunctionT = FunctionT & Cells(Range(xCell.Address(0, 0)).Row, Range(xCell.Address(0, 0)).Column).Value & " // "
当阵列的大小被改变(降低),或要搜索的项目的唯一性增加,
FunctionT = FunctionT & Range(xcell.Address(0, 0)).value & "//"
和/或
FunctionT = FunctionT & xCell.Value & "//"
完美。
它不是摆在首位的工作,唯一的问题是事实,结果返回为每个细胞的数量超过擅长细胞字符限制这将是另外一个问题。