Display msgbox if duplicates found

[bjc124]

I'm trying to come up with vba code that will display a message box warning if a duplicate value is entered in Column A if the criteria in the original entry has "Scheduled" in Column G.

For example: Column A Header is "Name" and Column G Header is "Status" and if there is already an entry of John in Column A with the Status of "Scheduled" in Column G in the same row then when I enter John again in Column A I'm wanting it to warn me with a message box that there is already an entry that meets the criteria.

I'm sure I'm making this a lot more complitcated than it should be, but I'm kinda stuck at the moment. Any help is appreciated.

 

[JLGWhiz]

Excel will see the change in dropdown list selections as a change. Unfortunately, Excel does not see the Change for a Combobox selection in a linked cell as a change and will not trigger the Change Event. I don't know why the code did not work if it was merged into the BeforeDoubleClick code in the correct place.. You might need to make sure that the variables from the change event code would still apply in the double click code. I just glanced over it and it seemed to me that it could just be copied and pasted and should work. You might have to step through the code to see why it does not work.

 

[bjc124]

Excel will see the change in dropdown list selections as a change. Unfortunately, Excel does not see the Change for a Combobox selection in a linked cell as a change and will not trigger the Change Event. I don't know why the code did not work if it was merged into the BeforeDoubleClick code in the correct place.. You might need to make sure that the variables from the change event code would still apply in the double click code. I just glanced over it and it seemed to me that it could just be copied and pasted and should work. You might have to step through the code to see why it does not work.

I appreciate it, I found a work around by putting it in the Lost_Focus code.

 

[JLGWhiz]

OK, I will move on to something else.
regards, JLG