snare wrote:
一堆錯誤If Cells...(恕刪)
啊啊~~
看樣子我還有很多基本的架構需要學習
之前我的寫法都是
if 判斷式 then 然後下面一行接計算式或是輸出結果
或者是接第二個判斷式
但是您的程式碼如果套用我的習慣
卻會產生錯誤而無法順利執行
例如
For j = 1 To 5
If Cells(i + 1, j + 1) >= 60 Then check = check + 1
Next j
跟下列分行的差異
For j = 1 To 5
If Cells(i + 1, j + 1) >= 60 Then
check = check + 1
Next j
至於錯誤原因還需要去理解
但還是很謝謝您的指導