userform textbox input hours

[legi114]

hello,

i made a userform calculator which adds hours to selected cells.
its based on MrExcels tutorial.
my problem is that the text box wont recognize hours in the format
as the cells have.
the format of the cells is [h]:mm for example i selected a cell with 24:50 ( 24 hours & 50 minutes) & a cell with 2000:05 ( 2000 hours & 5 minutes) i open the userform & i want to tipe in the textbox 11:30 & press on the cmdbutton and i want to get in the first cell that i selected the result of 36:20 & in the second cell that i selected the result of 2011:35.

the code i used in the cmdbutton :

for each cell in selection
cell.value = cell.value + textbox1.value
next cell

please help
thanks

 

[VoG]

Hi. Perhaps like this

cell.Value = cell.Value + TimeValue(textbox1.Value)

 

[legi114]

thank you very much it works

 

[legi114]

a)a problem with this code it work only if i want to add up to 24:00 hours
when i try to add more than 24:00 hours a runtime error occurs.

any ideas how to make it an absolute time???

b) when i try to subtract time that larger from the time in the cell also a runtime error occurs ,
any idea how to allow it to calculate & show negative time such as: "-2:30" ?


thanks.

 

[VoG]

Hi.

a) Maybe like this (untested)

cell.Value = cell.Value + CDate(textbox1.Value)

b) You cannot have negative time in Excel unless you use the 1904 time system.

 

[legi114]

thanks
but it doesnt work its the same.