run time error 438

[whcmelvin]

Hi, i have a word document embedded in the excel. When i am trying to run it, it shows me run time error 438. Object doesn't support this property or method. I have the object at sheet1 and my the button to call it at sheet2. below is my code. please help me with this.

    Sheets("Sheet1").Shapes.Range(Array("Object 1")).Select
         Selection.Verb Verb:=xlPrimary

 

[Andrew Poulsom]

Try:

Worksheets("Sheet1").OLEObjects("Object 1").Verb Verb:=xlPrimary

The worksheet must be active to select an object on it.