下載本文檔
版權(quán)說(shuō)明:本文檔由用戶(hù)提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、EXCEL VBA 常用操作對(duì)象匯總(辦公室職場(chǎng)必備)導(dǎo)語(yǔ):在 VBA 中主要通過(guò)對(duì) EXCEL 表格對(duì)象的值以及屬性進(jìn)行修 改,來(lái)達(dá)到我們想要的數(shù)據(jù)處理效果,今天著重介紹一下在 日常工作中常用的幾個(gè) EXCEl 對(duì)象。熟練掌握這幾個(gè)對(duì)象后, 應(yīng)對(duì)一些復(fù)雜的、龐大的數(shù)據(jù)處理工作時(shí)綽綽有余了。常用 的對(duì)象有這么幾個(gè):Workbooks 對(duì)象,簡(jiǎn)單的說(shuō),我們打開(kāi)一個(gè) .xls 文件,就是 一個(gè) Workbooks 對(duì)象。主要又這幾個(gè)用法:Workbooks.Open, 打開(kāi)文件。相當(dāng)于“文件 - 打開(kāi)”命令。用 法 :Workbooks.Open FileName:=D:今日頭條 ?80502Ex
2、cel演示 .xlsWorkbooks.Open D: 今日頭條 ?80502Excel 演 示 .xlsWorkbooks.Add 。新建一個(gè)空白的工作簿, 相當(dāng)于“文 件- 新建”命令。Workbooks.Save。保存文件。常用在關(guān)閉 文件之前, 功能和 Ctrl+S 相同。 Workbooks.Close 。關(guān)閉文 件。用法:Workbooks(1).CIose SaveChanges:=False 關(guān)閉 工作簿,并且不保存,改為 True 則是保存并關(guān)閉。下面是 打開(kāi)文件,然后修改文件,并保存。 Sub 打開(kāi)修改文件并保 存()Path = D:今日頭條 Excel VBA 培訓(xùn)A計(jì)
3、劃.xlsWorkbooks.Open FileName:=PathSheets(1).ActivateCells(1, 1) = 今日頭條 Cells(1, 1).Font.Name = 宋體 ActiveWorkbook.SaveActiveWorkbook.CloseEnd Sub 小 結(jié),與 Workbook 類(lèi)似的兩個(gè)對(duì)象還有 ThisWorkbook 和 ActiveWorkbook ,這兩個(gè)用法基本和 Workbooks 類(lèi)似。大 家經(jīng)常使用就會(huì)明白了。 ThisWorkbook 是對(duì)程序所在工作 簿的引用;宏文件保存的那個(gè)文件。 ActiveWorkbook 是對(duì) 活動(dòng)工作簿的
4、引用; 窗口顯示的那個(gè)工作薄文件。 其他補(bǔ)充: Workbooks.Name :返回 工作簿文件的名稱(chēng) Workbooks.FullName :返回 工作簿文件的文件路徑 +名稱(chēng) Workbooks.Path :返回 工作簿文件的文件路徑 Worksheets 對(duì)象,這個(gè)更好理解,每一個(gè)文件中的 Sheet 工作表。 Worksheets 引用的方式有兩種 ,a. 根據(jù)索引號(hào) (從 1 開(kāi)始 ) b. 根據(jù)工作表名稱(chēng) Worksheets(1) 和 Worksheets(Sheet1) 是等效的 (默認(rèn)沒(méi)有改工作表名字而且沒(méi)有移動(dòng)工作表順序 的情況下 )。 Worksheets.Add: 新建
5、工作表用法: Worksheets.Add(Before, After, Count, Type)Worksheets.Add before:=Worksheets(1), Count:=2, Type:=xlWorksheet 意思是在第1 個(gè)表前加入兩個(gè)工作表, 同樣的 Before 和 After 不能同時(shí)使用。 Worksheets.Move: 移動(dòng)工作表用法: Worksheets.Move(Before, After)Worksheets( 工作表 1).Move before:=Worksheets( 工作表 2) :將“工作表 1”移動(dòng)到”工作 表 2 之前“ Workshee
6、ts.Delete 刪除工作表用法 Worksheets(工作表 ) .DeleteWorksheets ( Sheet1 ).Delete : 刪除 Sheet1 表。Application.DisplayAlerts = False 關(guān)閉提醒,刪除之前需要 加上這句,不如會(huì)彈出確認(rèn)刪除提示。工作表重命名及設(shè)置 標(biāo)簽顏色 WorkSheet(1).Name = 名稱(chēng) WorkSheet( ”工作表 1“ ).Tab.ColorIndex =colorId 小結(jié):用 Sheets 代替 WorkSheets 會(huì)有相同的效果。比如:激活工作表 Sheets(1).Activate Sheets(
7、 工作表 3).ActivateRange 對(duì)象: 選區(qū), 右鍵選擇表格中的區(qū)域就是 選區(qū)。在實(shí)際應(yīng)用中,一般都是用 Cells 對(duì)象代替。主要用 法: Range(1:1).Interior.ColorIndex = 3 選中第一行Range(A:A).Interior.ColorIndex = 4 選中第一列 Range(B2).Interior.ColorIndex = 5 選中 B2 單元格 Range(C3:E4).Interior.ColorIndex = 6 選中兩個(gè)單元格之 前的區(qū)域 Range(C5:D6, D7:F8).Interior.ColorIndex = 7 選中兩
8、選區(qū)的之間區(qū)域通過(guò)不同的參數(shù)選定不同的區(qū)域,然 后對(duì)選區(qū)內(nèi)的屬性賦值修改。比如設(shè)置背景顏色,邊框,字 體大小等等。 Range(C3:E4).Interior.ColorIndex = 6 選中兩個(gè)單元格之前的區(qū)域也可以這樣寫(xiě): Range(Cells(3,3),Cells(4,5).Interior.ColorIndex = 6 選中 兩個(gè)單元格之前的區(qū)域小結(jié):相比于 Cells 對(duì)象, Range 選 擇的區(qū)域更豐富多樣一些,但缺少靈活性。 Cells 對(duì)象,單 元格,表格中的每一個(gè)單元格。這個(gè)重點(diǎn)掌握,學(xué)會(huì)這個(gè)對(duì) 象應(yīng)用之后,才算是 VBA 入門(mén)。類(lèi)似的還有 Rows 對(duì)象, Colum
9、ns 對(duì)象 , 列。主要用法:Cells( 行號(hào) ,列號(hào) ):B3 單元格在第 3 行第二列,表示為 Cells(3,2),Rows (行號(hào)) :第二行, 表示為 Rows(2),Columns (列號(hào)):C列,右邊數(shù)第3列,表示為Columns)。示例:Cells(1, 2).Interior.ColorIndex = 3 B2 單元格 Cells(4, 1).Interior.ColorIndex = 6 A4 單元格Rows(3).Interior.ColorIndex = 4 第 3 行 Columns(3).Interior.ColorIndex = 5 第 3 列相比于 Range
10、,Cells 對(duì)象靈活更強(qiáng),主要原因是可以配合循環(huán)或判 斷語(yǔ)句調(diào)整所需要修改的單元格。比如下面的九九乘法表: 這幾個(gè)對(duì)象是在實(shí)際應(yīng)用的常用的,學(xué)會(huì) Workbook 之后, 可以對(duì)多個(gè)文件進(jìn)行數(shù)據(jù)、格式進(jìn)行修改。學(xué)會(huì) Worksheet 可以同時(shí)對(duì)多個(gè) Sheet 表進(jìn)行修改。 Range 對(duì)象、 Cells 對(duì) 象、 Rows 對(duì)象、 Columns 對(duì)象則是對(duì)要修改的位置做更精 確地定位。有時(shí)還需要結(jié)合循環(huán)語(yǔ)句和判斷語(yǔ)句來(lái)精確定位 到我們要修改的位置。做個(gè)類(lèi)比,你要給遠(yuǎn)在浙江省蘇州市 楊武縣小河鎮(zhèn)的銘銘家發(fā)快遞。快遞分揀的時(shí)候肯定分到江 蘇省(Workbook文件操作對(duì)象),然后是蘇州市(
11、Worksheet ), 然后再到鎮(zhèn)( Range 、Rows 、Columns 、Cells ),有時(shí)還需要一些判斷條件來(lái)判斷是否是銘銘家。等定位要精確位置之 后,我們才開(kāi)始修改我們要修改的數(shù)據(jù)。我們可以通過(guò)對(duì)象 的這幾個(gè)屬性進(jìn)行修改。 Font 字體屬性,字體屬性又有字 體大小、顏色、類(lèi)型、加粗等屬性 ;Interior 屬性(背景顏色 屬性) ;Borders 屬性(邊框) ;HorizontalAlignment 水平對(duì) 齊屬性 ;VerticalAlignment 垂直對(duì)齊屬性。 對(duì)象屬性屬性說(shuō)明 Cells Font 屬性字體字體大小 cells.font.size; 字體顏色 cells.font.color; 字體類(lèi)型 ; 字體加粗 cells.font.fontstyle;Cells Interior屬性背景顏色背景顏色值cells.Interior.Color 背景顏色索引 I
溫馨提示
- 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶(hù)所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶(hù)上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶(hù)上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶(hù)因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 美菜調(diào)度主管述職報(bào)告
- 初中英語(yǔ)教案反思
- 彩色的象教案反思
- 互聯(lián)網(wǎng)的組成說(shuō)課稿
- 和許多小班說(shuō)課稿
- 書(shū)店安全消防施工合同
- 數(shù)碼俱樂(lè)部會(huì)員停車(chē)場(chǎng)地租賃合同
- 珠寶公司配電房安裝協(xié)議
- 精密儀器顧問(wèn)合同
- 交通樞紐供暖設(shè)備安裝合同
- 良性陣發(fā)性眩暈的護(hù)理課件
- 五年級(jí)下冊(cè)綜合實(shí)踐活動(dòng)教案
- 渣土消納專(zhuān)項(xiàng)方案樣本
- 少數(shù)民族朝鮮族民俗文化科普介紹
- 機(jī)構(gòu)改革工作方案
- 2023年-2024年《人民幣防偽及假貨幣》知識(shí)考試題庫(kù)及答案
- 辦公大樓物業(yè)服務(wù)投標(biāo)方案(技術(shù)方案)
- 《季風(fēng)環(huán)流》課件
- 工程進(jìn)度款申請(qǐng)表(完整)
- 學(xué)習(xí)型寢室申請(qǐng)表
- 液壓缸緩沖間隙參數(shù)計(jì)算
評(píng)論
0/150
提交評(píng)論