- 229 名前：デフォルトの名無しさん mailto:sage [2009/07/28(火) 12:20:58 ]
- >>227
とりあえず$記号をまとめて消したいなら
myRange2 = Replace(Target.Address, "$", "")
あと、そのプログラムにはバグがあるよ。
選択された領域が2つ以上に分かれて離れていた場合、2つ目以降がすべて消えたり
$記号が残ったりする。
それよりも、セルが1個の時と複数の時を区別する意味がわかんないし、
$を消す理由もよくわからん。普通はTargetはそのまま使うもんだし。
たぶん、他の部分でもカンチガイしてる可能性が高い。
何がやりたいのか全部書いてみ？
