ExcelマクロVBA練習問題解答
練習問題14(行の挿入・削除の練習)回答

Excelマクロ練習問題集、エクセルVBAの学習教材
最終更新日:2015-10-22

練習問題14(行の挿入・削除の練習)回答

練習問題14の回答ページです、



問題

・区分が、D の行を削除して下さい。
・区分が、Iの行の前に新規行を挿入して下さい。

 A  B
区分
  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)回答

新着記事NEW ・・・新着記事一覧を見る

VBA+SeleniumBasicで検索順位チェッカー作成|VBA技術解説(5月18日)
テーブル操作のVBAコード(ListObject)|VBA入門(5月12日)
テーブル操作の概要(ListObject)|VBA入門(5月12日)
VBAのスクレイピングを簡単楽にしてくれるSelenium|VBA技術解説(5月6日)
Excelワークシート関数一覧(2010以降)|VBAリファレンス(4月22日)
クラスとCallByNameとポリモーフィズム(多態性)|VBA技術解説(4月6日)
VBAでのタイマー処理(SetTimer,OnTime)|VBA技術解説(4月3日)
クラスとイベントとマルチプロセス並列処理|VBA技術解説(4月2日)
エクセルの日付と時刻のまとめ|エクセル関数超技(3月6日)
Excelシートの複雑な計算式を解析するVBA|VBAサンプル集(2月18日)

アクセスランキング ・・・ ランキング一覧を見る

1.ひらがな⇔カタカナの変換|エクセル基本操作
2.最終行の取得(End,Rows.Count)|VBA入門
3.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
4.Range以外の指定方法(Cells,Rows,Columns)|VBA入門
5.RangeとCellsの使い方|ExcelマクロVBA入門
6.変数とデータ型(Dim)|ExcelマクロVBA入門
7.マクロって何?VBAって何?|ExcelマクロVBA入門
8.繰り返し処理(For Next)|ExcelマクロVBA入門
9.とにかく書いて見よう(Sub,End Sub)|VBA入門
10.セルに文字を入れるとは(Range,Value)|VBA入門



  • >
  • >
  • >
  • 練習問題14(行の挿入・削除の練習)回答

    このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。


    記述には細心の注意をしたつもりですが、
    間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
    なお、掲載のVBAコードは自己責任で使ってください。万一データ破損等の損害が発生しても責任は負いません。






    このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。

    本文下部へ