Command Button Info. help

[Harley78]

I have command buttons on 32 sheets that are labeled (eg. 1234560000 and so on) and are highlighted when selected.

Current Code:
If CommandButton28.BackColor = RGB(255, 255, 0) Then CommandButton28.BackColor = RGB(255, 255, 255) Else CommandButton28.BackColor = RGB(255, 255, 0)
Range("A33").Value = 1
If CommandButton28.BackColor = RGB(255, 255, 255) Then Range("A33").Value = ""


Now I want to make one sheet with all part numbers and when any box is yellow it will go to the "Complete List" tab and look through Column C for the part number. When it finds this number it will place the qty in Column B.

Its very simular to the original, but instead of doing this on the same sheet I am combining all selection from the different sheets to one. Can anyone point me in the right direction?

 

[BrianB]

Need to write a routine that goes through each button in each sheet & checks the colour. (?)