[[20120512140519]]　『０頭の数字にスペースがあり消したいです』（アンちゃん）　ページの最後に飛ぶ

『０頭の数字にスペースがあり消したいです』（アンちゃん）
０頭の品番がありスペースとハイフンがあります
関数も分かってますが　めんどくさいので
選んだセル内のスペースとハイフン消すマクロ無いでしょうか？

 ｢０頭｣という意味がわからないけど、消したい領域を選択して、編集->置き換え　置き換え前をスペース、置き換え後は何も入れずに実行。
置き換え前をハイフン、置き換え後を何も入れずに実行。これをマクロ記録する。

 (ぶらっと)

どんな関数を考えていますか（マナ）

 >関数も分かってますが　めんどくさいので

 関数でもそんなに面倒だとは思えないのですが

面倒なのです（アンちゃん）

 ですから、関数だとどんな記述なのですか。
 マクロだから面倒ではない、ということもないです。
 (semm)

あらら、気分を害されたのなら、申し訳ありません（マナ）

 関数でどうやっているか説明あれば、
 何をしたいか誤解はなくなるかなと考えただけで
 他意はありませんでした。

 0頭って、0で始まるという意味ですよね。

ですよ（アンちゃん）

 ぶらっとさんので解決すると思いますが、
 電話番号のような物なら、数値だけになってしまうと先頭の0が消えてしまうので、
 セルの書式をあらかじめ文字列にしておいた方が良いかもしれません。

 Sub Sample()
    Selection.NumberFormatLocal = "@"
    For Each r In Selection
        r.Value = Replace(Replace(r.Value, " ", ""), "-", "")
    Next
 End Sub

 一応サンプルですけれど、もう少し説明の手間を惜しまずに返事を書かれてはどうでしょうか。
 (Mook)

コメント返信：

[ 一覧(最新更新順) ]

[[20120512140519]] 『０頭の数字にスペースがあり消したいです』（アンちゃん） ページの最後に飛ぶ

[[20120512140519]]　『０頭の数字にスペースがあり消したいです』（アンちゃん）　ページの最後に飛ぶ