3程式碼如下“Sub Countif() On Error Resume Next "忽略程式執行過程中出現的錯誤 Dim i As Long "定義i為整數 Set MySheet2 = ThisWorkbook.Worksheets("Sheet2") "定義工作表 Set Range1 = ThisWorkbook.Worksheets("Sheet1").Range("A2:A100000") For i = 1 To 50000 "迴圈執行50000次 MySheet2.Cells(i, 2) = 如圖：
Application.WorksheetFunction.Countif(Range1, MySheet2.Cells(i, 1)) Next End Sub”
首先很高興能回答你的問題，countif函式的使用技巧是什麼？具體步驟如下：方法/步驟
1Countif函式是表格中對指定區域中符合指定條件的單元格計數的函式，使用“alt+F11”開啟VBA編輯器。如圖：
3程式碼如下“Sub Countif() On Error Resume Next "忽略程式執行過程中出現的錯誤 Dim i As Long "定義i為整數 Set MySheet2 = ThisWorkbook.Worksheets("Sheet2") "定義工作表 Set Range1 = ThisWorkbook.Worksheets("Sheet1").Range("A2:A100000") For i = 1 To 50000 "迴圈執行50000次 MySheet2.Cells(i, 2) = 如圖：
Application.WorksheetFunction.Countif(Range1, MySheet2.Cells(i, 1)) Next End Sub”
4“cells”是表格裡面的單個單元格，“Application.WorksheetFunction”主要是呼叫Excel表格上面的函式，countif函式的用法為：countif（查詢的範圍，要查詢的數值）。如圖：
6總結如下。如圖：