練習問題14（行の挿入・削除の練習）回答
練習問題14の回答ページです、
問題
・区分が、D の行を削除して下さい。
・区分が、Iの行の前に新規行を挿入して下さい。
| 区分 | № |
| 1 | |
| D | 2 |
| I | 3 |
| 4 | |
| 5 | |
| D | 6 |
| D | 7 |
| 8 | |
| I | 9 |
| 10 | |
| D | 11 |
| I | 12 |
| 13 | |
| 14 | |
| I | 15 |
| I | 16 |
| 17 | |
| D | 18 |
| 19 | |
| 20 |
※上記表の全体選択し、コピー(Ctrl+C)の後、エクセルのシートのA1セルに貼り付け(Ctrl+V)してください。
では、お考えください。
すぐに回答を見ずに、必ず自力で書けるとこまででも良いので書きましょう。
・
・・
・・・
・・・・
・・・・・
当サイトのコンテンツ
ExcelマクロVBA入門
マクロの記録で覚えるVBA
ここで、じっくり勉強して下さい。
・
・・
・・・
・・・・
・・・・・
では、回答です。
| Sub 練習問題14() Dim i As Long For i = Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1 Select Case Cells(i, 1) Case "I" Rows(i).Insert Case "D" Rows(i).Delete End Select Next End Sub |
削除・挿入は後ろから！
これは鉄則として覚えて下さい
以下も参考にして下さい。
ExcelマクロVBA入門.第29回.セル・行・列の削除・挿入（Delete,Insert）
同じテーマ「マクロVBA練習問題解答」の記事
練習問題11（色々なコピーの練習）回答
練習問題12（日付関数の練習）回答
練習問題13（文字列関数の練習）回答
練習問題14（行の挿入・削除の練習）回答
練習問題15（Withとオブジェクト変数の練習）回答
練習問題16（WorksheetFunctionの練習）回答
練習問題17（ブック・シートの操作の練習）回答
練習問題18（Dir関数の練習）回答
練習問題19（総合練習1）回答
練習問題20（総合練習2）回答
練習問題21（総合練習3）回答
新着記事 ・・・新着記事一覧を見る
Excelシートの複雑な計算式を解析するVBA｜VBAサンプル集（2月18日）
VBAクラスの作り方：独自Rangeっぽいものを作ってみた｜VBA技術解説（2月16日）
VBAクラスの作り方：列名のプロパティを自動作成する｜VBA技術解説（2月14日）
VBAクラスの作り方：列名の入力支援と列移動対応｜VBA技術解説（2月11日）
クラスを使って他ブックのイベントを補足する｜VBA技術解説（2月6日）
Excelアドインの作成と登録について｜VBA技術解説（2月3日）
参照設定、CreateObject、オブジェクト式の一覧｜VBA技術解説（1月20日）
VBAでファイルを規定のアプリで開く方法｜VBA技術解説（1月20日）
ドキュメントプロパティ（BuiltinDocumentProperties,CustomDocumentProperties）｜VBA技術解説（1月19日）
他ブックへのリンクエラーを探し解除｜VBAサンプル集（1月15日）
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得（End,Rows.Count）｜VBA入門
2.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
3.変数とデータ型（Dim）｜ExcelマクロVBA入門
4.Range以外の指定方法（Cells,Rows,Columns）｜VBA入門
5.RangeとCellsの使い方｜ExcelマクロVBA入門
6.マクロって何？VBAって何？｜ExcelマクロVBA入門
7.繰り返し処理（For Next)｜ExcelマクロVBA入門
8.とにかく書いて見よう（Sub,End Sub）｜VBA入門
9.定数と型宣言文字（Const）｜ExcelマクロVBA入門
10.ひらがな⇔カタカナの変換｜エクセル基本操作
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
なお、掲載のVBAコードは自己責任で使ってください。万一データ破損等の損害が発生しても責任は負いません。
