Excelで行の挿入を繰り返し行う

EXCELの最大行は65536行です。１万件の行に８行ずつ挿入すると９万件となり最大行数をオーバーするので希望通りにはできません。 挿入する行がもっと少なくても良いなら以下のマクロでも可能です。 マクロはALT＋F11でVBE画面を開き、「VBAProjectエクスプローラのシート名右クリック」→「挿入」→「標準モジュール」で表示される画面にペーストして下さい。実行はシート画面に戻って、ALT＋F8を押してマクロ一覧からマクロ名を選択して実行します。 挿入する行数はマクロに書いていますから、変更してください。またデータのあるなしはＡ列で判定しています。 Sub Macro4() Dim idx As Long Const insRows As Integer = 5 'ここに挿入する行数を書く Application.ScreenUpdating = False For idx = Ran