セル結合を解除して同じ値を各セルに入れる

Excelのオートフィルタはとても便利。しかし扱うデータが一行一レコードのスタイルになっていなければならない。セルの結合がしてある表は扱いにくいか、場合によってはつかえない。

そこでVBAで結合セルを分解して、全部のセルに同じ値を入れたい。

参考になったサイト。



■Office TANAKA - Excel VBA Tips[結合セルを調べる]

セルが結合されているかどうかを知るプロパティとその使用法の解説。



■[エクセル] 結合セルを解除+同じ値をセット。: 一文字に三つ星

実際のサンプルコードが掲載。



注意点。セルをコピーするなら書式も一緒にコピーされるが、値だけ入力すると、"02"とか"2.0"とかいった文字列は2という数値として解釈されてしまう場合がある。それが不都合な場合あらかじめセルの書式を設定しておかなければならない。