返回列表 上一主題 發帖

[發問] 請問如何讓cells成為一個變數?

[發問] 請問如何讓cells成為一個變數?

  1.     Dim na%, nb%, nc%
  2.         For i = 2 To 20
  3.             na = Cells(i, 11)
  4.             nb = Cells(i, 11).Offset(-1, 0)
  5.             nc = Cells(i, 11).Offset(0, 1)
  6.             If na <> "" Then
  7.                 na = nb
  8.             End If
  9.             If na = "" Then
  10.                 na = nc
  11.             End If
  12.         Next
  13.     End If
複製代碼
使用後無任何錯誤訊息也沒有任何反應,不知道是不是cells不能是一個變數,還是下的指令有誤,謝謝觀看

回復 1# av8d
na宣告為短整數 為何用判斷式na不等於空字元?
看得懂是應該的,懂得應用才像學生,臉皮厚點學會更謹慎積極

TOP

本帖最後由 av8d 於 2023-11-11 16:55 編輯

回復 2# Andy2483

感謝前輩的觀看,na是 Cells(i, 11)
我原本打算 dim na as range
但是該儲存格.value為數字所以dim 短整數
我儲存成Excel上傳後再告知前輩,感謝

TOP

回復 2# Andy2483


    自動遞增、列出缺號.rar (13.48 KB)

已解答,當時我邏輯出錯,是 cells的值存入 na,我還想更簡短的撰寫,謝謝前輩的觀看。

TOP

        靜思自在 : 人生最大的成就是從失敗中站起來。
返回列表 上一主題