返回列表 上一主題 發帖

迴圈請益,使用For Next陳述式:若b有值則a建立x

  1. Sub YY()
  2. For Each C In [B:B].SpecialCells(2)
  3. C(1, 0) = "X"
  4. Next
  5. End Sub
複製代碼
這樣可避免循環到空白儲存格

TOP

當然是。
你可以用MsgBox TypeName(c)
得知變數類型

TOP

        靜思自在 : 君子立恆志,小人恆立志。
返回列表 上一主題