I made a mistake in case you read my message before I corrected it - the code should go in the CompositeImage function, not the Redraw Sub.