各位前輩好 我已經在EXCEL設計好數個巨集了... 但是由於每次要做資料處理時... 都必須一個檔案一個檔案開檔，頗不方便... 因此小弟想應用DELPHI的FILELISTBOX 使得能批次開檔，轉檔，處理完整個資料夾目錄的檔案 但是問題是，該怎麼將DELPHI與EXCEL作整合比較好呢？ 想請教一下大家。 另外有個題外話，想問一下EXCEL VBA裡面... 是否有類似RECORED.COUNT可以得知資料筆數的資訊 請大家多多指教，謝謝！

類似這樣吧..你可從filelistbox取得filename,路徑,再用程式開啟它,並執行 它的macro.然後再存檔...大概這個流程    

  XLApplication := CreateOleObject('Excel.Application');
  XLApplication.Visible := True;
  {開檔}
  XLApplication.Workbooks.open(extractfilepath(application.ExeName)   'test.xls');
  {跑macro}
  XLApplication.run('test2');
  XLApplication.Workbooks[1].save;
  XLApplication.quit ;  

------
星期一,二...無窮迴圈＠＠

那能否請教，如何取得一個工作表的資料筆數呢？

引言: 那能否請教，如何取得一個工作表的資料筆數呢？

參考這段vba...假如你在column1從[A1:A6]都有填資料,則下段程式會傳回6 注意:資料不能斷掉..例如A4沒資料..那計算筆數時只會計算到A3而已 Dim rng As Range Set rng = Range("A1").CurrentRegion MsgBox rng.Rows.Count