Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Create my own Class Object for Ranges, having trouble assigning name property
I created a Class called Market_Report.
I then created several instances of Market_Report in a collection called grMarket_Report_Ranges Now I am calling the object and was able to set a range to the object but cannot assign the name property. grMarket_Report_Ranges is defined as global collection. g is for global, r is for range. So the following works: ---code--- Set grMarket_Report_Ranges.Program(iRP_Array_Dimension ) = Worksheets("Calc-Codes").Range("AB7:AB" & Trim(Str(iRow_Unique))) ---code--- The following does not with or w/o a Set statement.: ---code--- grMarket_Report_Ranges.Program(iRP_Array_Dimension ).Name = "Market Report Programs" ---code--- I get a RTE 91, Object variable or with block variable not set Here is what my class looks like: 'CLASS START ------------------------- Option Explicit Private mrProgram() As Range Public Function Initialize(iDimensions As Integer) ReDim Preserve mrProgram(iDimensions) End Function Public Property Get Program(ByVal i As Integer) As Range Program = mrProgram(i) End Property Public Property Set Program(ByVal i As Integer, ByVal r As Range) Set mrProgram(i) = r End Property 'CLASS END ------------------------------------------------------------------------------------------ |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
assigning class standing based on grade | Excel Discussion (Misc queries) | |||
How to cycle through each of property and its value of Class? | Excel Worksheet Functions | |||
Cannot set HorizontalAlignment Property of the Range Class | Excel Programming | |||
Access to class property in other workbook | Excel Programming | |||
Using Property Let with a Type as member of a Class | Excel Programming |