1.vba單元格定位

Range.Specialcells(Type,Value) 相當于工作表中快捷鍵“CTRL+G” 彈出的定位條件的功能。

2.vba查找單元格內(nèi)容

參數(shù)：Type 必選 指定單元格的類型參數(shù)：Value 可選；Type值為xlCellTypeConstants或xlCellTypeFormulas，Value參數(shù)才起作用Type濟南專升本培訓(xùn)機構(gòu)排名前十 參數(shù)的幾個常用的：xlCellTypeBlanks（簡寫 4），指代空單元格；xlCellTypeComments（簡寫 -4144），含有注釋的單元格；xlCellTypeLastCell（簡寫 11），所選區(qū)域的最后一個單元格；xlCellTypeConstants（簡寫2），含有常量的單元格（所謂“常量”就非公式的數(shù)據(jù)）；xlCellTypeFormulas（簡寫-4123），含有公式的單元格。

3.vba查找定位

Value 的值：xlNumbers（簡寫1），具有數(shù)值的單元格；xlTextValues（簡寫2），具有文本的單元格；xlLogical（簡寫4），具有邏輯值的單元格；xlE濟南專升本培訓(xùn)機構(gòu)排名前十rrors（簡寫16），有錯誤的單元格。

4.vba查找字符在單元格位置

示例一：工作中常會碰到下圖左邊這種合并單元格的數(shù)據(jù)，經(jīng)過復(fù)制粘貼為值后（Range("A1").CurrentRegion.Copy: Range("G1").PasteSpecial xlPasteValues），變成右邊的樣子。

5.vba查找指定內(nèi)容單元格行號

在數(shù)據(jù)區(qū)域出現(xiàn)了很多空格，以往處理：以行倒序刪除用Specialcells處理起來就方便快捷多了，只需一句：Range("G1", Cells(Rows.Count, "K").End(xlUp)).SpecialCells(xlCellTypeBlanks).De濟南專升本培訓(xùn)機構(gòu)排名前十lete (xlUp)。

6.vba 查找功能

語句效果如下圖：

7.怎么用vba查找表格數(shù)據(jù)

示例二：將圖中空單元格加上批注，批注內(nèi)容為＂缺考＂

8.vba定位sheet

Sub 加批注() Dim 區(qū)域 As Range, rng As Range Set 區(qū)域 = Range("A1").CurrentRegion.SpecialCells(xlCellTypeBlanks)

9.vba如何定位單元格

將選定區(qū)域中的空單元格賦值給“區(qū)域”這個變量 For Each rng In 區(qū)域 在對象變量“區(qū)域”中逐個單元格循環(huán) rng.AddCom濟南專升本培訓(xùn)機構(gòu)排名前十ment "缺考"逐個單元格添加＂缺考＂批注 rng.Comment.Shape.TextFrame.AutoSize = True

10.vba定位單元格位置

自動調(diào)整 批注窗口 的大小，根據(jù)內(nèi)容多少自動調(diào)節(jié) rng.Comment.Visible = True批注內(nèi)容總是可見為False，只有選中單元格時，才會顯示批注內(nèi)容 Next End Sub。

效果如下：

比起把數(shù)據(jù)區(qū)域中所有單元格一個一個的循環(huán)，縮短了循環(huán)時間，處理更快捷。