- Excel VBA to force numeric value into time format
- 'DateTime Column
- Sheets("Sheet1").Columns("A:A").Select
- Selection.NumberFormat = "m/d/yyyy hh:mm"
- 'Time Column
- Sheets("Sheet1").Columns("B:B").Select
- Selection.NumberFormat = "hh:mm"
- Dim r As Range
- Set r = Sheets("Sheet1").Columns("B:B")
- r.Value = r.Value