Basically I'm just trying to convert a date and time to a different time zone. Here is my code:
dateString = Left(startcell.Offset(i, 0).Value, 10) & " " & Mid(startcell.Offset(i, 0).Value, 12, 5)
dateofPeak = DateAdd("h", -7, DateTime.DateValue(dateString))
The dateString input is "2018-06-02...