【VBA】Excelのテーブルの最終行に値を追加する
作成日:2022-12-01
更新日:2022-12-04

最終行に追加
最終行を.Rows.Countで取得 → +1で 1行追加する
With Range("テーブル名")
.Cells(.Rows.Count + 1, 1).Value = "aaa"
.Cells(.Rows.Count + 1, 2).Value = "bbb"
.Cells(.Rows.Count + 1, 3).Value = "ccc"
.Cells(.Rows.Count + 1, 4).Value = "ddd"
End With
2022-12-01
編集後記:
この記事の内容がベストではないかもしれません。
記事一覧
-

[VBA]Paste 2D Arrayresize once 【VBA】二次元配列をシートに貼り付け【範囲をリサイズする】 -

[VBA]開いていたら閉じる 【VBA】指定のブックが開いていたら閉じる -

[VBA]Cells or Range 【VBA】.Cells と .Range の使い分け目安|数千か数万か -

シート名でシート取得 【VBA】シートをシート名で取得する|Worksheets(name) -

テーブルをソートする 【VBA】Excelテーブルを昇順で並び替える|ソート -

[VBA]Control the calculation再計算 【VBA】指定のシートを再計算する|Calculate