Glad to help. Didn't realize you wanted to loop through them. You could shorten that code:
For I = 0 to lstCheckout.listcount - 1
You don't have to set the focus, or move the data to a variable, unless you need to for another reason.