Advertisement
Guest User

Untitled

a guest
Apr 8th, 2020
208
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VB.NET 0.11 KB | None | 0 0
  1. .AutoFilter 1, Sheets("List2").Range("A1")
  2. On Error Resume Next
  3. .Offset(1).SpecialCells(12).EntireRow.Delete
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement