用于计算 Excel 2003 中工作表中文本字符串数量的宏

Question

我有一张用于评分的工作表。

我在第一张表中有一个列表，用于从 a2 开始沿表向下输入数据，这是球员姓名。

我有一个名为“地点”的摘要表，其中有一个提取数据的公式。

我想要一个宏来计算工作表“设置”中从 A2 到任意位置的文本字符串的数量，然后按正确的次数填充工作表“放置”。

Answer 1

你可以使用类似

StringCount = 0

For i = 2 to range("A2").end(xldown).row 'assuming no breaks in data

If Typename(cells(i, 1).value) = "String" Then StringCount = StringCount + 1

Next i

这实际上给出了 A 列中的字符串数量