Save preview picture

[Charlotte E.]

Hi,


Under the workbook properties tab, there's a checkmark called 'Save
preview picture'.

How to read/set this setting by VBA code?


Thanks,

CE

 

[GS]

Hi,

Under the workbook properties tab, there's a checkmark called 'Save
preview picture'.

How to read/set this setting by VBA code?


Thanks,

CE

I'm not sure but this might be included in the functionality wrapped in
the DsoFile.DLL component!

--
Garry

Free usenet access at http://www.eternal-september.org
Classic VB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.vb.general.discussion

 

[Peter T]

Under the workbook properties tab, there's a checkmark called 'Save
preview picture'.

How to read/set this setting by VBA code?


Thanks,

CE

AFAIK the only way is with SendKeys, try this

SendKeys "^{PGUP}^{PGUP}^{HOME}^{PGDN}%V+{ENTER}"
Application.Dialogs(xlDialogProperties).Show

To turn off change that "+" to a "-"

Regards,
Peter T

 

[Charlotte E.]

The SendKeys solutions works, but can it really be true that there's no
way of accessing this by standard VBA-code, when you can access all the
rest of the workbook properties?!?

Did Microsoft forget/oversee this option???
Pr, what's the reason for keeping this one out?

Do we need an API call for this???


CE


Den 08.05.2013 16:12, Peter T skrev:

 

[GS]

The SendKeys solutions works, but can it really be true that there's

no way of accessing this by standard VBA-code, when you can access
all the rest of the workbook properties?!?

Did Microsoft forget/oversee this option???
Pr, what's the reason for keeping this one out?

Do we need an API call for this???

I looked deeper into DsoFile and see that it only handles
SummaryDocument and Custom properties. So then, if there's an API that
would duplicate what Peter's sendkeys does I expect it would be
SendMessage. This would require getting the handle of the properties
dialog as well as knowing what parameters to pass.

--
Garry

Free usenet access at http://www.eternal-september.org
Classic VB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.vb.general.discussion