your 'with shtcomp' statement does nothing because you specify shtcomp again in the following line. you should either use the three line version abousetta posted first (though you should qualify the Rows property too) or the one line version he posted second, not a mix of the two.