お世話になっています。
下記のエクセルVBAマクロで、
列挿入処理をしているのですが、
列に結合セル(行方向)がある場合にだけ、
列選択がうまくできず、
目的と異なる処理をしてしまいます。
ActiveCell.Offset(0, 1).Columns("A:A").EntireColumn.Select
Selection.Insert Shift:=xlToRight
新しいマクロの記録で
やってみたのですが、
上記マクロが生成されただけでした。
手作業では
列の上のアルファベットを選択して、
列挿入できるので、
何かいい方法があるのは?
と思います。
どなたかよろしくお願いします。
No.2ベストアンサー
- 回答日時:
列を追加するなら
Worksheets(シート名).Columns(列INDEX).Insert Shift:=xlRight
行を追加するなら
Worksheets(シート名).Rows(行INDEX).Insert Shift:=xlDown
でできると思います。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 【Excel】指定のセル内容を基に別シートのセルを検索して選択する【VBA】 1 2022/06/16 16:16
- Visual Basic(VBA) エクセルVBA 4 2022/05/14 00:51
- Visual Basic(VBA) tatsumaru77様 昨日回答して頂いたものです。 すみませんが、昨日の質問で1つ補足があります 1 2022/05/15 15:06
- Excel(エクセル) なぜか正常にマクロが動いていない? 1 2022/11/03 07:56
- Excel(エクセル) マクロだと数式が表示される 2 2022/09/10 14:48
- Visual Basic(VBA) Excel(VBA) 特定の条件に該当する行の値、書式を同じセルにコピ&ペーストしたいです 1 2022/05/21 18:18
- Visual Basic(VBA) Excel VBA マクロ ある列の最終行迄を参照し、別の列の空白セルに値を入力したいです 2 2023/03/05 02:44
- Visual Basic(VBA) エクセルのマクロで対象ごとにシート分けしてその内容をセルに書き込みたい 9 2022/08/24 13:23
- Visual Basic(VBA) 列と行の名前(重複あり)が交差するセルに、データを入力したい 2 2022/06/25 22:42
- Excel(エクセル) VBA オリジナル関数で選択セルの合計を作成したい 3 2023/03/19 19:45
このQ&Aを見た人はこんなQ&Aも見ています
-
「どうして捨てられないの?」前妻の物を捨てられない男性の心理って?
前妻の物を捨てられない理由に加え、捨てるための手段はあるのかを専門家に聞いてみた!
-
VBA初心者です。結合セルを保持したまま挿入する方法を教えてほしいです。
Visual Basic(VBA)
-
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
VBAでの結合セルのコピー&ペースト
Excel(エクセル)
-
-
4
エクセル 結合セルの挿入
その他(Microsoft Office)
-
5
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
6
Excelで数式内の文字色を一部だけ変更したい
Excel(エクセル)
-
7
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
8
VBA シートのボタン名を変更したい
Visual Basic(VBA)
-
9
VBA 数式を残して値をクリアについて
Excel(エクセル)
-
10
エクセルで折り返しと縮小の同時設定は無理?
Excel(エクセル)
-
11
「Columns(A:C")」の列文字を数字にして表記したい"
Excel(エクセル)
-
12
行・列の挿入でセル結合が解除される
その他(Microsoft Office)
-
13
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
14
Application.ScreenUpdating = Falseが効きません
Visual Basic(VBA)
-
15
メッセージボックスに表示する文字を大きくしたい
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
i=cells(Rows.Count, 1)とi=cel...
-
ExcelVBAを使って、値...
-
【Excel VBA】指定行以降をクリ...
-
Excelで指定した日付から過去の...
-
TODAY()で設定したセルの日付...
-
VBA初心者です。結合セルを保持...
-
EXCELのVBA-フィルタ抽出後の...
-
特定のセルが空白だったら、そ...
-
Excel VBA、 別ブックの最終行...
-
【Excel】指定したセルの名前で...
-
特定の文字を条件に行挿入とそ...
-
【EXCEL VBA】Range("A:A").Fi...
-
DataGridViewの各セル幅を自由...
-
Excel VBAでいくつか質問があり...
-
エクセルVBAでコピーして順...
-
セル色なしの行一括削除
-
VBからEXCELのセルの値を取得す...
-
VBAでセルに値が入ったときにイ...
-
Google Apps Script:Googleスプ...
-
EXCELで変数をペーストしたい
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ExcelVBAを使って、値...
-
特定のセルが空白だったら、そ...
-
【Excel VBA】指定行以降をクリ...
-
i=cells(Rows.Count, 1)とi=cel...
-
Excelで指定した日付から過去の...
-
【Excel】指定したセルの名前で...
-
VBAの計算で@が出てしまう件
-
Excelのプルダウンで2列分の情...
-
EXCELで変数をペーストしたい
-
VBA ユーザーフォーム ボタンク...
-
VBAでセルをクリックする回...
-
Excel VBA、 別ブックの最終行...
-
Excel vbaで特定の文字以外が入...
-
TODAY()で設定したセルの日付...
-
screenupdatingが機能しなくて...
-
セル色なしの行一括削除
-
エクセルVBAでコピーして順...
-
VBAを使用した時間管理
-
”戻り値”が変化したときに、マ...
-
Sub 要具ライフ() ActiveSheet....
おすすめ情報