時間和時間的計算 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 時間和時間的計算

返回列表下一主題上一主題發帖

[發問] 時間和時間的計算

　暱稱: VBA向前衝

高中生 Rank: 3 Rank: 3

帖子: 559
主題: 58
精華: 0
積分: 626
點名: 0
作業系統: win8
軟體版本: office2013
閱讀權限: 50
性別: 男
來自: TW
註冊時間: 2010-11-22
最後登錄: 2024-6-14

1^# 跳轉到 »

發表於 2012-3-22 13:40 | 顯示全部帖子

回復 4# sammay

要花一點時間~ 了解~ 基本儲存格的用法~
就可以自行修改~ 加油~

Sub ex()
A = Range("C65536").End(xlUp).Row '以C欄位來確定資料最後一筆
For Each A In Range("C2:C" & A) 'A是一個變動的位置
A.Offset(, 2) = DateDiff("D", A, A.Offset(, 1))
A.Offset(, 3) = Format(A.Offset(, 1) - A - DateDiff("D", A, A.Offset(, 1)), "h:mm:ss")
Next
End Sub

複製代碼

學習才能提升自己

靜思自在 : 人的心地是一畦田，土地沒有播下好種子，也長不出好的果實。 -

返回列表下一主題上一主題