Related:
- Macro for deleting row with condition
- Saints row 2 cheats - Guide
- How to delete a row in word - Guide
- Deleting skype account - Guide
- Saints row pc download - Download - Action and adventure
- Excel online macro - Guide
6 responses
husssaid
Posts
2
Registration date
Tuesday 10 March 2009
Status
Member
Last seen
11 March 2009
11 Mar 2009 à 05:57
11 Mar 2009 à 05:57
I have pasted table with some other information not in the table , needs to delete rows that the fourth column does not contain an number
Private Sub Delete()
Dim intRow
Dim intLastRow
intLastRow = Range("A65536").End(xlUp).Row
For intRow = intLastRow To 1 Step -1
Rows(intRow).Select
If Cells(intRow, 1).Value > 5 Then
Cells(intRow, 1).Select
Selection.EntireRow.Delete
End If
Next intRow
Range("A1").Select
End Sub
The macro above will not delete blank rows. If you need to delete blank rows also in the range then use this.
Private Sub Delete()
Dim intRow
Dim intLastRow
intLastRow = Range("A65536").End(xlUp).Row
For intRow = intLastRow To 1 Step -1
Rows(intRow).Select
If Cells(intRow, 1).Value > 5 Or Cells(intRow, 1) = "" Then
Cells(intRow, 1).Select
Selection.EntireRow.Delete
End If
Next intRow
Range("A1").Select
End Sub
Dim intRow
Dim intLastRow
intLastRow = Range("A65536").End(xlUp).Row
For intRow = intLastRow To 1 Step -1
Rows(intRow).Select
If Cells(intRow, 1).Value > 5 Then
Cells(intRow, 1).Select
Selection.EntireRow.Delete
End If
Next intRow
Range("A1").Select
End Sub
The macro above will not delete blank rows. If you need to delete blank rows also in the range then use this.
Private Sub Delete()
Dim intRow
Dim intLastRow
intLastRow = Range("A65536").End(xlUp).Row
For intRow = intLastRow To 1 Step -1
Rows(intRow).Select
If Cells(intRow, 1).Value > 5 Or Cells(intRow, 1) = "" Then
Cells(intRow, 1).Select
Selection.EntireRow.Delete
End If
Next intRow
Range("A1").Select
End Sub
arunv.cse@gmail.com
Posts
2
Registration date
Thursday 29 October 2009
Status
Member
Last seen
11 November 2009
11 Nov 2009 à 04:54
11 Nov 2009 à 04:54
hi,,,,,i want to delete the empty column but,,having values in header.... that is in a1 cell...how to delete the entire column....also the heading...
.....
.....
provock
Posts
31
Registration date
Monday 29 December 2008
Status
Member
Last seen
18 June 2009
3
10 Feb 2009 à 01:57
10 Feb 2009 à 01:57
I'm not very fnd of creating macro or VBA stuffs, but if you want a good example of a macro use to delete rows , just copy and paste this link in the address bar of your browser :https://docs.microsoft.com/en-us/office/troubleshoot/excel/delete-every-other-row
hero85
Posts
7
Registration date
Thursday 12 March 2009
Status
Member
Last seen
14 May 2009
8
16 Mar 2009 à 11:09
16 Mar 2009 à 11:09
do you do small macro work for small money?
critenlee
Posts
2
Registration date
Friday 21 August 2009
Status
Member
Last seen
21 August 2009
21 Aug 2009 à 19:43
21 Aug 2009 à 19:43
Thanks so much for sharing the post.
Links removed as reported spam
Links removed as reported spam
