2011-08-15 35 views
0

私は以下のコードを使用してMS Access 2003でExcelファイルを開きました。 2行目またはA2:K2行を削除します。MS Access VBA Excelで行を削除する方法

  Dim xlApp As Excel.Application 
      Set xlApp = CreateObject("Excel.Application") 

      xlApp.Visible = True 

      xlApp.Workbooks.Open "QuotebyItem.xls", True, False 

答えて

8
Dim wb as Excel.Workbook 
Dim xlApp As Excel.Application    

Set xlApp = CreateObject("Excel.Application")    
xlApp.Visible = True 

Set wb = xlApp.Workbooks.Open("QuotebyItem.xls", True, False) 
wb.Sheets(1).Rows(2).Delete 

...あなたのファイルと仮定すると一枚だけを持っていますが、複数のこと、あなたはそれらの1つのアドレスだけが必要な場合があります場合:

wb.Sheets("Sheet2").Rows(2).Delete 
+0

もVBAからその可能削除行です一部のフィールドが保護されている場合 – Sefran2

+0

どうして見てみませんか?私はそれが保護のレベルに依存すると思うので、一般的にはいまたはいいえと言うのは難しいです。 –

関連する問題