當打開(kāi)了多個(gè)工作簿時(shí),每個(gè)工作簿都要耗費一定的內存,從而導致電腦的運行速度降低。
因此,用戶(hù)應及時(shí)關(guān)閉一些不需要的工作簿。 在Excel 2010中,用戶(hù)可以通過(guò)以下幾種方法關(guān)閉工作簿。
按鈕1:?jiǎn)螕魳祟}欄右上角的“關(guān)閉”按鈕。 按鈕2:雙擊Excel按鈕。
命令:?jiǎn)螕簟拔募辈藛危趶棾龅拿姘逯袉螕簟瓣P(guān)閉”命令。 快捷鍵1:按【Alt+F4】組合鍵。
快捷鍵2:按【Ctrl+F4】組合鍵。 快捷鍵3:按【Ctrl+W】組合鍵。
快捷鍵4:依次按鍵盤(pán)上的【Alt】、【F】、【C】鍵。 快捷鍵5:依次按鍵盤(pán)上的【Alt】、【F】、【X】鍵。
當打開(kāi)了多個(gè)工作簿時(shí),每個(gè)工作簿都要耗費一定的內存,從而導致電腦的運行速度降低。
因此,用戶(hù)應及時(shí)關(guān)閉一些不需要的工作簿。 在Excel2010中,用戶(hù)可以通過(guò)以下幾種方法關(guān)閉工作簿。
按鈕1:?jiǎn)螕魳祟}欄右上角的關(guān)閉按鈕。 按鈕2:雙擊Excel按鈕。
命令:?jiǎn)螕粑募藛危趶棾龅拿姘逯袉螕絷P(guān)閉命令。 快捷鍵1:按【Alt+F4】組合鍵。
快捷鍵2:按【Ctrl+F4】組合鍵。 快捷鍵3:按【Ctrl+W】組合鍵。
快捷鍵4:依次按鍵盤(pán)上的【Alt】、【F】、【C】鍵。 快捷鍵5:依次按鍵盤(pán)上的【Alt】、【F】、【X】鍵。
這個(gè)只能用VBA來(lái)做。假定所有的EXCEL工作簿都是用一個(gè)EXCEL應用打開(kāi)的,可以用遍歷工作簿方式,判斷文件名中包含特定文字(群組特征),符合條件就關(guān)閉該工作簿。
代碼如下:
Sub 關(guān)閉同類(lèi)文件()
Const MYSTRING = "Book"
Dim MYBOOK As Workbook
For Each MYBOOK In Workbooks
aa = Mid(MYBOOK.Name, 1, 4)
jg = InStr(MYSTRING, aa)
If jg = 1 Then
MYBOOK.Close
End If
Next
End Sub
例如運行前有4個(gè)打開(kāi)的文件。如圖:
運行宏后結果將開(kāi)始于“Book”的全部關(guān)閉。結果如圖:
用excel VBA 編寫(xiě)打開(kāi)和關(guān)閉多個(gè)工作薄,相應的代碼如下:
1、打開(kāi)指定工作簿
dim wb as workbook
set wb = " 文件路徑及文件名"
workbooks.open filename:= wb
2、關(guān)閉所有工作簿并保存
workbooks.close
3、打開(kāi)多個(gè)工作薄的程序代碼:
Sub OpenWorkbooks()
On Error Resume Next
Dim SelectFiles As Variant
'顯示打開(kāi)文件對話(huà)框
SelectFiles = Application.GetOpenFilename("Excel 文件 (*.xl*)," & "*.xl*", , "打開(kāi)", , True)
'未選擇
If TypeName(SelectFiles) = "Boolean" Then
Exit Sub
End If
'打開(kāi)所選工作簿
For i = 1 To UBound(SelectFiles)
Workbooks.Open SelectFiles(i)
Next i
End Sub
Excel的啟動(dòng)方法:
1、利用“開(kāi)始”菜單打開(kāi)。
2、鼠標雙擊Excel 2010應用程序快捷方式圖標。
Excel的退出方法:
1、單擊“文件”-“退出”命令。
2、單擊“標題欄”最右端的“關(guān)閉”按鈕。
3、雙擊“標題欄”最左端的窗口控制按鈕圖標。
4、按Alt+F4快捷鍵。
Microsoft Excel是電子試算表程序(進(jìn)行數字和預算運算的軟件程序),與Microsoft Word一樣,它在市場(chǎng)擁有統治份額。它最初對占優(yōu)勢的Lotus 1-2-3是個(gè)競爭者,但最后它賣(mài)得比它多、快,于是它成為了實(shí)際標準。它適宜Windows和Macintosh平臺。
聲明:本網(wǎng)站尊重并保護知識產(chǎn)權,根據《信息網(wǎng)絡(luò )傳播權保護條例》,如果我們轉載的作品侵犯了您的權利,請在一個(gè)月內通知我們,我們會(huì )及時(shí)刪除。
蜀ICP備2020033479號-4 Copyright ? 2016 學(xué)習?shū)B(niǎo). 頁(yè)面生成時(shí)間:3.619秒