Sub 非數字個數(). For i = 2 To 9. '1.字數迴圈範圍. c = 0. For j = 1 To Len(Cells(i, "A")). '2.判斷是否為數字. If VBA.Asc(Mid(Cells(i, "A"), ...
確定! 回上一頁