I'd suggest this amendment to your code:
First, find ways to not use "On Error Resume Next". This can lead to all sorts of problems. To make the code work without it, I check each cell in column A to make sure it is a number before attempting to reserve a spot with it.
Next to make sure only one matching spot is Xed, I add an Exit For which will get out of the inner For loop once a cell has been marked X. In general it is bad to use Exit For, but for this simple code it is easier than the alternative.
Bookmarks