在 Excel 列中查找連續的大寫字母

Question

我需要一些幫助來突出顯示具有連續大寫字母（2 個或更多）的列中的單元格； 很多時候我看到拼寫錯誤，手動驗證每一行非常耗時。

該列可以具有以下值：

“Cear down sun”

“主要兩條街”

“昨天”

“今天會更好”

在這些情況下，我希望公式突出顯示第 1、2 和 4 行。我嘗試使用 Visual Basic，但我不太擅長。

我很感激我能得到的任何幫助。

Answer 1

如果你想要一個簡單的 UDF：

Function MultiUpper(sIn As String) As Boolean
    MultiUpper = (sIn Like "*[A-Z][A-Z]*")
End Function

然后在一個單元格或 CF 公式中：

=MultiUpper(A1)

如果單元格連續有多個大寫字符，則返回 True。

Answer 2

如果您對非 VBA 解決方案感興趣，可以使用基於公式的條件格式規則，即（應用於單元格 A1）：

=COUNT(1/(MMULT(0+(ABS(77.5-CODE(MID(A1&"ξ",COLUMN(A:B)-1+ROW(INDIRECT("1:"&LEN(A1))),1)))<13),ROW(1:2)^0)>1))>0

顯然，在設置此規則時要注意相對引用的通常行為。

問候

Answer 3

我想出了這個替代方案：-

=SUM(
(CODE(MID(A1,ROW(INDIRECT("1:"&LEN(A1)-1)),1))>=64)*(CODE(MID(A1,ROW(INDIRECT("1:"&LEN(A1)-1)),1))<=90)
*(CODE(MID(A1,ROW(INDIRECT("2:"&LEN(A1))),1))>=64)*(CODE(MID(A1,ROW(INDIRECT("2:"&LEN(A1))),1))<=90)
)

如果用作獨立公式，它將在少於 2 個字符的字符串上出錯（並且必須作為數組公式輸入），但如果用於條件格式應該可以正常工作。