View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Andy Pope Andy Pope is offline
external usenet poster
 
Posts: 2,489
Default Passing Custom Class Variables through Functions

Hi,

As it is an object you need to use the Set command.

Set SSheet = ChangeOffSet(SSheet)

and in the function

set ChangeOffSet = SSheet

Cheers
Andy

Xiazer wrote:
I am trying to pass a custom class through a function, I can watch the
variable, it gets passed to the function but when it goes to be
returned I get this error,
*Object doesn't support this property or method (Error
438)*
Am I doing the syntax wrong or something, here is the function.
Function ChangeOffSet(SSheet As SSched)
' This Sets the Offset of the Variables
If (SSheet.WorkMonth + SSheet.DaysOn) -
SSheet.DaysOff < 0 Then
SSheet.WorkMonth = (SSheet.WorkMonth +
SSheet.DaysOn)
Else
SSheet.WorkMonth = SSheet.WorkMonth +
(SSheet.DaysOn)
End If

ChangeOffSet = SSheet

End Function

When I call it It looks like this
I use the same variable names.
*SSheet = ChangeOffSet(SSheet)*

Thanks a bunch



--

Andy Pope, Microsoft MVP - Excel
http://www.andypope.info