UserForm with filtered data

The attached has a very simple UserForm (a drastically simplified version of something I use at work). By using the spin button you can cycle through the records on the Data sheet.
This all works great, however, when the data is filtered it falls over when you get to a record that's not showing due to the filter.

So I'm looking for an elegant solution to get around this. Any ideas?

Thanks in advance

B