+ Reply to Thread
Results 1 to 3 of 3

Looping folder changing - Save Preview Picture

  1. #1
    Forum Contributor
    Join Date
    02-26-2005
    Posts
    175

    Looping folder changing - Save Preview Picture

    Hi,

    I know how to loop through a folder and change something on the worksheets therein.
    On the Properties window theres a place named "Save Preview Picture" with a check box.

    I'm looking for some code, i can use in my looping code, to check and/or uncheck this feature.

    something like:
    wb.BuiltinDocumentProperties("Save Preview Picture") = "put check in box"

    I know this won't work i am using it as a example of what i'm looking for.
    thx
    Dave

  2. #2
    Norman Jones
    Guest

    Re: Looping folder changing - Save Preview Picture

    Hi Dave,

    Based on a solution propoed by Bill Manville at:

    http://tinyurl.com/c7vhb

    Try:

    Sub AddPreviewPic()
    SendKeys "^{PGUP}^{HOME}^{PGDN}+{TAB}+{TAB}+" _
    & "{TAB}-{TAB}%v{ENTER}"
    Application.Dialogs(xlDialogProperties).Show
    End Sub


    ---
    Regards,
    Norman



    "Piranha" <[email protected]> wrote in
    message news:[email protected]...
    >
    > Hi,
    >
    > I know how to loop through a folder and change something on the
    > worksheets therein.
    > On the Properties window theres a place named "Save Preview Picture"
    > with a check box.
    >
    > I'm looking for some code, i can use in my looping code, to check
    > and/or uncheck this feature.
    >
    > something like:
    > wb.BuiltinDocumentProperties("Save Preview Picture") = "put check
    > in box"
    >
    > I know this won't work i am using it as a example of what i'm looking
    > for.
    > thx
    > Dave
    >
    >
    > --
    > Piranha
    > ------------------------------------------------------------------------
    > Piranha's Profile:
    > http://www.excelforum.com/member.php...o&userid=20435
    > View this thread: http://www.excelforum.com/showthread...hreadid=472383
    >




  3. #3
    Forum Contributor
    Join Date
    02-26-2005
    Posts
    175
    Hi Norman,
    Thx much for this. This code checks the box. Also at the url you provided
    was the code to uncheck the box.

    Sub NoPreviewPic()
    SendKeys "^{PGUP}^{HOME}^{PGDN}+{TAB}+{TAB}+{TAB}-{TAB}{ENTER}"
    Application.Dialogs(xlDialogProperties).Show
    End Sub

    Thx again
    Dave
    Quote Originally Posted by Norman Jones
    Hi Dave,

    Based on a solution propoed by Bill Manville at:

    http://tinyurl.com/c7vhb

    Try:

    Sub AddPreviewPic()
    SendKeys "^{PGUP}^{HOME}^{PGDN}+{TAB}+{TAB}+" _
    & "{TAB}-{TAB}%v{ENTER}"
    Application.Dialogs(xlDialogProperties).Show
    End Sub


    ---
    Regards,
    Norman



    "Piranha" <[email protected]> wrote in
    message news:[email protected]...
    >
    > Hi,
    >
    > I know how to loop through a folder and change something on the
    > worksheets therein.
    > On the Properties window theres a place named "Save Preview Picture"
    > with a check box.
    >
    > I'm looking for some code, i can use in my looping code, to check
    > and/or uncheck this feature.
    >
    > something like:
    > wb.BuiltinDocumentProperties("Save Preview Picture") = "put check
    > in box"
    >
    > I know this won't work i am using it as a example of what i'm looking
    > for.
    > thx
    > Dave
    >
    >
    > --
    > Piranha
    > ------------------------------------------------------------------------
    > Piranha's Profile:
    > http://www.excelforum.com/member.php...o&userid=20435
    > View this thread: http://www.excelforum.com/showthread...hreadid=472383
    >

+ Reply to Thread

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1