VFP 愛用者社區 首頁 VFP 愛用者社區
本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
 
 常見問題常見問題   搜尋搜尋   會員列表會員列表   會員群組會員群組   會員註冊會員註冊 
 個人資料個人資料   登入檢查您的私人訊息登入檢查您的私人訊息   登入登入

請教如何用程式關掉作用中EXCEL?

 
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區
上一篇主題 :: 下一篇主題  
發表人 內容
chenray



註冊時間: 2003-04-13
文章: 2


第 1 樓

發表發表於: 星期四 四月 24, 2003 1:34 am    文章主題: 請教如何用程式關掉作用中EXCEL? 引言回覆

L_EXCEL = CreateObject('Excel.Application')
L_EXCEL.WorkBooks.Open(AAA,0)
************************************************
LOCAL II,JJ,KK,LL,MM,NN,RR &&RR 計行數
RR = 0
NN = .F.
L_EXCEL.Sheets(XCOMBO3).SELECT
LL = ASC(UPPER(C01.EXCELST)) - 64
MM = ASC(UPPER(C01.EXCELEND)) - 64
THIS.OLECONTROL1.VALUE = 0
FOR II = 1 TO 10000
THIS.OLECONTROL1.VALUE = THIS.OLECONTROL1.VALUE + 1
*
IF THIS.OLECONTROL1.VALUE = 30
THIS.OLECONTROL1.VALUE = 0
ENDIF
*
APPEND BLANK
FOR JJ = LL TO MM
KK = L_EXCEL.CELLS(II,JJ).VALUE
REPL (CHR(JJ+64)) WITH KK
ENDFOR
IF RR > C01.EXCELLINE
EXIT
ENDIF
ENDFOR
THIS.OLECONTROL1.VALUE = 30

***********************************

L_EXCEL.WorkBooks.CLOSE
L_EXCEL.QUIT
RELEASE L_EXCEL




上述 L_EXCEL.QUIT ,RELEASE L_EXCEL 好像都無法關掉 EXCEL

也就是說 ATL + CTL + DEL 出現關閉程式出現有 EXCEL
我想要用 程式把它關掉 ,各位大哥如果知道煩請告之 ,
已經困擾好幾天了,謝謝
回頂端
檢視會員個人資料 發送私人訊息
garfield
Site Admin


註冊時間: 2003-01-30
文章: 2157


第 2 樓

發表發表於: 星期四 四月 24, 2003 11:37 pm    文章主題: 引言回覆

.quit 再 release 是會將 excel 關掉才對, 或許你是在CLOSE時不成功, 可以 .visible=.t. 來看看過程, 試一試用 .close(.F.) &&--不會問是否存檔
_________________
利用>>搜尋<<的功能會比問的還要快得到答案.
回頂端
檢視會員個人資料 發送私人訊息 發送電子郵件
chenray



註冊時間: 2003-04-13
文章: 2


第 3 樓

發表發表於: 星期五 四月 25, 2003 12:05 am    文章主題: 引言回覆

謝謝您的解惑,已經擺平了,可能是 KK = L_EXCEL.CELLS(II,JJ).VALUE
在作怪,win2000 沒問題,win98 會當掉,或出現excel 伺服器停止回應
回頂端
檢視會員個人資料 發送私人訊息
從之前的文章開始顯示:   
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區 所有的時間均為 台北時間 (GMT + 8 小時)
1頁(共1頁)

 
前往:  
無法 在這個版面發表文章
無法 在這個版面回覆文章
無法 在這個版面編輯文章
無法 在這個版面刪除文章
無法 在這個版面進行投票
無法 在這個版面附加檔案
無法 在這個版面下載檔案


Powered by phpBB © 2001, 2005 phpBB Group
正體中文語系由 phpbb-tw 維護製作