Re: Keystroke formatting in Find box not working

Tech-Archive recommends: Speed Up your PC by fixing your registry

From: Larry (larry328_at_att.net)
Date: 03/10/04 

Date: Tue, 9 Mar 2004 23:17:03 -0500

Klaus,

I intercepted the commands and then put my own code in them. So when
the cursor is in a document, it works as it should. But when the cursor
is in the Find box, it doesn't have the functionality.

In any case, my question is:

> > is there a way I can determine through VBA if the
> > focus is on the Find box? If there is, then I would run the
standard
> > code for these commands if the Find box is active, and I would run
my
> > customized code if it's not.

Larry

"Klaus Linke" <info@fotosatz-kaufmann.de.no.junk> wrote in message
news:Ou1X8pkBEHA.1456@TK2MSFTNGP09.phx.gbl...
> Hi Larry,
>
> If you really intercepted the built-in commands -- Sub Bold() for
bold... --
> the keyboard shortcuts should still work in all contexts.
> If you created your own macros [say Sub myBold()] and assigned the
keyboard
> shortcuts to those macros, I don't think you can make those shortcuts
work
> in dialogs.
>
> Greetings,
> Klaus
>
>
>
> "Larry" <larry328@att.net> wrote:
> >
> >
> > I found the source of the problem. I have created macros that
intercept
> > the built-in Underine, Italic and Bold commands, and this changed
their
> > functionality so that pressing the keystrokes no longer registers in
the
> > Find box.
> >
> > I like the improvements I've made to the built-in commands. For one
> > thing, I've changed them so that the cursor doesn't have to be
inside a
> > word in order to underline or italicize it. The cursor can be just
> > touching the first or last character of the word and the command
will
> > still format the word. So I want to keep my customizations while
also
> > retaining the functionality of these commands when they are run in
the
> > Find box.
> >
> > So the question is, is there a way I can determine through VBA if
the
> > focus is on the Find box? If there is, then I would run the
standard
> > code for these commands if the Find box is active, and I would run
my
> > customized code if it's not.
> >
> > Any ideas? :-)
> >
> > I'm copying this message to the vba group.
> >
> > Larry
> >
> >
> >
>
>

Relevant Pages