Inserting rows for missing dates

[smallsmallman]

I have more than 8,000 rows of data in excel. It consists of wave and wind speeds on an hourly basis of the course of a year so there should be 8760 cells (the amount of hours in a year). However there are interruptions in the data as the wave buoy might have been inoperable for some hours or even days. I need the dates not to have any gaps in it, for a type of modeling I am doing, and was wondering if anybody knows how to insert a row where there is a missing time/date and insert the right time/date but with the information (wind/wave speeds) from the previous row

hope this makes sense!

 

[kpark91]

nvm. dumb Question from me.

 

[kpark91]

Where are your dates, times, wind speed and wave in? (such as columns A to D)

 

[smallsmallman]

They are in column A, C, D = date, wind speed, wave height. The name of the string is in column B

 

[kpark91]

Try this?

Sub Test()
    'Assuming your data starts from A2
    
    Dim LR&, i&, prevDate#
    LR = Range("A" & Rows.Count).End(xlUp).Row
    prevDate = Range("A2").Value
    
    Application.ScreenUpdating = False
    For i = 2 To LR
        If Range("A" & i).Value = "" Then
            Range("A" & i).Value = Format$(prevDate + 1 / 24, "m/d/yyyy h:mm")
            Range("B" & i).Value = Range("B" & i - 1).Value
            Range("C" & i).Value = Range("C" & i - 1).Value
            Range("D" & i).Value = Range("D" & i - 1).Value
            Range("E" & i).Value = Range("E" & i - 1).Value
        End If
        prevDate = Range("A" & i).Value
    Next i
    
    Application.ScreenUpdating = True
End Sub