Excelのレコードクリア (ID:115620)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 > この ISAM では、リンク テーブル内のデータを削除することはできません。 > (Error 3617) このエラーメッセージ出ます。 > マイクロソフトのサポートページで対応が載ってます。 というのは、 > 注 : レコードを削除するには、各フィールドの内容を個別に削除します。 のことですか？ Dim DB As DAO.Database Dim RS As DAO.Recordset Dim xlBook As Excel.Workbook Dim xlSheet As Excel.Worksheet n = 6 For i = 1 To RS.RecordCount xlSheet.Cells(n, 1).Delete xlSheet.Cells(n, 2).Delete xlSheet.Cells(n, 3).Delete xlSheet.Cells(n, 4).Delete xlSheet.Cells(n, 5).Delete xlSheet.Cells(n, 6).Delete xlSheet.Cells(n, 7).Delete xlSheet.Cells(n, 8).Delete xlSheet.Cells(n, 9).Delete xlSheet.Cells(n, 10).Delete xlSheet.Cells(n, 11).Delete n = n + 1 Next i とやると、最後のレコードしか消えません。 For文が間違っていると思うのですが ヒント下さい。お願い致します。