如何更改EXCEL工作表的名稱??? |
|
答題得分者是：cmf
|
|
rich777
一般會員   發表：25 回覆：25 積分：10 註冊：2002-04-22 發送簡訊給我 |
請教各位先進高手們:
現會將數個資料表同時轉出至EXCEL...
但EXCEL的工作表命名是由SHELL1~SHELL1X...
請問可否由程式控製更改其工作表名稱呢？？？
我的簡略程式碼：
var
MsExcel, MsExcelWorkBook, MsExcelWorkSheet: Variant;
.
.
.
. try
MsExcel := CreateOleObject('Excel.Application');
MsExcelWorkBook := MsExcel.WorkBooks.Add;
MsExcelWorkSheet := MsExcel.WorkSheets['Sheet3'].Name='常正數量';＜＝＝＝執行上沒發生任何錯誤，但工作表名稱並沒改變． 煩請各位指導
謝謝！！！
|
|
cmf
尊榮會員  發表：84 回覆：918 積分：1032 註冊：2002-06-26 發送簡訊給我 |
引言: 請教各位先進高手們: 現會將數個資料表同時轉出至EXCEL... 但EXCEL的工作表命名是由SHELL1~SHELL1X... 請問可否由程式控製更改其工作表名稱呢？？？ 我的簡略程式碼： var MsExcel, MsExcelWorkBook, MsExcelWorkSheet: Variant; . . . . try MsExcel := CreateOleObject('Excel.Application'); MsExcelWorkBook := MsExcel.WorkBooks.Add; MsExcelWorkSheet := MsExcel.WorkSheets['Sheet3'].Name='常正數量';＜＝＝＝執行上沒發生任何錯誤，但工作表名稱並沒改變． 煩請各位指導 謝謝！！！MsExcel.WorkSheets['Sheet1'].Select; MsExcel.WorkSheets['Sheet1'].Name = "1234"
------
︿︿ |
|
rich777
一般會員 發表：25 回覆：25 積分：10 註冊：2002-04-22 發送簡訊給我 |
發表時間：2003-01-23 10:39:07
IP:61.59.xxx.xxx 未訂閱
系統時間：2024-06-30 2:56:47
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |