We help IT Professionals succeed at work.

deleting filtered cell contents in excel

248 Views
Last Modified: 2017-05-04
I have rows 2, 5, 676, 4546 and other rows selected due to a filter. I want to delete those rows BUT NOT the rows in between.
How to delete data in cells that are filtered in Excel 2013.
Comment
Watch Question

ShumsManaging Director/Excel VBA Developer
CERTIFIED EXPERT
Distinguished Expert 2018

Commented:
Hi,

Uploading a sample workbook would be helpful.
Edward PamiasTeam Lead RRS Desk
Top Expert 2016

Commented:
All I do is filter what I want to delete, go to the left side where the numbers are left click till an arrow appears and the row is highlighted drag down to highlight everything filtered then right click and select delete.
ShumsManaging Director/Excel VBA Developer
CERTIFIED EXPERT
Distinguished Expert 2018

Commented:
Once you have filtered data, then try below:
Sub DeleteVisibleRows()
Dim Ws As Worksheet
Set Ws = ActiveSheet
Application.ScreenUpdating = False
With Ws.AutoFilter.Range
    .Offset(1).Resize(.Rows.Count - 1).EntireRow.Delete
End With
Application.ScreenUpdating = True
End Sub

Open in new window

Ryan ChongSoftware Tead Lead / Business Analyst / System Analyst / Data Engineer / Applications Consultant
CERTIFIED EXPERT

Commented:
check this article as well:

How to delete all hidden rows or columns in Excel?
https://www.extendoffice.com/documents/excel/857-excel-delete-hidden-rows-columns.html

I'm using  the Inspect Document function for most of the cases.

Author

Commented:
I don't want to delete the hidden rows. I want to delete the data contained inside the visible rows.
I have uploaded a worksheet.
I have hidden the even numbered rows.
I only want to delete the contents of the visible (odd numbers) row and leave the hidden contents --even numbers--  intact
delete-odd-contents.xlsx
Managing Director/Excel VBA Developer
CERTIFIED EXPERT
Distinguished Expert 2018
Commented:
Unlock this solution and get a sample of our free trial.
(No credit card required)
UNLOCK SOLUTION

Author

Commented:
Thanks!

Gain unlimited access to on-demand training courses with an Experts Exchange subscription.

Get Access
Why Experts Exchange?

Experts Exchange always has the answer, or at the least points me in the correct direction! It is like having another employee that is extremely experienced.

Jim Murphy
Programmer at Smart IT Solutions

When asked, what has been your best career decision?

Deciding to stick with EE.

Mohamed Asif
Technical Department Head

Being involved with EE helped me to grow personally and professionally.

Carl Webster
CTP, Sr Infrastructure Consultant
Empower Your Career
Did You Know?

We've partnered with two important charities to provide clean water and computer science education to those who need it most. READ MORE

Ask ANY Question

Connect with Certified Experts to gain insight and support on specific technology challenges including:

  • Troubleshooting
  • Research
  • Professional Opinions
Unlock the solution to this question.
Thanks for using Experts Exchange.

Please provide your email to receive a sample view!

*This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

OR

Please enter a first name

Please enter a last name

8+ characters (letters, numbers, and a symbol)

By clicking, you agree to the Terms of Use and Privacy Policy.