Replies

That sound file will do it

try

Sheet2.Shapes(“Object 1”).OLEFormat.Verb

where “Object 1” is the name of the inserted Sound file
and
Sheet2 is your sheets CODE NAME, not the sheets tab name.

Hi John
Here is a cut down version of how I got the Constants. I just changed one variable to get what you want. ie the Parent Property as well as the constants
I was meaning to post this (Well NOT this version as this is a smaller one) to my site a while ago. I just never got around to it.
HTH

Absolutely …. go for it……

and thanks for your list…..it highlighted the fact that they didn’t include the prior versions (<Xl97) Const . which means
they probably won't support ??/ backwards compatibilty for these version. But this is just a guess.

Thanks again John

Absolutely …. go for it……

and thanks for your list…..it highlighted the fact that they didn’t include the prior versions (<Xl97) Const . which means
they probably won't support ??/ backwards compatibilty for these version. But this is just a guess.

Thanks again John

Hi John, thanks for those useful links.

OK, I got 167 diff between yours and mine.
An interesting one that wasn’t on my list but on yours was xlXMLData = 47
Doing a debug print in the imediate Window yielded nothing ?

I believe ?? the diff are that these Const are Microsoft Excel 5.0, 7.0 const and that your ones
are from XL97 onwards??

Any way here is my list.

Thanks again for your links.

Hi John, thanks for those useful links.

OK, I got 167 diff between yours and mine.
An interesting one that wasn’t on my list but on yours was xlXMLData = 47
Doing a debug print in the imediate Window yielded nothing ?

I believe ?? the diff are that these Const are Microsoft Excel 5.0, 7.0 const and that your ones
are from XL97 onwards??

Any way here is my list.

Thanks again for your links.

Try something like

Application.Run “‘Yourworkbookname.xls’!Sheet1.CommandButton1_Click”

Try something like

Application.Run “‘Yourworkbookname.xls’!Sheet1.CommandButton1_Click”

Have a look here @ Colo’s example

http://puremis.net/excel/code/080.shtml%5B/url%5D

(Above URL made clickable by HansV)

Have a look here @ Colo’s example

http://puremis.net/excel/code/080.shtml%5B/url%5D

(Above URL made clickable by HansV)

or just

AppActivate (“Microsoft word”)

or just

AppActivate (“Microsoft word”)

There are a number of ways to do this.

have a look @ this example

You may have inadvertenly turned it off by clearing the status bar area ….
You can try turning it back on via code.

Application.StatusBar = False