excel - セルに西洋以外のテキストが含まれているかどうかを判断するにはどうすればよいですか? (エクセル)

Answer 1

この UDF を VBA コード モジュールに入力できます。

Function IsLatin(Str As String) As Boolean
IsLatin = True
For i = 1 To Len(Str)
    IsLatin = IsLatin And Abs(AscW(Mid(Str, i, 1)) - 64) < 64
Next i
End Function

次に、テキストが列 A にある場合は、セル B1 に入力して入力=IsLatin(A1)します。

...または、Excel 2013 では、CTRL + SHIFT + ENTER で確認した次の配列数式を使用できます。

=AND(UNICODE(MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1))<128)

こちらもB1から埋まっています。

注:CODEたとえば、Unicode をラテン文字に変換し、どちらも 63 を返すため、これには使用できませ =CODE("α")ん=CODE("a")。