ilikered100
New Member
- Joined
- May 29, 2013
- Messages
- 46
I have a complex workbook template which has all of a sudden added over a milliion extra rows on each worksheet. I've tried everything I know of to delete them and nothing seems to work. For reasons I won't go into, it's not going to work for me to copy and paste the information into a new worksheet or it will take a massive amount of time as the sheets are inter-related with a lot of complex depency from one sheet to another.
No matter what I do, I still have 1048327 number of rows on most of the sheets. Any help is greatly appreciated
Here's what I've tried so far which has not worked:
1. Control-Shift -down Selecting empty rows, then Right-click-delete. The same number of rows still appear.
2. Selecting Rows and then using the Delete - Entire Row option in the menu bar.
3. Go To Special and then Selecting Blanks and Right Click Delete
4. This VBA Code:
Sub ResetUsedRange()
Dim sht As Worksheet
Dim lng As Long
For Each sht In ActiveWorkbook.Worksheets
lng = sht.UsedRange.Rows.Count
Next
End Sub
Thanks,
Carolyn
No matter what I do, I still have 1048327 number of rows on most of the sheets. Any help is greatly appreciated
Here's what I've tried so far which has not worked:
1. Control-Shift -down Selecting empty rows, then Right-click-delete. The same number of rows still appear.
2. Selecting Rows and then using the Delete - Entire Row option in the menu bar.
3. Go To Special and then Selecting Blanks and Right Click Delete
4. This VBA Code:
Sub ResetUsedRange()
Dim sht As Worksheet
Dim lng As Long
For Each sht In ActiveWorkbook.Worksheets
lng = sht.UsedRange.Rows.Count
Next
End Sub
Thanks,
Carolyn