No.2ベストアンサー
- 回答日時:
半角が含まれているかどうか調べる関数は、確かなかったと思います。
ただ、全角文字は2バイトであることを利用すれば、以下のようなルーチンで半角文字の有無を検出できます。
Sub test()
Dim str As String
Dim len1 As Long
Dim len2 As Long
str = Range("A1").Value
len1 = Len(str)
str = StrConv(str, vbFromUnicode)
len2 = LenB(str)
If len1 = len2 Then
Range("b1") = "すべて半角文字の場合の処理"
Else
If len1 * 2 = len2 Then
Range("b1") = "すべて全角文字の場合の処理"
Else
Range("b1") = "全角半角混在の場合の処理"
End If
End If
End Sub
No.3
- 回答日時:
こんにちは。
maruru01です。全角のチェックをそのまま反対にしたらどうですか。
If Asc(Mid(文字列, i, 1)) >= 0 And Asc(Mid(文字列, i ,1)) <= 256 Then
MsgBox "半角"
End If
No.1
- 回答日時:
こんにちは
VBAというかOfficeのバージョンにもよりますが・・。
Strconv関数を使うと判定できますよ。
UnicodeコードからANSIにして、LenとLenBを比べる方法の他に、文字列をvbWideで全角にしてみて、前の文字列と比較して、違っていれば半角が含まれていたと判定するとかですね。
では!
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルシート中の全角英数字を半角に変換したい 4 2022/07/07 13:14
- その他(データベース) Accessのクエリで1フィールドの抽出条件設定をNullでなく全角半角含む空白のみの文字列でない文 1 2023/04/24 15:20
- Excel(エクセル) PowerQueryに詳しい方教えてください(Office365) 1 2022/07/24 21:11
- Visual Basic(VBA) エクセルの数式で教えてください。 1 2023/07/31 15:49
- Excel(エクセル) capeofdragonと申します Excel2016を使っておりまして 半角又は全角の任意文字列が 2 2022/10/31 13:51
- その他(Microsoft Office) WordやExcelで英数字のみ半角または全角にしたい 6 2022/08/03 08:18
- その他(プログラミング・Web制作) 2つのテキストファイルを比べて文字列を特定する方法を教えて下さい 5 2022/05/01 15:22
- Excel(エクセル) エクセルの数式で教えてください。 3 2022/10/25 10:52
- Excel(エクセル) エクセル 関数について質問です。 2 2022/10/03 11:14
- Access(アクセス) Accessのテキストボックスの入力文字制限 1 2023/01/18 20:43
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
英数字のみ全角から半角に変換
-
CString Format にて全角空白文...
-
住宅にカナを入力する際に丁目...
-
Accessのテキストボックスの入...
-
Accessで日付や数値を全角で表...
-
COBOLでの全角文字の判定をした...
-
VB.net、テキストボックス入力...
-
Word2007の全角文字、全角スペ...
-
封筒の宛先で縦書きの書き方
-
Excel関数またはVBAでの質問に...
-
VBで、String型のデータが、...
-
ACCESS VBA でのバイナリデー...
-
エクセルにMicrosoft Barcode C...
-
COBOL・全角判定
-
C言語のコンパイルエラーなん...
-
全角スペースと半角スペースの...
-
LaTeXで半角カンマと全角カンマ...
-
B1にある文言がA1に含まれて...
-
全角スペース
-
全角ひらがな、漢字をマッチさ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
英数字のみ全角から半角に変換
-
住宅にカナを入力する際に丁目...
-
全角英数字の必要性が理解できない
-
Excel関数またはVBAでの質問に...
-
エクセルにMicrosoft Barcode C...
-
IEからEdgeへの移行に伴うIMEの...
-
VBA 文字に半角が含まれて...
-
COBOL・全角判定
-
プログラミングでは、半角括弧...
-
word差し込み印刷 半角カタカ...
-
メモ帳の段落の揃え方
-
よくアカウント等に使われる 半...
-
Accessのテキストボックスの入...
-
ダブルコーテーションの置換
-
エクセルでの”々”の扱い
-
小説の点々は……と繋がらなくて...
-
大文字と全角文字は同じ意味で...
-
[VBScript]バイト長の判定
-
封筒の宛先で縦書きの書き方
-
VBで、String型のデータが、...
おすすめ情報