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