Prev: VBA
Next: Plural/Possessive Options
From: StefanH on 15 Mar 2010 09:27
This works:-

Application.ScreenUpdating = True
Application.SendKeys ("~")
CommandBars.FindControl(ID:=6382).Execute

It's horribly kludgy, probably dependant on specific timings and may well fail depending on OS, Excel version, CPU load....

It's never failed on me, but one caveat is that this will throw up the compression dialog unless the user has previously gone through the compression activity. Undoubtedly there's a registry key flagging prior use, but I've not bothered looking.

---
frmsrcurl: http://msgroups.net/microsoft.public.word.vba.general/constant-for-Format-Picture-dialog-box
 | 
Pages: 1
Prev: VBA
Next: Plural/Possessive Options