VBA insert formula function for certain values in column

[Tgbell]

Not sure if anyone will know this but I tried to explain with my exact example. My sheet has around 12 columns but the relevant ones for the question only involve 1-6
FOR REFFERENCE:
Column 1 Report ID#
Column 2 M Date
Column 3 Report Date
Column 4 Exec Date
Column 5 Exec Time
Column 6 Time diff (the one I am adding the formula in)

I need just a subtraction formula in column 6, which this isn't hard, but I need to paste the formula in Column 6 certain rows where the column 1 matches the same id number as the above column 1 number.
For example:
A2=1
A3=2
A4=3
A5=3
A6=4
A7=4

I would need the formula (in Column 6) for A7-A6 and A5-A4, but not A3-A2 because the column 1 value #'s aren't the same. There is only max 2 of the same Report ID numbers in column 1, but depending on the daily data imputed there would be at least 20 rows where you would need to insert the formula.

[Olly]

Attach a sample workbook (not a picture or pasted copy). Make sure there is just enough data to demonstrate your need. Include a BEFORE sheet and an AFTER sheet in the workbook if needed to show the process you're trying to complete or automate. Make sure your desired results are shown, mock them up manually if necessary.

Remember to desensitize the data.

Click on GO ADVANCED and then scroll down to Manage Attachments to open the upload window.

[Tgbell]

I added the file. First Page would be the Before and next sheet =After.

I need to have vba sort the sheet by 'Filter 1' then delete all rows that do not have 'swst' in the filter 1 column. I then need vba to filter by 'filter 2' and delete all values in the column that are not swst BUT NO DELETING BLANK SPACES columns. Then delete the Filter 2 column and have a formula to delete any other column that doesn't have anything in it.

Next, is to sort by first: TYPE then by: Time diff (smallest to largest)

That's all I need to finish to help me accelerate the whole daily process.