返回列表 上一主題 發帖

[發問] 如何將比對的資料貼到儲存格中

回復 1# gctsai
  1. Sub tt()
  2. A = Range("C65536").End(xlUp).Row
  3. For i = 2 To A
  4.     If IsError(Range("F" & i)) Then
  5.     Else
  6.        Range("C" & i) = Range("F" & i)
  7.     End If
  8. Next
  9. End Sub
複製代碼
學習才能提升自己

TOP

        靜思自在 : 原諒別人就是善待自己。
返回列表 上一主題