Macro to loop through sheets and print them out using an array

Hello,

I have created a macro that loops through and creates an array of the visible sheets. Now I would like for it to print each of those sheets out. I think my main mistake is in my declaration of the array type, since I have not worked with arrays much before.

Please help me figure out how to make the following code operable. Currently when I run it I'm getting a "Run-time error (9): Subscript out of range" error.

Please Login or Register  to view this content.

Thanks!

Hello Mascat,

When you define an array as dynamic, with no dimensions, later in the code you need to use the ReDim statement to assign it dimensions. Yo can only change the last dimension of a dynamic array. The keyword Preserve keeps all the previous values once the array is redimensioned.

Please Login or Register  to view this content.