| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
CallByName in Excel for Fill object
Thank you very much for your time and help.
I am trying to access the Fill object in Excel, by its name. The object is instancenable, becuse the the following command works. Set o1 = Excel.ActiveWorkbook.Sheets(1).Shapes(1).Fill How the command below returns the error 438 - object does not support this property or method. Set o2 = Excel.ActiveWorkbook.Sheets(1).Shapes(1) Set o3 = CallByName(o2, "Fill", VbGet, Empty) Can you please help me resolve this problem or find a work around? Thank you very much for your help. |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
CallByName in Excel for Fill object
This worked for me -
Set o2 = Excel.ActiveWorkbook.Sheets(1).Shapes(1) Set o3 = CallByName(o2, "Fill", VbGet) MsgBox TypeName(o3) ' FillFormat as did - Set o3 = o2.Fill Regards, Peter T "bv0001" wrote in message ... Thank you very much for your time and help. I am trying to access the Fill object in Excel, by its name. The object is instancenable, becuse the the following command works. Set o1 = Excel.ActiveWorkbook.Sheets(1).Shapes(1).Fill How the command below returns the error 438 - object does not support this property or method. Set o2 = Excel.ActiveWorkbook.Sheets(1).Shapes(1) Set o3 = CallByName(o2, "Fill", VbGet, Empty) Can you please help me resolve this problem or find a work around? Thank you very much for your help. |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
CallByName in Excel for Fill object
Dear Peter thank you very, very much!
"Peter T" wrote: This worked for me - Set o2 = Excel.ActiveWorkbook.Sheets(1).Shapes(1) Set o3 = CallByName(o2, "Fill", VbGet) MsgBox TypeName(o3) ' FillFormat as did - Set o3 = o2.Fill Regards, Peter T "bv0001" wrote in message ... Thank you very much for your time and help. I am trying to access the Fill object in Excel, by its name. The object is instancenable, becuse the the following command works. Set o1 = Excel.ActiveWorkbook.Sheets(1).Shapes(1).Fill How the command below returns the error 438 - object does not support this property or method. Set o2 = Excel.ActiveWorkbook.Sheets(1).Shapes(1) Set o3 = CallByName(o2, "Fill", VbGet, Empty) Can you please help me resolve this problem or find a work around? Thank you very much for your help. |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Camera Object - how to set default Fill = Transparent | Excel Discussion (Misc queries) | |||
| Example for VBA function - CallByname! | Excel Discussion (Misc queries) | |||
| callbyname in XL 2K and XL 2003 | Excel Programming | |||
| Confusion about how the Window object fits into the Excel object model | Excel Programming | |||
| Using CallByName for conversion function | Excel Programming | |||
Hybrid Mode
