I have this code for 10 Command Buttons to change the font colour. This is part of a much larger piece of code, but to simplify it, I am just using this code:
Sub ForeColour() Sheet1.Cat1.ForeColor = &HC0& Sheet1.Cat2.ForeColor = &HFF0000 Sheet1.Cat3.ForeColor = &HFF0000 Sheet1.Cat4.ForeColor = &HFF0000 Sheet1.Cat5.ForeColor = &HFF0000 Sheet1.Cat6.ForeColor = &HFF0000 Sheet1.Cat7.ForeColor = &HFF0000 Sheet1.Cat8.ForeColor = &HFF0000 Sheet1.Cat9.ForeColor = &HFF0000 Sheet1.Cat10.ForeColor = &HFF0000 End Sub
In Excel 2003, this code works instantaneously, but I am trying to run the same code in Excel 2000 and it takes 10 seconds. Is there any way that I can speed this up in Excel 2000?
The original file was created in Excel 2003, but I have created a new file in Excel 2000 with the 10 buttons on it and the code and it still takes 10 seconds.
Thanks for any help.