特殊單元格定位
已選取的單元格區(qū)域
Sub tt23()
Sheets("第十二講").UsedRange.Select
Sheets("第十二講").UsedRange.Copy Range("f2")
End Sub
‘copy后面只需加上頂點(diǎn)坐標(biāo)即可
某單元格所在的單元格區(qū)域
什么是相鄰的概念奈懒,當(dāng)行數(shù)與列數(shù)都相鄰時(shí)候摹芙,說兩個(gè)單元格相鄰,如a7與b8济赎,這兩個(gè)單元格是相鄰的,因?yàn)樾袛?shù)與列數(shù)都是相鄰的草添。A7與C8就是不相鄰的了酪劫,因?yàn)榱袛?shù)不相鄰。
Sub tt24()
Range("G13").CurrentRegion.Select
End Sub
兩個(gè)單元格區(qū)域共同的區(qū)域
Sub tt25()
Intersect(Columns("B:D"), Rows("12:14")).Select
End Sub
調(diào)用定位條件選取特殊單元格
Sub tt26()
Range("b1:b9").SpecialCells(xlCellTypeBlanks).Select
End Sub
關(guān)于specialcells 函數(shù)(返回一個(gè)range對(duì)象)珊蟀,xlCellType可為以下xlCellType常量之一
xlCellTypeAllFormatConditions 任意格式單元格
xlCellTypeAllValidation 含有驗(yàn)證條件的單元格
xlCellTypeBlanks 空單元格
xlCellTypeComments 含有注釋的單元格
xlCellTypeConstants 含有常量的單元格
xlCellTypeFormulas 含有公式的單元格
xlCellLastCell 使用區(qū)域中最后的單元格
xlCellTypeSameFormatConditions 含有相同格式的單元格
xlCellTypeSameValidation 含有相同驗(yàn)證條件的單元格
xlCellTypeVisible 所有可見單元格
端點(diǎn)單元格 (非常重要)
Sub tt27()
Range("b65536").End(xlUp).Offset(1, 0) = 250250
End Sub
’end(xlup)意為向上尋找遇到的第一個(gè)非空單元格
Sub tt28()
Range(Range("c6"), Range("c6").End(xlToRight)) = 100
End Sub
‘這段代碼有問題菊值,因?yàn)轱@示結(jié)果為一直到第一個(gè)非空單元格之前的從C6開始的所有的空格都被賦值為100,正確代碼如下育灸,上面代碼之所以有為題腻窒,range()是選取的一個(gè)區(qū)域
Sub tt28()
Range("c6").End(xlToRight) = 100
End Sub