エクセルに入力した文字列に句点が無い場合に句点を追加したい

エクセルで文字列のリストを作ったのですが、列の中に句点がついているセルとついていないセルがあります。これを、統一してすべて句点をつけることになりました。
現在句点のついていないセルに句点をつける方法を教えてください。
なお、対象範囲は一列のみですので、任意のセルについてこの方法がわかれば、あとはオートフィルでコピーすれば解決します。

ちなみに、過去の質問集を見たところ、一斉に句点をつける方法として「B1=A1&"。"でB1をコピーして「編集」「形式を選択して貼り付け」で「値」にしてA1に貼り付ける」という方法がありました。

基本的な質問で恐縮ですがよろしくお願いします。

No.1 ベストアンサー 回答者： s___o 回答日時： 2005/12/20 10:38

計算式を以下のようにして、B列にコピーしてみては？

=IF(RIGHT(A1,1)="。",A1,A1&"。")
※計算式は「A1」を基準にしてます。

この回答へのお礼

RIGHT関数という関数の存在を知りませんでした。
IF(RIGHT(A1,1)="。",A1,A1&"。")
って、「セルの右側の一番端が句点なら、そのまま、そうでないなら句点を追加する」っていう意味ですよね。まさに、聞きたかったことドンピシャの関数です。とても役立ちました。ありがとうございます。

お礼日時：2005/12/20 11:12

No.2 回答者： garouz 回答日時： 2005/12/20 10:48

エディタをお持ちなら，一度コピーペーストして，置換してはどうでしょうか．

句点を一度全部とってから，行末に句点を入れればいけると思いますよ．

\n　→　。\n
で大丈夫ではないでしょうか．

この回答へのお礼

ありがとうございます。残念ながらエディタをもっていません。というか、存在を知りませんでした・・・なんか、エクセルの編集機能を超パワーアップバージョンしたソフトみたいですね。
とても便利そうなので今度フリーのものをダウンロードして使ってみようと思います。
勉強になりました。ありがとうございます。

お礼日時：2005/12/20 11:18