How do you remove the colon from a time in the "HH:MM" format when the time is placed in the range from an array?

I have a database of times formatted as "8:00 AM", "12:00 PM", etc. I need to transfer those times to a different sheet in a different format.

Ex:
Sheet 1:

8:00 AM
9:00 AM
12:00 AM
2:00 Pm
2:43 PM

Sheet 2:

800
900
1200
200
243

I tried to just use the left and right functions, but it would read it as a decimal.

'For single digit hours
NewTime(i) = Left(NewTime(i),1) & Right(NewTime(i),2)

You apply a new .NumberFormat to the range, e.g.

Sheet2.Range("A1:A5").NumberFormat = "hmm"