最新閲覧日:

お世話になっています。

下記のエクセルVBAマクロで、
列挿入処理をしているのですが、

列に結合セル(行方向)がある場合にだけ、
列選択がうまくできず、
目的と異なる処理をしてしまいます。

ActiveCell.Offset(0, 1).Columns("A:A").EntireColumn.Select

Selection.Insert Shift:=xlToRight

新しいマクロの記録で
やってみたのですが、
上記マクロが生成されただけでした。

手作業では
列の上のアルファベットを選択して、
列挿入できるので、
何かいい方法があるのは?
と思います。

どなたかよろしくお願いします。

A 回答 (2件)

列を追加するなら


Worksheets(シート名).Columns(列INDEX).Insert Shift:=xlRight
行を追加するなら
Worksheets(シート名).Rows(行INDEX).Insert Shift:=xlDown
でできると思います。
    • good
    • 0
この回答へのお礼

ありがとうございます。

一発でうまく行きました。

今後ともよろしくお願いします。

お礼日時:2002/02/21 18:14

セル結合をしなくてはいけないのですか?




解決策ではなく、あくまで回避策ですが・・・

セルを結合しないで、
メニューバーで「書式」→「セル」→「配置」
「横位置」=選択範囲内で中央
「セルを結合する」=チェックOFF
にしておくと、擬似的にセルを連結しているように見せることができます。
    • good
    • 0
この回答へのお礼

ありがとうございます。

はい、セル結合解除してから
マクロを行うことはやってみました。

ただ、繰り返し作業が非常に多くて、
効率的でなくなってしまうのです。。。。

お礼日時:2002/02/21 18:13

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング

おすすめ情報