Problem with a loop

[z0rdd]

Hello,

I'm writing a script that selects certain values on a pivot chart slicer, and based on that sends an email containing the corresponding pivot data and chart. I have to do it for multiple values, which may change depending on version of the file currently in use.
Now I got the functional part of the code working, meaning it selects the correct item on the slicer and creates the email message I want, so I can theoretically do it in blocks, but then I would have to define all the values for the slicer selection in the code, making it highly impractical. I need the code to draw the values for the slicer selection from a range of cells on another worksheet, and this is the part I can't get to work.

The functional segment of the code, looks like this:

Please Login or Register  to view this content.

Now let's say the values I need to loop through are in Sheets("InfoData").Range("A22:A32")

What I tried to do was:

newSelection = ActiveCell.Value

and the put the whole block in a loop

Please Login or Register  to view this content.

but It would always return an error at this point

Sheets("Infodata").Cells(x, 1).Select

Strangely enough not the same error every time.

I'm completely lost.

[JapanDave]

What is this actually for?

Please Login or Register  to view this content.

[z0rdd]

Nevermind I actually made it work, but for some reason the list had to be on the some worksheet, othwerwise excel refuses to cooperate.

And for your question:

newselection contains the value that I need to select on the slicer, and since I need to do it for 10+ usernames I thought I would make excel select one username after another, and base the the variable on the currently selected cell.