Tickboxes and sorting error

[Flick]

I've made a To-Do checklist in Excel which seemed to be working fine up until today. I'm not quite sure what I've done to disturb it, but the only way I can seem to resolve the issue is saving the spreadsheet, closing it, then opening again, which isn't ideal as the problem keeps happening each time I run a macro.

The "Update Table" button to the right is a macro that performs 5 things in this order:

1. Clears contents rows where the "Complete" tickbox has a tick. (Well, in honesty, the tickbox fills the hidden cell to the right with "Complete!" and it clears these rows based on the cells value)
2. Unticks all boxes (which I haven't quite perfected as there are also "On Hold" buttons which don't need unticking, but I can live with it).
3. Sort rows, so any new tasks added to the sheet and the already existing tasks will be sorted by Date and then Urgency.
4. Selects next empty row.
5. Saves workbook.

In the attached example, if you tick the Complete box for Test Task 2 and then press "Update Table", it will clear the text from that row then move Test Task 3 up. However, if you then tick the Complete box for Test Task 3 (now below Test Task 1), it will highlight the row beneath, so somewhere along the line something is getting mixed up, and I'm not bright enough to see where!

Can someone please check my mess and see what I'm missing?

 

[NARAYANK991]

Hi ,

Make the following 2 changes :

1. Last = Cells(Rows.Count, "A").End(xlUp).Row

2. .SetRange Range("A2:E26")

Narayan

 

[Flick]

Thanks Narayan, that's also opened a door to some other errors I didn't notice! All solved and improved now.