资源描述：
《vba单元格操作详解(个人总结,请勿转载)》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。
1、VBA单元格操作详解（个人总结，请勿转载）Incells,theinsertionformulashouldusethecell，sformulaproperty,andinsomecasesformlacanbeomitted,forexample:Subinsertionformula（）Range（〃D4〃），〃・Formla〃二〃二d3-d2〃,"range"（〃D4〃）二〃二d3-d2〃canalsoberealizedEndSubYoucanalsoextractformulasusingtheformla
2、attribute,forexampleSubgetsthecellformula（）Msgbox"theformulaforcellE4is:"&"range"（〃E4〃），".Formla",zzvbinformation^,"gettheformula・EndSubWhenyoueditVBA,insertthecellformulasothatyoucaninserttheexcelbuilt-informula.・Suchasmin,Max,sumandsoon,formulasareOKSubselects
3、allcells（）Cells.selectEndSubSubselectsallcells()Rows・selectEndSubSubselectsallcells()Columns.selectEndSubTherearemanywaystorepresentacel1.Forexample,torepresentacell,BIOcanbeused:Cells(10,2)[blO]Range(〃B10〃)Cells仃0,b)Cells(〃B〃&10)Cells(9*columnnumber+2),suchas20
4、03columnnumberof256columns,thentheBIOisrepresentedbycells(2036)Toexplicitlyrepresentcells,suchasreferencingcellsfromdifferentworksheetsinthesameworkbook,theyarerepresentedasWorksheets(tablename)・Range(celladdress)Torefertoacellwithdifferentworksheets,itisreprese
5、ntedasWorkbooks(Workbookname),・Sheets(worksheetname),・Range(celladdress)Butwhenyouselectacell,ifyouwanttoselectthecellofthenonselectworksheet,forexample:Subselectsthecelloftheinactiveworksheet()Worksheets("SHEET2"),.Range(〃A10〃),.SelectEndSubAnerrorwilloccur・The
6、correctmethodofexpressionisSubselectsthecelloftheinactiveworksheet()Worksheets(〃SHEET2〃).SelectRange(〃A10〃).SelectEndSubSelectedregionSubselectregion()Range("a3:b6"),〃・Select","range"(“A3",〃B6〃),〃・Select",，zrange，/(cells(1,3),cells(2,6)),〃・Select",，z[a3:b6]・sele
7、ct",〃a3:b6〃，bothrepresenttheselectionregionEndSubSubselectsarow()Range(〃6:6〃),・Select,'rows(6)・SelectEndSubSubselectsmultiplerows()Range(〃6:9〃),・Select,'rows(〃6:9"),・SelectEndSubSubselectsacolumn()Columns(〃a:a〃),・Select,'columns(1).SelectEndSubSubselectsthedisco
8、ntinuousregion()Range(〃b2:b4,C4,b6:d8,f8:g9，z),.Select,Junion(range(〃b2:b4〃)，range(〃C4〃)，range(〃b6:d8〃)，，zrangez，(〃f8:g9〃))・SelectEndSubSubselectsadjacentregions()The
