Loop problem

[tnuis]

Hello guys,

Quick question, how to change the code below so that If I was to select "Bankterminal" as first Item in, for example A13, the MsgBox does not pop up for each and everytime I make A selection in the Range("A14:A40") ?

In other Words, I only want the MsgBox to pop up ONE time for each time it is ACTUALLY chosen.

Now, using the code below, for each change I make it will loop through all the cells in Range("A13:A40") and for Each cell containing the value "Bankterminal" the MsgBox will pop up. So If it finds the value "Bankterminal", lets say, 3 times then the MsgBox pops up 3 times.

Please Login or Register  to view this content.

[Mumps1]

Try:

Please Login or Register  to view this content.

[tnuis]

Ok, tried it.

It did indeed eliminate the fact that no matter how many Cells contain "Bankterminal" the pop up will only occur once.

However, I still have the problem that for example A13 and A14 contain "Bankterminal" the MsgBox will still pop up once for EACH change that is made to any of the Cells in Range(A15:A40), even If I choose totally different values.

I believe that itīs the fact that ther is A CHANGE that is made (no matter wich change) in the Loop range the pop will occur for each change as long as at least one Cell contains the value "Bankterminal".


Any other suggestions to fix this last issue?

[Mumps1]

Is your code in a worksheet_change event or in a regular module? Can you post the whole macro?

[tnuis]

Yes it is and here it is: (Itīs regarding the last procedure)

Please Login or Register  to view this content.

[Mumps1]

Since the loop is part of the change event, it will run automatically whenever you make a change in any cell in the range. There may be a way of making it work the way you want by keeping the loop as part of the change event but I can't think of any way to do it. The only way that I can think of is to take it out of the change event macro, put it into a regular module and run it using a button on your worksheet.