[發問] 能否只關閉想關掉的EXCEL檔就好？

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

2^#

發表於 2011-5-17 19:09 | 只看該作者

回復 1# syuan
ActiveWorkbook.Close False                '關掉作用中的活頁簿
Workbooks("某某某xls").Close True       '關掉指定的活頁簿
不存檔 Close False ,  存檔 Close true

版主 Rank: 7 Rank: 7 Rank: 7

kimbal

帖子: 472
主題: 5
精華: 0
積分: 485
點名: 0
作業系統: Windows
軟體版本: MS Office
閱讀權限: 100
性別: 男
來自: 香港
註冊時間: 2010-7-4
最後登錄: 2014-12-28

論壇貢獻勳章

3^#

發表於 2011-5-17 22:23 | 只看該作者

補一個,關掉當前運VBA的EXCEL
Thisworkbook.close false

懂得發問,答案就會在其中

今日の一秒は明日にない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

帖子: 50
主題: 12
精華: 0
積分: 143
點名: 0
作業系統: win xp
軟體版本: office 2003
閱讀權限: 20
性別: 男
來自: EARTH
註冊時間: 2010-5-24
最後登錄: 2015-5-12

4^#

發表於 2011-5-18 19:22 | 只看該作者

感謝GBKEE與kimbal二位先進位的回覆

小弟照二位所指示的語法都試了一遍！發現都可行～～

不過Workbooks("某某某xls").Close True這段語法，關閉了活頁簿後，並不會將excel給關閉（就是留一個空白的excel在桌面。。。。。）～～很特別！

不過小弟在試驗Thisworkbook.close false與ActiveWorkbook.Close False時，發現活頁簿與該檔之excel是關起來了，但vbe編輯器尚留在桌面上

所以小弟找到這段語法Application.VBE.CommandBars.FindControl(ID:=752).Execute

只是執行後，vbe編輯器仍留在桌面上..........!

(小弟目前仍在試別的語法!)

錢是很寂莫的，所以會想辦法聚在一起！

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

5^#

發表於 2011-5-18 19:57 | 只看該作者

回復 4# syuan
vbe編輯器仍留在桌面上..........!
關閉VBE視窗 Application.VBE.MainWindow.Visible = False

ActiveWorkbook.Close False
Workbooks("某某某xls").Close True
thisworkbook.Close True
這些都是活頁簿,所以Close(關閉)的是活頁簿,並不會關閉Excel這應用程式(軟體).
要關閉Excel這應用程式使用 -> Application.Quit
Excel vba 的 Application 就是->Excel

Sub Ex()
Dim A As New Application
A.Visible = True
End Sub

複製代碼

帖子: 50
主題: 12
精華: 0
積分: 143
點名: 0
作業系統: win xp
軟體版本: office 2003
閱讀權限: 20
性別: 男
來自: EARTH
註冊時間: 2010-5-24
最後登錄: 2015-5-12

6^#

發表於 2011-5-22 15:28 | 只看該作者

回復 syuan
vbe編輯器仍留在桌面上..........!
關閉VBE視窗 Application.VBE.MainWindow.Visible = Fal ...
GBKEE 發表於 2011-5-18 19:57

感謝GBKEE大回覆

　　原來那個VBE無法單獨關掉！本來小弟想的是使用者如果開了別的EXCEL檔後（A檔），又開了有寫關掉活頁簿的程式後（B檔），結果使用者將有寫關閉活頁簿的EXCEL檔後(B檔）
會因A檔未關閉，而發現桌面多了個空白的VBE編輯器，可能就會覺得很奇怪！

這樣就有點傷腦筋了。。。。。真的沒辦法關閉VBE嗎？
小弟還是想試試看～～

錢是很寂莫的，所以會想辦法聚在一起！

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

7^#

發表於 2011-5-22 16:49 | 只看該作者

回復 6# syuan
這樣就有點傷腦筋了。。。。。真的沒辦法關閉VBE嗎？
Application.VBE.MainWindow.Visible = False 不就是關閉VBE

帖子: 50
主題: 12
精華: 0
積分: 143
點名: 0
作業系統: win xp
軟體版本: office 2003
閱讀權限: 20
性別: 男
來自: EARTH
註冊時間: 2010-5-24
最後登錄: 2015-5-12

8^#

發表於 2011-5-24 15:51 | 只看該作者

感謝GBEKK大的指導

小弟眼睛＂觸目＂一時沒看到，抱歉～～

小弟後來想到......或許可以不用去管那個VBE！

因為一般使用者會去開VBE起來的機率並不大，所以可以不用去管它

萬一不小心被開起來而又有同事在問，那我直接就跟對方說：不用理它，直接關掉就好～～

錢是很寂莫的，所以會想辦法聚在一起！

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

9^#

發表於 2011-5-24 16:07 | 只看該作者

回復 8# syuan
在程式的尾端加上 Application.VBE.MainWindow.Visible = False
不就關閉了

帖子: 50
主題: 12
精華: 0
積分: 143
點名: 0
作業系統: win xp
軟體版本: office 2003
閱讀權限: 20
性別: 男
來自: EARTH
註冊時間: 2010-5-24
最後登錄: 2015-5-12

10^#

發表於 2011-5-26 11:04 | 只看該作者

本帖最後由 syuan 於 2011-5-26 11:05 編輯

回復 syuan
在程式的尾端加上 Application.VBE.MainWindow.Visible = False
不就關閉了
GBKEE 發表於 2011-5-24 16:07

感謝GBKEE先進的指導

小弟照做之後，出現一個對話框！內容是＂執行階段錯誤１００４，對於visual basic專案的程式化存取未信任＂

小弟上網查了一下，發現要去安全性裡的選項；有個叫＂信任存取Visual Basic專案＂的選項打勾，打勺後就不會出現上述的對話框了！

只是那個信任存取的選項打勾後，excel是不是對於所有vba程式都是變成無防備了呢？這樣好像也挺危險的。。。。。。。

錢是很寂莫的，所以會想辦法聚在一起！