資源描述:
《excel-vba基礎(chǔ)入門》由會員上傳分享,免費(fèi)在線閱讀,更多相關(guān)內(nèi)容在教育資源-天天文庫。
1、EXCELVBA基礎(chǔ)入門1.什么是宏?它在那里?2.宏的安全性問題5.VBA編輯器7.程序結(jié)構(gòu)8.VBA語法4.VBA語言介紹3.錄制宏9.編寫程序6.對象、屬性、方法和事件1.什么是宏?它在那里?宏是一個(gè)指令集,用來告訴EXCEL完成用戶指定的動作。宏類似于計(jì)算機(jī)程序,但是它是完全運(yùn)行于EXCEL之中的,我們可以使用宏來完成枯燥的、頻繁的重復(fù)性工作。宏完成動作的速度比用戶自己做要快得多,能大大提高效率。office中都有宏的身影。增加鼠標(biāo)壽命2.宏的安全性問題宏是依附于office文件的程序,可能有惡意的宏程序,即宏病毒。所以一般默認(rèn)是禁止宏的,再加上編程問題,一般不敢用“宏”,對于
2、提高辦公效率只能依賴于EXCEL技巧。3.錄制宏運(yùn)行宏錄制宏安全性VBA編輯器4.VBA語言介紹翻譯:直觀基本應(yīng)用本質(zhì):與VB相似,一種應(yīng)用程序開發(fā)工具,是可視化、面向?qū)ο蟆⑹录?qū)動方式的結(jié)構(gòu)化程序設(shè)計(jì)語言由應(yīng)用程序控制也可以增強(qiáng)應(yīng)用程序的功能由微軟公司開發(fā)是Office套件的一部分極大的提高辦公效率VBA(VisualBasicforApplications)5.VBA編輯器工程資源管理器代碼窗口Application當(dāng)前應(yīng)用程序?qū)ο骔orkbook工作簿對象Worksheet工作表對象Range由一個(gè)或多個(gè)單元格構(gòu)成的區(qū)域6.對象、屬性、方法和事件對象代表應(yīng)用程序中的元素,比如,工
3、作表、單元格、圖表、窗體。在VisualBasic的代碼中,可在使用對象的任一方法或改變它的屬性之一的值之前,必須去識別對象。選擇一個(gè)單元格(展示對象的層次結(jié)構(gòu))應(yīng)用程序.工作簿.工作表.區(qū)域.選擇Application.Workbooks(“jbk.xls”).Worksheets(“j1”).Range(“A1”).Select在當(dāng)前工作簿中選擇一個(gè)單元格Range(“A1”).SelectWorksheetFunction屬性(可以從代碼中訪問任何內(nèi)置的工作表函數(shù))例子(檢查規(guī)定的單元格區(qū)域內(nèi)是否還有空的)IfApplication.WorksheetFunction.Count
4、Blank(Range(“a1:c10”))>0ThenMsgbox“您必須在所有的單元格中添加數(shù)據(jù)”EndIfActiveWorkbook屬性:返回指向活動工作簿的對象ActiveSheet屬性:返回指向活動工作表的對象Selection屬性:返回一個(gè)對當(dāng)前選定單元格區(qū)域的引用ThisWorkbook屬性:在任何時(shí)候返回對包含代碼的工作簿的引用6.1Application對象打開已有的工作簿Application.Workbooks.Open“c:abc.xls”添加新的工作簿W(wǎng)orkbooks.Add引用工作簿DimwkbasWorkbookSetwkb=Workbooks.Ad
5、d保存工作簿DimwkbasWorkbookForEachwkbinApplication.Workbookswkb.Save(.SaveAs“c:abc.xls”)Nextwkb關(guān)閉工作簿ActiveWorkbook.CloseSaveChange:=True,FileName:=“c:abc.xls”6.2Workbooks對象Add方法:添加新的工作表ActiveWorkbook.Worksheets.AddAfter:=Worksheet(“Sheet3”)Count:=2Count屬性:返回工作簿中的工作表數(shù)ActiveWorkbook.Worksheet.AddAfte
6、r:=Worksheet(Worksheets.Count)Name屬性:命名工作表Worksheets(2).Name=“test”Activate方法:選擇并顯示一個(gè)工作表ActiveWorkbook.Worksheets(“test”).ActivateMove方法:移動工作表的位置ActiveWorkbook.Worksheets(“test”).MoveBefore:=ActiveWorkbook.Worksheets(1)Delete方法:從工作簿中刪除工作表Application.DisplayAlerts=False(不顯示提示信息)ActiveWorkbook.Wor
7、ksheets(“test”).Move6.3WorkSheet對象Value屬性:設(shè)置單元格中的數(shù)值Range(“A1”).Value=Range(“A1”).Value*80Formula屬性:將指定的公式放入單元格區(qū)域Range(“A3”).Formula=“=A1+A2”Rows和Columns屬性:返回工作表中一個(gè)完整的行或列Rows(1)表示活動工作表中第一行的Range對象Range屬性:對一個(gè)相鄰或不相鄰的單元格區(qū)域返回一個(gè)Ra