+ Reply to Thread
Results 1 to 2 of 2

Deleting Blank Rows

  1. #1
    Nigel Bennett
    Guest

    Deleting Blank Rows

    THis Code Deletes all the blank rows the workbook it
    starts at row 1

    With ActiveSheet
    On Error Resume Next
    .Columns("C").SpecialCells
    (xlCellTypeBlanks).EntireRow.Delete
    On Error GoTo 0
    End With

    How can I set it to start at another row for example row 5

  2. #2
    Jim Thomlinson
    Guest

    RE: Deleting Blank Rows

    With ActiveSheet
    On Error Resume Next
    .Range("C5:C65535").SpecialCells
    (xlCellTypeBlanks).EntireRow.Delete
    On Error GoTo 0
    End With

    Try that...

    HTH
    "Nigel Bennett" wrote:

    > THis Code Deletes all the blank rows the workbook it
    > starts at row 1
    >
    > With ActiveSheet
    > On Error Resume Next
    > .Columns("C").SpecialCells
    > (xlCellTypeBlanks).EntireRow.Delete
    > On Error GoTo 0
    > End With
    >
    > How can I set it to start at another row for example row 5
    >


+ Reply to Thread

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1