No.4ベストアンサー
- 回答日時:
#2、3、cjです。
#3に続けて追加レスです。半角カナを投稿出来ないことが原因で、回答の意図を伝えられないでいるのは、#1さんも私も一緒みたいですね。
いっそ半角カナは無視して良いってことになれば、話は簡単だったと思うのですが。
そういうことで躓いているのもなんなんで、マクロにして書き残すことにしました。
ActiveDocumentに対して処理するようにしましたから、何処のモジュールに書きこんでもいいです。
強調表示するマクロと強調表示を解除するマクロです。
Sub カナ強調表示()
Dim sPattern As String
sPattern = "[" & Chr(166) & "-" & Chr(223) & Chr(&H815B) & "ァ-ヶ]*"
With ActiveDocument.Range.Find
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindStop
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchFuzzy = False
.MatchWildcards = True
.HitHighlight sPattern
End With
End Sub
Sub カナ強調表示_解除()
ActiveDocument.Range.Find.ClearHitHighlight
End Sub
No.3
- 回答日時:
パターンがうまく書けていないようです。
[ーァ-ヶヲ-゜]*
これをコピペして、
全角 長音、半角 ヲ、半角 ゜、
の3点だけ上書きしてみて下さい。
(間にスペースなど混じらないよう注意して)
半角カナを無視してもいいのでしたら、
[ーァ-ヶ]*
というパターンになります。
パターンが正しければ、漢字がヒットすることはありません。
例外を挙げれば、「二ヶ所」のように
慣用的に単語の中にカナを挟む単語のカナにヒットすることはあります。
お礼が遅くなりましたが、ありがとうございます。
これは、わりと使用頻度の高い機能かと思っていたのですが(論文などの時は必須ですし)、自分で何とかしないとだめなのです。
No.2
- 回答日時:
検索のオプションで
[ワイルドカードを使用する]にチェックを入れて、
検索ウィンドウに
[ーァ-ヶヲ-゜]*
というパターンを入力して
そのまま検索すれば
カタカナの塊りが簡単に抽出できます。
このサイトでは、半角カナ文字の投稿が反映されない(文字化けする)ので
上に挙げたパターン文字にも注意してください。
左から一文字ずつ
半角角括弧 [
全角長音 -
全角カナ小文字 ァ
半角ハイフン -
全角カナ小文字 ヶ
半角カナ ヲ
半角ハイフン -
半角半濁点
半角角括弧 ]
半角アスタリスク *
全10文字です。
ありがとうございます。
文字化けしたようなので、↓を打って文字列を作成しました。
半角角括弧 [
全角長音 -
全角カナ小文字 ァ
半角ハイフン -
全角カナ小文字 ヶ
半角カナ ヲ
半角ハイフン -
半角半濁点
半角角括弧 ]
半角アスタリスク *
単語単位で強調表示されるのですが、漢字の単語もハイライトされてしまいます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- 日本語 カタカナ部署名が恥ずかしい件 3 2022/04/03 18:24
- イタリア語 イタリア語のカタカナ表記として「スパゲッティ アッラ カルボナーラ」という表記を目にしますが、これは 1 2022/10/08 12:02
- フランス語 フランス語で店名を付けたいです。 1 2022/07/09 16:54
- その他(言語学・言語) 国語表現について教えてください。 無責任なカタカナ語排除の主張 の内容を踏まえて、 カタカナ語につい 4 2022/05/18 00:10
- Excel(エクセル) Excelで校閲をする方法はあるでしょうか(取扱説明書への掲載禁止用語の確認) 3 2022/06/11 22:51
- CAD・DTP 「機能ブロック図」の描画用フリーソフトを教えてください 1 2022/09/23 16:12
- その他(Microsoft Office) WordやExcelで英数字のみ半角または全角にしたい 6 2022/08/03 08:18
- 英語 「和製英語はネイティブスピーカーに通じない」とあざ笑う英語堪能な日本人をどう思う? 13 2022/05/27 08:39
- 英語 heteroclite 発音をカタカナ表記で教えてほしいです。 イギリス英語でしょうか?発音がわかり 1 2022/12/15 15:42
- その他(悩み相談・人生相談) わざわざ日本語の注釈を入れてカタカナ語を使う人。 7 2023/04/22 20:32
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VB.net テキストボックス半角文...
-
エクセルのCOUNTIFが正しくカウ...
-
全角英数字のみ半角英数字にす...
-
エクセルでの漢字、カタカナ、...
-
バッチファイル 全角検索
-
Phonetic関数を利用して文章中...
-
半角文字と全角文字の判別の仕方
-
FC2ホームページ 文字化けする。
-
メッセージボックスで1025文字...
-
文字の入力で横バー上段、中断...
-
IT企業の技術屋にとって全角英...
-
半角数字かどうかの判定
-
記号は半角と全角どちらがよい...
-
全角半角混在の文字列から○文字...
-
マクロで半角・全角スペースと...
-
数字と半角英字混じりの乱数を...
-
HTML5の「pattern」属性で前後...
-
Excel関数「COUNTIF」で”文字”...
-
ファイルから読み込み
-
正規表現による文字列のチェッ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
文字の入力で横バー上段、中断...
-
メッセージボックスで1025文字...
-
Excel関数「COUNTIF」で”文字”...
-
全角括弧と全角読点の間隔を狭...
-
半角記号、全角記号を含む正規...
-
エクセルのCOUNTIFが正しくカウ...
-
XMLのタグ名の禁則文字
-
文字列中の両丸括弧を取り除くV...
-
VBScriptである文字列に半角文...
-
全角英数文字が嫌われる理由を...
-
記号は半角と全角どちらがよい...
-
Excel2002 一桁数字だけ全角に置換
-
エクセルでの漢字、カタカナ、...
-
特定の文字を簡単な操作で半角...
-
Replace関数は文字数の制限ある...
-
VBAで英数字入力チェックしたい。
-
IT企業の技術屋にとって全角英...
-
2つ以上の連続する空白文字を除去
-
全角半角変換 C++/CLI
-
Accessの文字数を調べたい
おすすめ情報