ペーストで半角スペースを自動で置換してくれるツール

コピーした文の半角スペースを、_（アンダーバー）なり、他の半角文字に置換するか、削除してペーストしてくれるツールをご存知ないでしょうか。

Word2003を使うときに、ペーストする文字の半角スペースが邪魔になる局面があるので、これを何とかしたいと思い、質問しています。

Wordマクロで実現できればいいですが、私のマクロ技術は、記録マクロを作っていじったり、他の人のマクロをコピペして使わせてもらっている程度のレベルです。
Wordで、ペーストするときに、半角スペースを置換するマクロは、ありそうなのですが、調べたけれど、見つかりません。

そこで、別の方法ですが、Cliborのようなコピペツールを使おうと思いました。
でも、クリップボードの情報で、半角スペースを削除してくれるツールが調べても見つからない
です。もし他のツールでこうした機能があって、ショートカットに割り付けすることができれば、
非常に助かりますので、よろしくおねがいします。

Wordで、ペーストしてから、置換をする方法を使うのは、その都度、操作するのに手間がかかる
ので、それよりも楽な方法があると思い、質問しています。

※具体的なやりたいこと。別に、本筋の質問とは関係ないので、読まなくてもいいです。

Word2003で文書内にリンクを張るとき、事前にリンク先に名前をつけて設定する必要があります。
リンク元（青色で下線になっている箇所）をマウスオーバーすれば、リンク先の名前が出てきます。
このリンク先の名前が、リンク先と同じになるように、設定しておけば、どういう場所にリンクを張った
のか、分かりやすくなるので、便利です。ですが、リンク先の名前は、半角スペースがあると、受け付け
ないので、この半角スペースを何とかしたいと思い、質問しました。

No.3 ベストアンサー 回答者： B_one 回答日時： 2012/10/10 09:24

「clibor」でもできますが、かなり面倒ですね。

http://www.amunsnet.com/soft/clibor_macro.html
お試し程度の機能ですし・・・

私は「ToMoClip」を使用していますが、こちらの方が正規表現を利用して、簡単にできます。
http://www.vector.co.jp/magazine/softnews/020710 …

新規作成から
名前：半角スペース削除
「削除不可」と「拡張文字有効」にチェック

内容欄に

$CB editing="s/\s//;"$

と入力して、OKをクリック。

文字列をコピーしたあと、貼り付ける箇所にカーソルを合わせて、
「半角スペース削除」をクリック。

「$CB」を「$CP」に変更すると、選択文字列中の半角スペースを削除します。

この回答へのお礼

どうも、ぴったりの答えを教えてくださって、ありがとうございました！
No.4と併読してやれば、実現できそうですね。

お礼日時：2012/10/13 12:31

No.5 回答者： bin-chan 回答日時： 2012/10/10 21:18

＃１です。

「EXCELは起動しっぱなし、マクロ実行のボタンだけ見える状態にしておく」ということでした。

No.4 回答者： B_one 回答日時： 2012/10/10 09:35

#3です。

ちなみに、半角スペースをアンダーバーに置換する場合は下記のように変更してください。

$CB editing="s/\s/_/;"$

No.2 回答者： enunokokoro 回答日時： 2012/10/09 22:25

質問内容を理解していないのかもしれませんが。

Wordだけで余計なスペースがつくのなら、[オプション]で
解除できるかもしれません。
http://oshiete.goo.ne.jp/qa/5159968.html

[ツール]→[オプション]→[編集と日本語入力]タブにある
[貼り付け時に自動調整する]が関連しているかと。

クリップボード拡張ソフトを使っても、貼り付けをすれば
おそらく半角スペースが付くと思います。
メモ帳などに貼り付けしたときには、余計なものがついて
いないはずですから、Wordに貼り付けたときの問題です。

この回答へのお礼

解答ありがとうございます。
This is a pen.
をコピーして、ペーストした際に、
This_is_a_pen.
と、ペーストしてくるような方法を探しているんですね。
Word上で実現させたいのですが、実現させるためには、
Wordのツールを使っても使わなくても大丈夫なのです。

説明が下手で申し訳ありません。

お礼日時：2012/10/10 09:11

No.1 回答者： bin-chan 回答日時： 2012/10/09 22:24

ＷＯＲＤをお持ちなのでＥＸＣＥＬもお持ちであるとして。

ＥＸＣＥＬのＶＢＡでクリップボード操作するサンプルは見つけられるはず。
（キーワード[excel vba クリップボード　操作]あたり）
で、以下の作りにする。
１）クリップボードからテキスト形式の場合のみテキストを取得。
２）TRIMでもなんでも、半角置換するコードを書く。
３）半角変換結果をクリップボードに格納する。
４）１）～３）までの内容をボタンに割付


使い方
５）上記のブックを開いて、ボタンが見えるだけ大きさにして常駐させておく。
６）WORDの必要箇所をコピーする。
７）EXCELブックのボタンクリック（上記１～３を実行）
８）WORDで目的箇所にペーストする。

この回答へのお礼

どうもありがとうございます。
半角スペースを編集する作業は、使うなら、一日に何百回と使いたい機能なので、エクセルをその都度、使わないといけないとなると、Wordマクロで編集して操作するよりも面倒な感じがするので、ちょっと難しいです。
すいません。

お礼日時：2012/10/10 09:15