返回列表 上一主題 發帖

無條件捨去問題

回復 4# warhead

資料量不大,或是不考慮執行速度可以用下列
  1. Sub TEST()
  2. For Each E In Range("A1:A2")
  3.     E.Value = Application.WorksheetFunction.Round(E.Value, 2)
  4. Next
  5. End Sub
複製代碼
考量速度,建議用陣列處理完畢之後再一次性輸出
PKKO

TOP

        靜思自在 : 布施如播種,以歡喜心滋潤種子,才會發芽。
返回列表 上一主題