EXCELで帳票を作成するプログラムを作成中です。
以下のコードにより、行のコピーを行い、行挿入を行う処理があります。

単発で起動すると正常終了するのですが、連続して処理を行うと「Selection.Copy」のところで
エラーになります。
　実行時エラー'91':
　オブジェクト変数またはwithブロック変数が設定されていません。

原因と対処方法を教えていただけないでしょうか？
宜しくお願いします。

Private Sub excel_set()
    'EXCELの決定
    Set xl = CreateObject("Excel.Application")
    wb_path = "TEST.xls"
    Set wb = xl.Workbooks.Open(wb_path)
    Set ws = wb.Worksheets(ws_path)
    
'年式の数だけ行を操作する
    For idx1 = 1 To wrk_nen - 2 Step 1
        ws.Rows("21:21").Select
        Selection.Copy
        Selection.Insert Shift:=xlDown
    Next
    For idx1 = 1 To wrk_nen - 2 Step 1
        ws.Rows("7:7").Select
        Selection.Copy
        Selection.Insert Shift:=xlDown
    Next
End Sub

>         Selection.Copy
>         Selection.Insert Shift:=xlDown

ここのExcel & Word の最初の２項目をよくお読み下さい。