How to write VBA for a filter without activating the sheet to delete some rows

[jbesclapez]

Hello Mr Excel


Could someone tell me how to write VBA code of filtering data without activating the sheet to delete my rows.
Here is my code below

Dim LastRowA As Long
    LastRowA = Sheets("QRU").Cells(Rows.Count, 1).End(xlUp).Row


Worksheets("QRU").Activate
Sheets("QRU").Range("A1:E" & LastRowA).AutoFilter Field:=1, Criteria1:="=vide"
Sheets("QRU").AutoFilter.Range.Offset(1, 0).Rows.SpecialCells(xlCellTypeVisible).Delete (xlShiftUp)
Sheets("QRU").AutoFilterMode = False

Could someone please rewrite these lines without the Worksheets("QRU").Activate and also without using ActiveSheet

Thanks for your time

 

[Fluff]

Just remove the Sheet.activate line

 

[jbesclapez]

Sorry for that Fluff, i feel i wasted your time. I did delete the activate sheet before but it was not working. now it does. No idea what i changed . Thanks Fluff

 

[Fluff]

As long as it's working that fine.
Thanks for the feedback