Getting reference to an OLEObject from another cell?

[tomerdr]

I wonder if a cell can contain a property value of an OLEObject in
another cell?

Assume i have two columns,the first contains OLEObject the second
should contains

OLEObject.Object.Caption


Thanks in advance.

 

[NickHK]

This works, but you should add error handling:

Public Function GetOLEProp(OLEName As String) As String
GetOLEProp = Application.Caller.Parent.OLEObjects(OLEName).Object.Caption
End Function

NickHK

 

[tomerdr]

This works, but you should add error handling:

Public Function GetOLEProp(OLEName As String) As String
GetOLEProp = Application.Caller.Parent.OLEObjects(OLEName).Object.Caption
End Function

NickHK









- Show quoted text -

Thanks it is working...almost...the cell wouldn't update when i am
changing the caption.

Can i force recalculation of a range?

Thanks in advance.

 

[NickHK]

Changing the caption from the properties does not result in a recalculation.
If you are doing it in code, you can call one of the .Calculate methods and
add the .Volatile in the function

Public Function GetOLEProp(OLEName As String) As String
Application.Volatile
GetOLEProp = Application.Caller.Parent.OLEObjects(OLEName).Object.Caption
End Function

NickHK