Compile Error Method or data member not found

E

ExcelMonkey

Been using John Walkenbach's Color Pallette code. It was working fine until
I imported the module into a new file. I have been using it in XL2000.
However I am not in XL 2003 and getting a Compile Error.

The line: Function GetAColor() As Variant is highlighted in yellow and the
line: .ColorButton = in the line: Set Buttons(ButtonCount).ColorButton = ctl
is highlighted in grey.

Does this have something to do with XL 2003?

Function GetAColor() As Variant
' Displays a dialog box and returns a
' color value - or False if no color is selected
Dim ctl As Control
Dim ButtonCount As Integer
ButtonCount = 0
For Each ctl In UserForm1.Controls
' The 56 color buttons have their Tag property set to "ColorButton"
If ctl.Tag = "ColorButton" Then
ButtonCount = ButtonCount + 1
Set Buttons(ButtonCount).ColorButton = ctl
If WorkbookIsActive Then
' Get colors from the active workbook's palette
Buttons(ButtonCount).ColorButton.BackColor = _
ActiveWorkbook.Colors(ButtonCount)
Else
' Get colors from this workbook's palette
Buttons(ButtonCount).ColorButton.BackColor = _
ThisWorkbook.Colors(ButtonCount)
End If
End If
Next ctl
UserForm1.Show
GetAColor = ColorValue
End Function
 
J

Jim Thomlinson

Check for a missing reference. Whene there is a missing reference the oddest
things get flagged as errors. Tools -> References (look for anything that
starts with missing)
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top