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

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

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

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

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

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

答案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 列中的字符串数量

相关内容