Excel VBA根據點數創建索引

Question

基本上，我試圖將「= LEN（C5）-LEN（SUBSTITUTE（C5;」。「;」「））+ 1」excel公式適用於所有單元作爲其中一個宏的嵌入過程。但是，當我運行代碼時，它不顯示任何單元格的值。該列設置爲「常規」格式，因此不應該成爲問題。關於如何獲得細胞價值的任何想法？

For i = 3 To i = 10000 
    Cells(i, 4).Value = Len(Cells(i, 3).Value) - Len(WorksheetFunction.Substitute(Cells(i, 3).Value, ".", "")) + 1 
Next i 

Answer 1

改變這一行

For i = 3 To i = 10000 

要

For i = 3 To 10000