Divide values, VBA

[Desu Nota from Columbus]

I have a column (E) of data that is in seconds. I need a code to put in my macro that converts it into hh:mm:ss.

I can divide the numbers by 86400 (60*60*24) and then format to [h]:mm:ss and they work, but I haven't been able to get a macro to do it.

how should I change this code?

Range("E2:E65534").FormulaR1C1 = "=IF(RC[0]="""","""",RC[0]/86400"
Columns("E:E").NumberFormat = "[h]:mm:ss"

 

[VoG]

That looks like it should work. What result do you get?

 

[Desu Nota from Columbus]

That looks like it should work. What result do you get?

The values are only changing format, the division is never taking place.

I am headed out of the office for the day now, but I will be back first thing in the morning.

I am trying to avoid using a recorded macro where I copy/paste special > Divide 86400, down the entire column

I want to know how to do this using a more universal method if possible.

 

[Gary McMaster]

If your "seconds" data is in column E, aren't you overwriting your data with a formula?

How about PasteSpecial?

Gary

Range("F2").Value = 86400 'Some unused cell
Range("F2").Copy
Range("E2:E65534").PasteSpecial xlPasteValues, xlPasteSpecialOperationDivide

 

[Desu Nota from Columbus]

I am trying to avoid using a recorded macro where I copy/paste special > Divide 86400, down the entire column

I'm looking for a universal way.