VBA delete row above if

Sparda142

Board Regular
Joined
Dec 19, 2018
Messages
52
Hello,


Im not great at vba so im looking for some help. Im looking say if in column A, Delete the row above if date value in A1 does not match the date value in A2

[TABLE="class: grid, width: 500"]
<tbody>[TR]
[TD][/TD]
[TD]a[/TD]
[/TR]
[TR]
[TD]1[/TD]
[TD][TABLE="width: 105"]
<tbody>[TR]
[TD="class: xl66, width: 105, align: right"]8/1/2019 9:16[/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[/TR]
[TR]
[TD]2[/TD]
[TD][TABLE="width: 105"]
<tbody>[TR]
[TD="class: xl66, width: 105, align: right"]7/22/2019 21:04[/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[/TR]
[TR]
[TD]3[/TD]
[TD][TABLE="width: 105"]
<tbody>[TR]
[TD="class: xl66, width: 105, align: right"]7/22/2019 20:55[/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[/TR]
[TR]
[TD]4[/TD]
[TD][TABLE="width: 105"]
<tbody>[TR]
[TD="class: xl66, width: 105, align: right"]7/22/2019 20:55[/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[/TR]
[TR]
[TD]5[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]6[/TD]
[TD][TABLE="width: 105"]
<tbody>[TR]
[TD="class: xl66, width: 105, align: right"]8/1/2019 9:16[/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[/TR]
[TR]
[TD]7[/TD]
[TD][TABLE="width: 111"]
<tbody>[TR]
[TD="class: xl66, width: 111, align: right"]8/1/2019 14:02[/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[/TR]
</tbody>[/TABLE]
 

Excel Facts

Add Bullets to Range
Select range. Press Ctrl+1. On Number tab, choose Custom. Type Alt+7 then space then @ sign (using 7 on numeric keypad)
My apologies, I was switching between screens when i wrote "yes"

Basically what i'm trying to say is if the cell a1 date value is not the date value of the cells below delete the row. However if the cell is blank within the column do nothing
 
Upvote 0
Basically what i'm trying to say is if the cell a1 date value is not the date value of the cells below delete the row. However if the cell is blank within the column do nothing
So Rows 2, 3 and 4 should be deleted?
 
Upvote 0
You still did not answer my question.
My apologies, I was switching between screens when i wrote "yes"

Basically what i'm trying to say is if the cell a1 date value is not the date value of the cells below delete the row. However if the cell is blank within the column do nothing
 
Upvote 0
I will see Ricks answer to this. Considering skipping blank rows I have no answer.
 
Upvote 0

Forum statistics

Threads
1,224,816
Messages
6,181,138
Members
453,021
Latest member
Justyna P

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top