remove data validation from next available row

[redspanna]

Hi all

Trying to find last populated row in sheet2, then on that row remove all Data Validation lists that are stored in columns F:Q

I have this code, but can't get it to work

Sheets("Sheet2").Cells(Rows.count, 1).End(xlUp).Offset(1, 0).Validation.EntireRow.Delete

any help appreciated

 

[PlusX EAI]

Dim a As Integer

a = Sheets("Sheet2").Cells(Rows.Count, "A").End(xlUp).Row


Sheets("Sheet2").Rows(a).Delete

 

[redspanna]

Hello

Can't remove the whole row as some locked cells, just need code to remove data validation thru columns F:Q

Thanks

 

[PlusX EAI]

Dim a As Integer

a = Sheets("Sheet2").Cells(Rows.Count, "A").End(xlUp).Row


Sheets("Sheet2").Range(Cells(a, 6), Cells(a, 17)).Delete

 

[redspanna]

slight tweek..

Sheets("Sheet2").Range(Cells(a, 8), Cells(a, 17)).[COLOR="#FF0000"]Validation[/COLOR].Delete

But great

Thanks