2012-06-15 107 views
0

我正在嘗試執行一個非常簡單的任務。使用VB爲單元格值添加一小時。在VB中使用時間的麻煩

作爲工作表中的公式,="D3+TIME(1,0,0)"效果很好。 我曾嘗試以下,再加上變化,在VB中,但到目前爲止沒有奏效:

Cells(x, y).Value = Cells(x, y).Value + Time(1, 0, 0) 

返回類型不匹配錯誤。

Cells(X, Y).Value = Hour(Cells(X, Y).Value) + 1 

返回12:00:00無論cell(x,y)是什麼。任何援助將不勝感激。

回答

0

試試這個:

Cells(x, y).Value = Cells(x, y).Value + TimeSerial(1, 0, 0) 

TimeSerial (MSDN)

+0

不錯!謝謝克雷格 –