Hello, I'm VBA rookie and i need help from you, VBA Wizards :biggrin: I have this code:
Sub roztrideni()
Dim PosledniPlnyRadek as Long
Dim i As Long
'Rows("1:22").EntireRow.Delete
PosledniPlnyRadek = Cells(Rows.Count, "A").End(xlUp).Row
For i = 1 To PosledniPlnyRadekIf Cells(i, 1) = "Air Bank...