Macro to find all specific values in column and replace adjacent cell values

Hello,

Via macro, is there a way to find all specific values within a column, then replace the right adjacent cell values of each value found with the values in the cell directly above the adjacent cells?

For example, I have attached a spreadsheet with four product values in Column B (Hardware, SW, Installation, Shipping). I would like to find all “SW” items in column B, and replace the Date in column C with the Date of the “Hardware” item in the row directly above the “SW” item. I would then like to repeat this same action for “Installation” and “Shipping” rows.

The data I receive will change daily, and the SW, Installation, and Shipping lines would always need to be updated with the date as the HW line directly above.

Thanks for taking a look!

Is this what you mean?

Option Explicit

Sub SW()
    Dim rRng As Range
    Dim rCl As Range

    Set rRng = Range(Cells(1, 2), Cells(Rows.Count, 2).End(xlUp))

    For Each rCl In rRng
        If rCl.Value = "SW" Then rCl.Offset(, 1).Value = rCl.Offset(-1, 1).Value
    Next rCl
End Sub