Mrrrr's Forum (VIEW ONLY)
Un forum care ofera solutii pentru unele probleme legate in general de PC. Pe langa solutii, aici puteti gasi si alte lucruri interesante // A forum that offers solutions to some PC related issues. Besides these, here you can find more interesting stuff.
|
Nou pe simpatie: andreutza43 Profile
 | Femeie 25 ani Bacau cauta Barbat 30 - 80 ani |
|
|
Mrrrr's Forum (VIEW ONLY)ReguliInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
|
| #1 |
TRaPModerator
Postari: 960
|
|
The following code will delete all hidden rows in the active sheet:
Sub deleteAllHidden() Application.ScreenUpdating = False
Dim lastRow As Long lastRow = ActiveSheet.Cells(Rows.Count, "C").End(xlUp).Row
For iCntr = lastRow To 1 Step -1 If Rows(iCntr).Hidden = True Then Rows(iCntr).EntireRow.Delete End If Next
Application.ScreenUpdating = True End Sub |
Source: https://www.indeed.com/career-advice/ca ... s-in-excel
|
|
| |
|