try at the start of your code
vb Code:
  1. application.sceenupdaing = false
set to true at end of code