Format Uhrzeit beim kopieren beibehalten

Sub als Mail ausgegeben)

Sub SearchLastUser()
Dim lngRow As Long
Dim strUser As String
Dim intCount As Integer
Dim strLastChange As String
Dim strChange As String
Dim strChangeBody As String
lngRow = Worksheets("Benutzeränderungen").Range("A65536").End(xlUp).Row
strUser = Worksheets("Benutzeränderungen").Range("A65536").End(xlUp)
Do While (Cells(lngRow, 1)) = strUser 'Auslesen der Zeilen
strChange = "" 'Inhalt wird für die nächste Schleife geleert
For intCount = 1 To 7 'Auslesen der Spalten (A bis G) (Ergänzung: Wenn das  _
Zeichenformat Uhrzeit ist, dann Werte in Uhrzeit ausgeben)
strLastChange = Worksheets("Benutzeränderungen").Cells(lngRow, intCount) & vbTab
strChange = strChange & strLastChange
Next intCount
lngRow = lngRow - 1
strChangeBody = strChangeBody & vbNewLine & strChange & vbNewLine
Loop
strbody = "Hallo du." & vbNewLine & "Die letzten Wertänderungen lauten wie folgt:" &  _
vbNewLine & strChangeBody
End Sub



bisher wird das Datum in meinem E-Mail-Inhalt so ausgegeben: 

Bsp: 13:58:59 =  0,582627314814815 

Kann ich das Format aus der Tabelle irgendwie beibehalten oder zumindest dann nur für die 3. Spalte ein Uhrzeitformat ausgeben lassen?

Danke schon mal für eure Hilfe.

Liebe Grüße

Gabi