excel - 如果超过 10 个单词，Excel 宏要删除

Question

我有一个文本值列表，我想知道如何删除超过 10 个单词的单元格。有什么方法可以计算空格字符，如果超过 9 个则删除单元格？

干杯

Answer 1

如果您在 cell 中有一个文本字符串，A1则可以通过在 cell 中使用以下公式来确定该单元格中有多少个空格字符B1：

=LEN(A1)-LEN(SUBSTITUTE(A1," ",""))

Answer 2

当然，这是删除 A 列中大于 10 个单词的所有单元格，用于第 1 到 100 行。

sub test()
for r = 1 to 100
    space_count = 0
    for c = 1 to len(range("A" & r)) 
       if mid(range("A" & r),c,1) = " " then space_count = space_count + 1
       if space_count > 8 then range("A" & r).clearcontents
    Next
Next
end sub