返回列表 上一主題 發帖

複製時~ 只帶值不要格式

回復 1# hugh0620
不用 COPY  效果一樣
  1. Sub Ex()
  2.     With Sheet1.Range("K4")
  3.         Sheet1.Range("E4").End(xlDown).Offset(1, 0) = .Value
  4.     End With
  5. End Sub
複製代碼

TOP

        靜思自在 : 欣賞別人就是莊嚴自己。
返回列表 上一主題