View Single Post
  #2  
Old February 20th 08, 11:02 PM posted to microsoft.public.outlook.program_vba
Eric Legault [MVP - Outlook]
external usenet poster
 
Posts: 830
Default SetFocus for control on built-in form

How about reworking your code completely and use the Replace function
against the MailItem.Body property? Then you don't have to worry about
control focus at all, and can do away with SendKeys entirely.

--
Eric Legault - MVP - Outlook
MCDBA, MCTS (Messaging & Collaboration, SharePoint Infrastructure, WSS 3
Application Development, MOSS 2007 Application Development)
Blog: http://blogs.officezealot.com/legault
Try Picture Attachments Wizard for Outlook!
http://www.collaborativeinnovations.ca


"donchanger" wrote in message
...
Is there a way to set the focus to a control on a built-in form in VBA? I
have a macro attached to a button that does a simple substitution in my
signature, but it only works if the "body" of the message has the focus
when
I click the button (I'm using SendKeys with a search and replace).

Since the form is "built-in", there is no ModifiedFormPages. Is there a
way
to set the focus? Maybe even just a keyboard shortcut?

Thanks for any help or suggestions,

Don

Code Snip:

Sub SrchRepl(Srch, Repl)
'search the message body for the first occurrence of 'srch' and replace
with 'repl'
'need to set the focus in the body (control "message") on the form
SendKeys "{F4}"
SendKeys Srch
SendKeys "{ENTER}"
SendKeys "%{F4}", True
SendKeys Repl, True
End Sub



Ads