Delete any blank rows from specific columns

**tantcu** · 07-23-2013, 03:21 PM

Hello,

I'm looking for a vba that can delete any banks rows from specific column B. Range from B56 to B3500. If any blank cells in this area will be deleted. Appreciate if you can help.

**LaffyAffy13** · 07-23-2013, 03:33 PM

Sub DeleteBlanks()
Dim letter As Range

For Each letter In Range("B1: B3500").SpecialCells(xlCellTypeBlanks)
If letter = "" Then
letter.EntireRow.ClearContents
End If
Next letter
End Sub

If you just want to remove the contents from cell B then take out ".EntireRow"

**tantcu** · 07-23-2013, 03:40 PM

Thank you.

**AB33** · 07-23-2013, 03:43 PM

Sub pelle()
Range("B56", Cells(Rows.Count, 2).End(xlUp)).SpecialCells(4).EntireRow.Delete
End Sub

**LaffyAffy13** · 07-23-2013, 03:45 PM

Read the question wrong, my code just clears the contents. AB's code does the job correctly. Sorry

Delete any blank rows from specific columns

LinkBack

Thread Tools

Rate This Thread

Display

Hybrid View

Delete any blank rows from specific columns

Re: Delete any blank rows from specific columns

Re: Delete any blank rows from specific columns

Re: Delete any blank rows from specific columns

Re: Delete any blank rows from specific columns

Thread Information

Users Browsing this Thread

Similar Threads

Delete 1 to 8 rows. Do text to columns to specific columns.

[SOLVED] VBA Find last row and column that contain data and delete all blank rows and blank columns

delete rows where a cell is blank in specific column

[SOLVED] Delete rows that contain blank columns

[SOLVED] To Delete the specific rows when blank is found on column A

Bookmarks

Bookmarks

Posting Permissions