[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『セルの文字列から漢字だけを削除したい』(初心者)
セルの文字列から、漢字だけを削除し、残った文字列を半角カタカナに変換したいです。
半角カタカナへの変換方法は分かったのですが、それ以前の漢字を削除する方法が分かりません。
文字列には、ひらがな、カタカナ、記号、数字、漢字が含まれており、その中の漢字だけを削除したいです。
恐縮ですが、ご教示いただけますと幸いです。
< 使用 Excel:Excel2016、使用 OS:Windows10 >
UDF セルに =DeleteKanji(A1) 等で使用。
標準モジュールへ
Function DeleteKanji(ByVal txt As String) As String With CreateObject("VBScript.RegExp") .Global = True .Pattern = "[一-龠〃々〆〇]" DeleteKanji = .Replace(txt, "") End With End Function (seiya) 2020/07/01(水) 11:11
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.