Range對象常用的方法，屬性均介紹完成，余下不常用的大家用時(shí)可以F1，錄制宏來(lái)學(xué)習。
今天我們開(kāi)始了解Application對象。
在Excel VBA中，這個(gè)對象代表Microsoft Excel 應用程序自身。
ActiveCell 屬性
返回一個(gè) Range 對象，它代表活動(dòng)窗口（最上方的窗口）或指定窗口中的活動(dòng)單元格。
如果窗口中沒(méi)有顯示工作表，此屬性無(wú)效。
由于如果活動(dòng)表不是工作表則 ActiveCell 屬性無(wú)效，
說(shuō)明：
如果不指定對象識別符，此屬性返回活動(dòng)窗口中的活動(dòng)單元格。
請仔細區分活動(dòng)單元格和選定區域。
活動(dòng)單元格為選定區域內部的一個(gè)單元格。
而選定區域可以包含多個(gè)單元格，但只有一個(gè)單元格為活動(dòng)單元格。
下列表達式都是返回活動(dòng)單元格，并且都是等效的。
ActiveCell
Application.ActiveCell
ActiveWindow.ActiveCell
Application.ActiveWindow.ActiveCell
示例：
If ActiveCell Is Nothing Then Exit Sub
'先判斷屬性是否有效
MsgBox ActiveCell.Address & vbCr &ActiveCell.Value
'消息框顯示活動(dòng)單元格的地址和值
ActiveChart 屬性
返回一個(gè) Chart 對象，它代表活動(dòng)圖表（嵌入式圖表或圖表工作表）。
嵌入式圖表在被選中或激活時(shí)被認為是活動(dòng)的。
當沒(méi)有圖表處于活動(dòng)狀態(tài)時(shí)，此屬性返回 Nothing。
示例：
If ActiveChart Is Nothing Then Exit Sub
'判斷屬性是否有效
ActiveChart.HasLegend = NotActiveChart.HasLegend
'切換圖例的顯示與隱藏
ActiveSheet 屬性
返回一個(gè)對象，它代表活動(dòng)工作簿中或指定的窗口或工作簿中的活動(dòng)工作表（最上面的工作表）。
如果沒(méi)有活動(dòng)的工作表，則返回 Nothing。
說(shuō)明：
如果不指定對象識別符，則此屬性返回活動(dòng)工作簿中的活動(dòng)工作表。
如果某個(gè)工作簿出現在若干個(gè)窗口中，那么該工作簿的 ActiveSheet 屬性在不同窗口中可能不同。
示例：
If ActiveSheet Is Nothing Then Exit Sub
MsgBox ActiveSheet.Name
ActiveWindow 屬性
返回一個(gè) Window 對象，該對象表示活動(dòng)窗口（頂部窗口）。
如果沒(méi)有打開(kāi)的窗口，則返回 Nothing。
該屬性只讀。
示例：
If ActiveWindow Is Nothing Then Exit Sub
MsgBox ActiveWindow.Caption
'顯示窗口標題
ActiveWorkbook 屬性
返回一個(gè) Workbook 對象，該對象表示活動(dòng)窗口（頂部窗口）中的工作簿。
如果沒(méi)有打開(kāi)的窗口，或者“信息”窗口或“剪貼板”窗口為活動(dòng)窗口，則返回 Nothing。
示例：
If ActiveWorkbook Is Nothing Then Exit Sub
If Len(ActiveWorkbook.Path) = 0 Then
'如果工作簿未保存，則提示
MsgBox '工作簿尚未保存'
Else
'保存
ActiveWorkbook.Save
End If
Cells 屬性
返回一個(gè) Range 對象，它代表活動(dòng)工作表中的所有列。
如果活動(dòng)文檔不是工作表，則此屬性無(wú)效
Columns 屬性
返回一個(gè) Range 對象，它代表活動(dòng)工作表中的所有列。
如果活動(dòng)文檔不是工作表，則 Columns 屬性失效。
說(shuō)明：
在不使用對象識別符的情況下使用此屬性等效于使用 ActiveSheet.Columns。
Rows 屬性
返回一個(gè) Range 對象，它代表活動(dòng)工作表中的所有行。
如果活動(dòng)文檔不是工作表，則 Rows 屬性失效。
Charts 屬性
返回一個(gè)代表活動(dòng)工作簿中所有圖表工作表的集合。
示例:
MsgBox Charts.Count
Selection 屬性
為 Application 對象返回在活動(dòng)窗口中選定的對象。
說(shuō)明：
返回的對象類(lèi)型取決于當前所選內容（例如，如果選擇了單元格，此屬性將返回 Range 對象）。
如果未選擇任何內容，Selection 屬性將返回 Nothing。
在不使用對象識別符的情況下，使用此屬性等效于使用 Application.Selection。
Sheets 屬性
返回一個(gè) Sheets 集合，它代表活動(dòng)工作簿中所有的工作表。
說(shuō)明：
在不使用對象識別符的情況下使用此屬性等效于使用 ActiveWorkbook.Sheets。
Workbooks 屬性
返回一個(gè) Workbooks 集合，該集合表示所有打開(kāi)的工作簿。
說(shuō)明：
在不使用對象識別符的情況下，使用該屬性相當于使用
Application.Workbooks
Worksheets 屬性
對于 Application 對象，返回一個(gè) Sheets 集合，它代表活動(dòng)工作簿中的所有工作表。
對于 Workbook 對象，返回一個(gè) Sheets 集合，它代表指定工作簿中的所有工作表。
說(shuō)明：
在不使用對象識別符的情況下，使用此屬性將返回活動(dòng)工作簿中所有的工作表。
此屬性不返回宏表；使用 Excel4MacroSheets 屬性或 Excel4IntlMacroSheets 屬性可返回這些表
聯(lián)系客服
