|
|
※プログラムのご利用にあたっては「ご利用案内」をよくお読みください
***********************************************************
文字列操作マクロ集forEXCEL2000 ver.1.00
作成者：KIBUNDO（きぶんどう）
作成日：2003/05/20
内 容：EXCELに入力済みの文字列を置き換えるアドインです。
特に他人が作成した名簿等のデータ変換に威力を発揮し
ます。
***********************************************************
＜使用方法＞
１、EXCELに入力済みの文字列を置き換えるアドインです。
２、特に他人が作成した名簿等のデータ変換に威力を発揮します。
３、「C:\Program Files\Microsoft Office\Office\Library」か
「C:\Documents and Settings\Administrator\Application Data
\Microsoft\AddIn」
などのフォルダにsmoji_macro100.xlaを移動してください。
４、Excelを起動し「ツール」－「アドイン」で「参照」をクリックし、移動したフォルダ指定します。
５、Excelのメニューバー（通常一番上）の右端に【文字列操作】というメニューが現れます。
６、文字列を操作（消したり置き換えたり）したいセル・列・行を選択した後、
【文字列操作】をクリックすると以下のメニューが現れますので、操作を選んでください。
「半角数字を消す」
「全角の空白を消す」
「半角の空白を消す」
「すべての空白を消す」
「様を消す」
「様殿御中を消す」
「漢数字を半角英数字に置換」
「全角数字を半角数字に置換」
「半角英数小文字に置換」
「半角英数大文字に置換」
「全角英数小文字に置換」
「全角英数大文字に置換」
「〒を消す」
「株式会社をカッコ株に置換」
「カッコ株㈱を株式会社に置換」
「有限会社をカッコ有に置換」
「カッコ有㈲を有限会社に置換」
「全角カッコを半角カッコに置換」
「カッコ株カッコ有を㈱㈲に置換」
「㈱㈲をカッコ株カッコ有に置換」
「全角カタカナを半角に置換」
「半角カタカナを全角に置換」
「半角カタカナを全角ひらがなに置換」
「全角ひらがなを半角カタカナに置換」
７、次回からはExcelを起動するたびに自動的にアドインプログラムとして起動されます。
８、削除する場合は、３で移動したフォルダの「ツール」－「アドイン」で
「文字操作マクロ集」のチェックをはずしてください。
次回Excel起動時からはアドインとしては起動されません。
＜メニューの説明＞
「半角数字を消す」
・・・・・半角数字(1,2,3,4,5,6,7,8,9,0,)と(.)を消す
「全角の空白を消す」
・・・・・セル内のすべての全角の空白を消す
「半角の空白を消す」
・・・・・セル内のすべての半角の空白を消す
「すべての空白を消す」
・・・・・セル内のすべての空白（全角・半角）を消す
「様を消す」
・・・・・セル内のすべての「様」を消す
「様殿御中を消す」
・・・・・セル内のすべての様・殿・御中を消す
「漢数字を半角英数字に置換」
・・・・・セル内のすべての漢数字を半角英数字に置き換える
「ー」「－」も「-」に置き換える
「全角数字を半角数字に置換」
・・・・・セル内のすべての全角数字を半角数字に置き換える
「ー」「－」も「-」に置き換える
「半角英数小文字に置換」
・・・・・セル内のすべての英数文字を半角英数小文字に置き換える
「ー」も「-」に置き換える 「．」も「.」に置き換える
「半角英数大文字に置換」
・・・・・セル内のすべての英数文字を半角英数大文字に置き換える
「ー」も「-」に置き換える 「．」も「.」に置き換える
「全角英数小文字に置換」
・・・・・セル内のすべての英数文字を全角英数小文字に置き換える
「-」も「ー」に置き換える 「.」も「．」に置き換える
「全半角英数大文字に置換」
・・・・・セル内のすべての英数文字を全角英数大文字に置き換える
「-」も「ー」に置き換える 「.」も「．」に置き換える
「〒を消す」
・・・・・セル内のすべての〒を消す
「株式会社をカッコ株に置換」
・・・・・セル内のすべての株式会社を（株）に置き換える
「カッコ株㈱を株式会社に置換」
・・・・・セル内のすべての（株）・㈱を株式会社に置き換える
「有限会社をカッコ有に置換」
・・・・・セル内のすべての有限会社を（有）に置き換える
「カッコ有㈲を有限会社に置換」
・・・・・セル内のすべての（有）・㈲を有限会社に置き換える
「全角カッコを半角カッコに置換」
・・・・・セル内のすべての全角カッコ（）を半角カッコ()に置き換える
「カッコ株カッコ有を㈱㈲に置換」
・・・・・セル内のすべての（株）・（有）・株）・有）を㈱・㈲に置き換える
「㈱㈲をカッコ株カッコ有に置換」
・・・・・セル内のすべての㈱・㈲を（株）・（有）に置き換える
「全角カタカナを半角に置換」
・・・・・セル内のすべての全角カタカナを半角に置き換える
「ー」「－」も「-」に置き換える
「半角カタカナを全角に置換」
・・・・・セル内のすべての半カタカナを全角に置き換える
「-」も「－」に置き換える
「半角カタカナを全角ひらがなに置換」
・・・・・セル内のすべての半角カタカナを全角ひらがなに置き換える
「-」「－」も「ー」に置き換える
「全角ひらがなを半角カタカナに置換」
・・・・・セル内のすべての全角ひらがなを半角カタカナに置き換える
「ー」「－」も「-」に置き換える
＜動作環境＞
MS-EXCEL2000が作動する環境であれば動くはずです。
＜著作権＞
１、本プログラムの著作権は作者：KIBUNDO（きぶんどう）が保有しています。
２、本プログラムはフリーウェアとします。
３、本プログラムの再配布は禁止します。
４、本プログラムの改変は禁止します。
５、本プログラムに起因して被った障害、損害等に対して、
作者は一切の責任を負わないものとします。
６、雑誌等への掲載については下記までメールにてお申し込みください。
＜不具合および要望の連絡先＞
KIBUNDO（きぶんどう） info@kibundo.com
※メールをいただいても常に返信を保証するものではありませんので、
あらかじめご了承下さい。
以上
ダウンロード（moji_macro100.lzh 37KB）
|
|
