「ユーザーフォームのボタンでシート上のレコード（1行）を操作したいなぁ」
ってときがありますよね。
そんなときに使える「シート上の1行（複数行）のデータを操作するコード」を紹介します。
今回は下の表を使います。
では、さっそく解説していきます。
シート上の1行（複数行）のデータを操作
下は「3行目（鈴木次郎）の1行のデータをすべて削除する」というコードになります。
|
1 2 3 4 5 6 7 8 9 |
Sub sample() Dim lastColumn As Long lastColumn = Sheets("Sheet1").Cells(1, Columns.Count).End(xlToLeft).Column ' 下は「Sheets("Sheet1").Range("A3:E3").Delete」と同じ Sheets("Sheet1").Range("A3" & ":" & Chr(64 + lastColumn) & 3).Delete End Sub |
4行目：表のデータの入った一番端のセルの列数を取得。
7行目：3行目のＡ列からＥ列のデータを削除する。
※Chr関数のくだりが分からない方は『Range指定で使う列文字を列数から取得する』を読んでみてください。
上のコードの7行目でのRangeオブジェクトの範囲指定で行数を増やせば、複数行の操作も可能になります。
上のコードを実行すると下のような結果が得られます。
ユーザーフォームから1行（レコード）を操作するときには、ぜひ上のコードを参考にしてみてください。
〇おすすめのVBA参考書ランキング！
1位 | 2位 | 3位 |
|---|---|---|
| Excel VBA 脱初心者のための集中講座 | パーフェクトExcel VBA | ExcelVBA 実戦のための技術 |
| 初心者～中級者 | 中級者 | 初心者～中級者 |
| 【初心者が手に取るべき参考書】 ・「書籍＋動画」で圧倒的に理解しやすい入門書になっている。 ・丁寧で詳しい解説でボリューム感がある。 | 【より深い理解をしたい方にお勧めな参考書】 ・テーマに対して丁寧な解説・適度な深さで解説されている。 ・幅広くテーマを扱っていることから、基礎知識をあらかた網羅できる。 | 【入門書と一緒に買うべき参考書】 ・１つ１つのテーマを経験豊富なエンジニア視点で解説してくれている。 ・実践的で効果的なコードの書き方が理解できる。 |
| 【読んでみた一言】 正直、入門書はコレ一冊でいいかも。あとは中級者用の参考書に進むべし。 | 【読んでみた一言】 深く書かれているが、少々専門的に書かれていることから、読む前に数冊の入門書を読破したほうが良い。 | 【読んでみた一言】 基礎知識を持っている人が次のレベルに達するきっかけを与えてくれる参考書である。 |
スポンサーリンク
