& Range formats to serial time I need hh:mm?

[Doolski]

I have an issue with VBA and the time format changing to serial time. I need to retain hh:mm format.
Here is my issue:

With OutMail
.To = strEmail
.cc = ccEmail
.BCC = ""
.Subject = "Info - " & Range("A" & x) & "/" & Range("B" & x) & "/" & Range("D" & x) & " - " & Range("U" & x)


Currently my email subject line looks like this:
Info - AAA/BBB/0.350694444444444 - UUU

Where I need it to look like this:
Info - AAA/BBB/08:25 - UUU


My time format in Column "D" is ("hh:mm") due other reasons so I can't change the formatting of that column.
Is there a way to keep the 08:25 format vs it resetting to 0.350694444444444

I tried .Numberformat etc but I think due to "D" & x variable I'm not sure If I should be trying to format the "D" or the variable x

[TMS]

This: Range("D" & x) needs to be this: Format(Range("D" & x), "hh:mm")

[CK76]

Or you can use Range("D" & x).Text to pass on formatted text from cell. But TMS's method may be faster as reading formatted text from cell is usually slower process.

[TMS]

Ha, always forget about .Text. Just use what I've always used

[Doolski]

TMS, Ahh.. Apply before the Range. I was trying to apply to the column ("d") or the variable x.
Worked great much thanks for the solution.

[Doolski]

CK76 thanks! Only one line of code so the .text is also a great & easy solution!
Cheers!

[CK76]

You are welcome and thanks for the rep

[TMS]

You're welcome. Thanks for the rep.