Can a custom property be added to a worksheet?

[GVF]

I block certain procedures from running unless a worksheet is sorted in a particular fashion (ex. "Data", "Name", "DOB" etc.). I currently set a variable to hold the sortedby criteria.
Is it possible to add a custom property to worksheets? I think something like:

If mySht.SortedBy = "Data" then
dosomething
EndIf

Would be cleaner. I have attempted to add the property via a class module (Property Let, Get) but have not had any success.

Thanks...

 

[PHV]

Have a look at the CustomProperties collection of the Worksheet object.

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[GVF]

I see "customdocumentproperties" under workbooks (it's read only), but nothing under "Worksheet" or "Worksheets".
Excel 2000.

 

[SkipVought]

"customdocumentproperties"

I believe PHV suggested customproperties or the WORKSHEET object.

The following example demonstrates this feature. In this example, Microsoft Excel adds identifier information to the active worksheet and returns the name and value to the user.

Sub CheckCustomProperties()

Dim wksSheet1 As Worksheet

Set wksSheet1 = Application.ActiveSheet

' Add metadata to worksheet.
wksSheet1.CustomProperties.Add _
Name:="Market", Value:="Nasdaq"

' Display metadata.
With wksSheet1.CustomProperties.Item(1)
MsgBox .Name & vbTab & .Value
End With

End Sub

Skip,

_{Did you hear what happened when the OO programmer lost his library?...
He's now living in OBJECT poverty!}

 

[PHV]

http://msdn2.microsoft.com/en-us/library/aa214253(office.11).aspx

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[GVF]

Copied and pasted your code.
at "Worksheet1.CustomProperties.add" I get...

"Method or data member not found"

tried "customdocumentproperties", same thing.

By the way, I don't have that help page either.

 

[SkipVought]

What version of Excel. Works for 2003.

Skip,

_{Did you hear what happened when the OO programmer lost his library?...
He's now living in OBJECT poverty!}

 

[combo]

For earlier excel versions you can use sheet level names, can be hidden for the user with 'Visible' property. This is the way MS stores information in excel (autofilter, solver, external data etc.).

combo

 

[GVF]

Yea, it works in 2003 but not in 2000. Some of my users are running Excel 2000 so I will have to pass on this. Thanks for the help.

GVF