timeserial(0,variable,0) contains a variable, which is retrieved from cell A1.
Do you have any suggestions?
Thank everyone very much for any suggestions
Eric

"Jacob Skaria" wrote:

Eric, what is wrong with

Now + timeserial(0,30,0)

--
Jacob (MVP - Excel)


"Eric" wrote:

A1 = 30
A2 = A1*"0:1", which show 00:30:00 in hh:mm:ss format

dTime = Now + TimeValue(Sheets("Date").Range("A2").Value)

When I run the macro, there is an error on dTime.
Do you have any suggestions on how to fix the code? so "00:30:00" can be
retrieved for TimeValue function.
Thank everyone very much for any suggestions
Eric

"Modeste" wrote:

Bonsour® "Eric" a écrit

Dim MyTime
MyTime = TimeValue("4:35:17 PM")

what else ???

If I would like to retrieve the number (in minute unit) and convert into
("4:35:17 PM") format, could you please give me any suggestions on how
to
do it?

Sub eric()
Dim MyTime As Date
MyTime = TimeValue("4:35:17 PM")
MsgBox MyTime & vbCrLf & " equal : " & Int(MyTime / TimeValue("0:01")) & "
minutes"
End Sub

For example, there is 30 in cell A1, which unit is minute, and I would
like
to retrieve 30 value and turn into "00:30:00" string and place it inside

in A2 = A1*"0:1"
cell format hh:mm:ss

HTH
@+