How to make this run faster/more responsive?

Please post your code here. If it is too long to include in your next Reply (hopefully not) you can add it as an attachment.

...R