If VBA.Asc(Mid(Cells(i, "A"), j, 1)) > 47 And VBA.Asc(Mid(Cells(i, "A"), j, 1)) < 58 Then. c = c + 1. End If. Next. Cells(i, "B") = c.
確定! 回上一頁