Page 1 of 3 123 LastLast
Results 1 to 15 of 36
  1. #1
    5 Star Lounger
    Join Date
    Dec 2000
    Location
    Calgary, Alberta, Canada
    Posts
    818
    Thanks
    6
    Thanked 1 Time in 1 Post

    Re: New on the Word MVP FAQ Page

    Charles, I think this is great for you to do this. <img src=/S/cheers.gif border=0 alt=cheers width=30 height=16> I must admit, I do not always go this site as often as I should. What I would like to encourage (suggest) is that maybe the keepers of Woody's Lounge could be persuaded to set this thread you have established as a separate item itself, outside of the "WORD" discussion area...maybe call it "Word at MVP" or something similar. With this arrangement, there is little chance that your contribution would get lost in the Word discussion area.

    Your thoughts? <img src=/S/question.gif border=0 alt=question width=15 height=15> Others thoughts? <img src=/S/question.gif border=0 alt=question width=15 height=15>

    Ron M <img src=/S/smile.gif border=0 alt=smile width=15 height=15>

  2. #2
    Silver Lounger
    Join Date
    Dec 2000
    Location
    Los Angeles, California, USA
    Posts
    1,734
    Thanks
    0
    Thanked 3 Times in 1 Post

    Re: New on the Word MVP FAQ Page

    Very shortly the Lounge sofware is going to have a major upgrade. There will be a new personal 'Control Panel' where you will be able to mark and list your favorite threads such as this one. This coupled with the Search engine (just enter "Word MVP FAQ") and our StarPost feature means there is little chance of not being able to find it.
    <IMG SRC=http://www.wopr.com/w3tuserpics/Eileen_sig.gif>

  3. #3
    2 Star Lounger
    Join Date
    Dec 2000
    Posts
    188
    Thanks
    0
    Thanked 0 Times in 0 Posts

    My Response to the screen capture

    How to do a screen capture using VBA by Lutz Gentkow, with a change by me.

    It seems to me
    WordBasic.SendKeys "{PRTSC}"
    is much clearer than
    WordBasic.SendKeys "%{1068}"

    If Mr. Gentkow is trying to get ALT+PRINT SCRN to work on the active Window, and he is successful, I'd like to know. When using his code, I'm getting the entire desktop, not just the active Window. (That's the reason I left out the % sign in my version of the code)

    I used the WordBasic.SendKeys "{PRTSC}" successfully in Word 97 and Word 2000.

    TomG

  4. #4
    Silver Lounger Charles Kenyon's Avatar
    Join Date
    Jan 2001
    Location
    Sun Prairie, Wisconsin, Wisconsin, USA
    Posts
    2,049
    Thanks
    124
    Thanked 119 Times in 116 Posts

    Re: New on the Word MVP FAQ Page

    Nice thought Ron, however, each time I add something it will move back to the front. I did put a link to it in the VB/VBA forum as well.
    Charles Kyle Kenyon
    Madison, Wisconsin

  5. #5
    BAM
    Guest

    Re: My Response to the screen capture

    Hi Tom,

    Why don't you send your comments to the web master, Dave Rado: word@mvps.org
    ~~~~~~~~~~~
    Cheers!

  6. #6
    Silver Lounger Charles Kenyon's Avatar
    Join Date
    Jan 2001
    Location
    Sun Prairie, Wisconsin, Wisconsin, USA
    Posts
    2,049
    Thanks
    124
    Thanked 119 Times in 116 Posts

    Re: My Response to the screen capture

    I already did send Tom's comments to Dave using the "mail to a friend" option.
    Charles Kyle Kenyon
    Madison, Wisconsin

  7. #7
    2 Star Lounger
    Join Date
    Dec 2000
    Posts
    188
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: My Response to the screen capture

    I'm sorry, I should have mentioned that I did. The WordBasic.Sendkeys idea is OK, but both it and plain old SendKeys ignore dialog boxes, and in general Sendkeys should only be used as a last resort. (I've had a few sendkeys macros in various vendors' software run out of control on me.) One of my favorites blew away four folders in Windows 3.1 before I could hit CTRL+BREAK.

    Remember the days when we created macros in WordPerfect, then a menu changed or something like that, and the macro didn't have a clue that "whatever" was no longer 5 choices down.

    FWIW

  8. #8
    5 Star Lounger
    Join Date
    Dec 2000
    Location
    Calgary, Alberta, Canada
    Posts
    818
    Thanks
    6
    Thanked 1 Time in 1 Post

    Re: New on the Word MVP FAQ Page

    Thanks Eileen for your reply. I look forward to the upgrade. <img src=/S/cheers.gif border=0 alt=cheers width=30 height=16> and a <img src=/S/rose.gif border=0 alt=rose width=15 height=15> for the effort!

    The reason I suggested a separate item is that like a lot of others, I am a bit lazy when it comes to chasing these things and having then all in one place rather than searching for them makes it easier...no problem...the ability to mark "favourite threads" will solve all this.

    To Charles...you are right, it will bounce back to the front every time something is added and that serves another, useful purpose...a reminder to go check out the site, if I, or others, have not done so lately...bonus <img src=/S/cheers.gif border=0 alt=cheers width=30 height=16>

    Ron M <img src=/S/smile.gif border=0 alt=smile width=15 height=15> <img src=/S/smile.gif border=0 alt=smile width=15 height=15> <img src=/S/smile.gif border=0 alt=smile width=15 height=15>

  9. #9
    2 Star Lounger
    Join Date
    Dec 2000
    Posts
    188
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: My Response to the screen capture

    I should have gone to the Microsoft Knowledgebase first, like I usually do. Check Microsoft Knowledgebase Article ID: Q240653 Adapt the code to VBA in Word and you'll have both the ability to capture the entire desktop screen and the active window, without using sendkeys at all.

    FWIW

  10. #10
    New Lounger
    Join Date
    Jul 2002
    Posts
    18
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: New on the Word MVP FAQ Page

    Charles,
    What a great idea. Many thanks for posting such useful FAQ's. I found an answer about field codes that I had wanted for ages.
    Good job.

  11. #11
    Super Moderator
    Join Date
    Dec 2000
    Location
    New York, NY
    Posts
    2,970
    Thanks
    3
    Thanked 29 Times in 27 Posts

    Re: New on the Word MVP FAQ Page

    Thanks for these really helpful links, Charles.

    Regarding removing all empty paragraphs in a document, I think something just like this came up in a discussion here recently - the following was my variation on a solution that was posted by Big Al:

    <pre>Sub DeleteEmptyParas()
    Dim aPara As Paragraph
    For Each aPara In ActiveDocument.Paragraphs
    If Len(aPara.Range) = 1 Then
    aPara.Range.Delete
    End If
    Next aPara
    End Sub
    </pre>

    Besides being very economical, this approach has the benefit of being able to delete empty first and/or last paragraphs in a document and also empty paragraphs before or after tables. (It will not however do the "delete blank line at end of table cell" bit.)

    It's worth noting that deleting members of a collection, while looping through the collection, should be approached with caution (and the usual workaround is to step through the collection in reverse) - but in the case of the paragraphs collection, this seems to work fine.

    Gary

    PS: you're welcome to forward this one to Dave Rado - it would nice to see a solution from the Lounge get credited on the Word MVP pages (and not just the other way 'round)! <img src=/S/grin.gif border=0 alt=grin width=15 height=15>

  12. #12
    BAM
    Guest

    Re: New on the Word MVP FAQ Page

    Hi Gary and Al,

    One problem that I discovered with this macro is that it takes a horrendously long time! <img src=/S/bummer.gif border=0 alt=bummer width=15 height=15>

    I ran it on a 120 page document with about 2000 empty paragraph marks and it took over a full minute. Then I ran a Find/Replace macro similar to the one on the MS MVP site and it took about 5 seconds.

    Sorry guys...
    ~~~~~~~~~~~~
    Cheers! <img src=/S/smile.gif border=0 alt=smile width=15 height=15>

  13. #13
    Platinum Lounger
    Join Date
    Dec 2000
    Location
    Queanbeyan, New South Wales, Australia
    Posts
    3,730
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: New on the Word MVP FAQ Page

    <hr>it would nice to see a solution from the Lounge get credited on the Word MVP pages (and not just the other way 'round)! <hr>

    Gary,

    The author gets the credit, not the lounge.

    See , which arose from <A target="_blank" HREF=http://www.wopr.com/cgi-bin/w3t/showthreaded.pl?Cat=&Board=wrd&Number=11298&page=& view=&sb=&o=&vc=1#Post11298>this thread.

    Sometimes though it pays not to joke around.

    On the same subject, <A target="_blank" HREF=http://www.wopr.com/cgi-bin/w3t/showthreaded.pl?Cat=&Board=wrd&Number=37546&page=& view=&sb=&o=&vc=1#Post37546>this post</A> was taken seriously- Judith came from Boston especially (well, maybe not) and bought me a nice cold Aussie beer. Thanks Judith!
    Subway Belconnen- home of the Signboard to make you smile. Get (almost) daily updates- follow SubwayBelconnen on Twitter.

  14. #14
    Platinum Lounger
    Join Date
    Dec 2000
    Location
    Queanbeyan, New South Wales, Australia
    Posts
    3,730
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: New on the Word MVP FAQ Page

    As noted <A target="_blank" HREF=http://www.mvps.org/word/FAQs/MacrosVBA/DeleteEmptyParas.htm>in the aforementioned article</A>:
    <hr>(Note that using Find and Replace is dramatically faster than cycling through the Paragraphs collection).<hr>

    Thanks for putting a figure on it, BAM.

    Perhaps the best approach would be to use the MVPS approach for the bulk find/replace, and then to use Gary's for the small number of leftover empty paras at the end of after empty tables.
    Subway Belconnen- home of the Signboard to make you smile. Get (almost) daily updates- follow SubwayBelconnen on Twitter.

  15. #15
    Super Moderator
    Join Date
    Dec 2000
    Location
    New York, NY
    Posts
    2,970
    Thanks
    3
    Thanked 29 Times in 27 Posts

    Re: New on the Word MVP FAQ Page

    Thanks guys, for the feedback, and a big "whoops!" from me, for not having read Dave's article closely enough (well, somehow missing that key sentence!).

    All part of the learning experience, as my Mom often said (actually, she's still around, she just doesn't say it as often <g>).
    Now, I wonder why the Find/Replace is so much faster? - probably something to do with Find/Replace working on strings, while the other method works through a collection, hmm...

    Gary

Page 1 of 3 123 LastLast

Posting Permissions

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