No.1ベストアンサー
- 回答日時:
Dim myReg As Object
Dim st As String, ss As String
Dim v As Variant
Set myReg = CreateObject("VBScript.RegExp")
myReg.Pattern = "[^0-9]+"
myReg.Global = True
st = "ア-12-50-123山田浩輔&ABCD-2"
ss = st
For Each v In myReg.Execute(st)
ss = Replace(ss, v.Value, StrConv(v, vbNarrow))
Next
MsgBox st & vbLf & ss
Set myReg = Nothing
こんな感じの事でしょうか?
この回答への補足
回答ありがとうございました。
いまいち結果が不安定です。
下記の2つですが、全角カッコの半角化が前者の"("
が半角になっていません。
2と2の違いだけで結果が異なるのはなぜでしょうか?
※下記は画面上ではわかりにくいかもしれませんので、コピペして試してみてください。
1、2、4、東京都新宿区西新宿(2)特
↓NG
1、2、4、東京都新宿区西新宿(2)特
===========================================
1、2、4、東京都新宿区西新宿(2)特
↓OK
1、2、4、東京都新宿区西新宿(2)特
No.3
- 回答日時:
#1です。
myReg.Pattern = "[^0-9()]+|[()]+"
ですかね。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) capeofdragonと申します Excel2016を使っておりまして 半角又は全角の任意文字列が 2 2022/10/31 13:51
- その他(データベース) Accessのクエリで1フィールドの抽出条件設定をNullでなく全角半角含む空白のみの文字列でない文 1 2023/04/24 15:20
- Visual Basic(VBA) エクセルの数式で教えてください。 1 2023/07/31 15:49
- Excel(エクセル) エクセルの数式で教えてください。 3 2022/10/25 10:52
- Visual Basic(VBA) 特定の文字を簡単な操作で半角スペースに変換するか削除したい 2 2022/11/01 10:35
- Excel(エクセル) エクセルの数式で教えてください。 2 2022/04/01 09:10
- その他(プログラミング・Web制作) プログラミング pythonの問題について 2 2022/04/19 00:41
- Excel(エクセル) エクセル 関数について質問です。 2 2022/10/03 11:14
- Excel(エクセル) PowerQueryに詳しい方教えてください(Office365) 1 2022/07/24 21:11
- その他(プログラミング・Web制作) 単純なコマンドプロンプトが動きません。 2 2022/04/19 15:21
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【Excel VBA】A列の全角・半角...
-
VBScriptである文字列に半角文...
-
Excel関数「COUNTIF」で”文字”...
-
エクセルのCOUNTIFが正しくカウ...
-
正規表現 文中空白可能
-
エスケープ文字にstr_replaceが...
-
文字の入力で横バー上段、中断...
-
記号は半角と全角どちらがよい...
-
php言語の全角入力のチェック方...
-
特定の文字を簡単な操作で半角...
-
メッセージボックスで1025文字...
-
半角記号、全角記号を含む正規...
-
2つ以上の連続する空白文字を除去
-
全角数字以外を半角化する方法
-
XMLのタグ名の禁則文字
-
全角括弧と全角読点の間隔を狭...
-
マクロで半角・全角スペースと...
-
VBAのコマンドボタンの文字列の...
-
ソースコードの1行が長いとき...
-
エスケープ文字の復帰(¥r)と...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
メッセージボックスで1025文字...
-
文字の入力で横バー上段、中断...
-
Excel関数「COUNTIF」で”文字”...
-
エクセルのCOUNTIFが正しくカウ...
-
全角括弧と全角読点の間隔を狭...
-
半角記号、全角記号を含む正規...
-
特定の文字を簡単な操作で半角...
-
全角英数文字が嫌われる理由を...
-
VBAで英数字入力チェックしたい。
-
エクセルでの漢字、カタカナ、...
-
全角半角変換 C++/CLI
-
XMLのタグ名の禁則文字
-
VBScriptである文字列に半角文...
-
記号は半角と全角どちらがよい...
-
文字列中の両丸括弧を取り除くV...
-
パソコンで全角、半角文字の切...
-
HTML5の「pattern」属性で前後...
-
Replace関数は文字数の制限ある...
-
Excel2002 一桁数字だけ全角に置換
-
エスケープ文字にstr_replaceが...
おすすめ情報