vba中findnext怎樣才能嵌套使用？findnext的使用條件是：搜索的單元格范圍、內容和其他設置與上一次查找相同，例如：public sub ifind（） dim C as range，R

vba中findnext怎樣才能嵌套使用？

findnext的使用條件是：搜索的單元格范圍、內容和其他設置與上一次查找相同，例如：public sub ifind（） dim C as range，RNG as range，S$，Iadd$，MSG$，n&r set RNG=range（“A:A”）r S=“ABC”r with RNG/r set C=。查找，。單元格（細胞。計數)，xlValues，xlWhole） 如果不是c，則/r Iadd=c.address（0,0）r do/r n=n 1/r MSG=MSG&vbcrlf&c.address（0,0）r set c=。Findnext（c）“如果條件保持不變，則使用Findnext/r如果c為nothing，則退出do/r循環(huán)，直到Iadd=c.address（0,0）r end if/r end with/r msgbox”！總共“&&n&”of “&；S&”：“&；vbcrlf&；MSG/R End Sub

打開一個excel表格：

假設您使用名稱來判斷是否有重復數據，然后輸入函數：

=count（$A$3:$A$9，A3）

并向下拖動重復函數：

如圖所示，值在單元格大于1，表示存在重復數據：

演示如何判斷excel中的數據是否重復。