Delete Rows If Any Cell Contains a Specific Value (Across All Columns) | Excel VBA Macro
Excel VBA Macro: Delete Rows If Any Cell Contains a Specific Value (Across All Columns)
💥Subscribe: / @greggowaffles
Code:
Sub delete_rows_across_all_cols()
Dim row_count As Long
Dim col_count As Long
Dim i As Long
Dim j As Long
Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets("NYSE Stocks")
ws.Activate
row_count = ws.Cells(Rows.Count, 1).End(xlUp).Row
col_count = ws.Cells(1, Columns.Count).End(xlToLeft).Column
i = 2
Do While i ＜= row_count
For j = 1 To col_count
If Cells(i, j) = "" Then
Rows(i).EntireRow.Delete
i = i - 1
row_count = row_count - 1
End If
Next j
i = i + 1
Loop
End Sub
#excelmacro #excelvba #excelvbatutorial
Смотрите видео Delete Rows If Any Cell Contains a Specific Value (Across All Columns) | Excel VBA Macro онлайн без регистрации, длительностью часов минут секунд в хорошем качестве. Это видео добавил пользователь greggowaffles 08 Март 2024, не забудьте поделиться им ссылкой с друзьями и знакомыми, на нашем сайте его посмотрели 36 раз и оно понравилось 1 людям.