keyboard shortcut for moving between windows

C

c_new

Hi there! I work in Excel a lot and use the Find window A LOT. I typically
search for a number, change some data, and search for the next number.
Unfortunately, I can't find a keyboard shortcut for switching between the
Find window and my spreadsheet. I realize that I can use ESC and then CTRL-F
again but I was hoping to shorten the steps. Anyone have any ideas? Or if I
can create a macro to perform this? I would just rather not use the mouse if
I can help it.
Thanks in advance for any help you can give!
Cara
 
E

Earl Kiosterud

Cara,

Frustrating, isn't it. Makes you wonder if anyone's actually using it. Try
these macros:

Dim Stuff
Sub FindStuff()
Stuff = InputBox("Enter stuff to find")
Cells.Find(What:=Stuff, After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:=False _
, SearchFormat:=False).Activate
End Sub

Sub FindStuffAgain()
Cells.Find(What:=Stuff, After:=ActiveCell, LookIn:=xlFormulas, LookAt:=
_
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:=False _
, SearchFormat:=False).Activate
End Sub

You can paste them from here a regular module in your Personal.xls.

Assign them to a keyboard shortcut (Tools - Macro - Macros - Options), like:

Ctrl-Shift-F -- FindStuff (use for prompt of first thing to find)
Ctrl-Shift-G -- FindStuffAgain (use for repeat find).

Now just use Ctrl-Shift F, and Ctrl-Shift-G.

If you're using the options in the Find dialog, you'll need to record a
macro and change the Cells.Find method to that which the macro recorder
generated. Or just change the parameters.
 
J

Jim Rech

The only keyboard way of shifting focus to the sheet that I found is pretty
ridiculous but for the record: Press F1 to open Help and Alt-F4 immediately
to close. This leaves the focus on the sheet for me in Excel 2003.

Btw, I'm assuming you're looking for something _different_ each time. If
you're looking for the _same_ thing each time then just close the Find
dialog and press Shift-F4 to go to the next when you're ready.

--
Jim
| Hi there! I work in Excel a lot and use the Find window A LOT. I
typically
| search for a number, change some data, and search for the next number.
| Unfortunately, I can't find a keyboard shortcut for switching between the
| Find window and my spreadsheet. I realize that I can use ESC and then
CTRL-F
| again but I was hoping to shorten the steps. Anyone have any ideas? Or
if I
| can create a macro to perform this? I would just rather not use the mouse
if
| I can help it.
| Thanks in advance for any help you can give!
| Cara
 
N

neopolitan

Since you are using the Find command to take you to where you want to g
on the spreadsheet, how about downsizing the spreadsheet window to sa
half-screen size and then when you click on Edit>Find, move the Fin
dialogue box off the Excel half-screen so that you can see both at th
same time
 
E

Earl Kiosterud

Good solution on the second part. And if you're changing the cell that Find
selected, you can use Ctrl-Enter instead of Enter, to keep the cell pointer
in place for the next Find.
 
C

c_new

Earl,
Thanks for the macro. I'm not at work now so I'll have to wait until
Tuesday to try it! I'll let you know how I do. This site is great.

Cara
 
C

c_new

Thanks!!! My new macro is soooo cool! Once I figured out that I had to get
rid of the spacing that came over when I copied it worked like a charm. I
ended up using Ctrl-F as my shortcut since that's what I'm used to for my
find.
I also hadn't thought of changing my window sizes so at the least the Find
window was out of my way so that worked too.
Thanks again for all the great help!

Cara
 
C

c_new

Me again... Earl, I've been using your great macro but I noticed that if I
type something that can't be found I end up getting a "Runtime Error 91:
Object Variable or With Block Variable not set". Doesn't seem to hurt - I
just End instead of Debug. But if I do debug, it highlights the following:
Cells.Find(What:=Stuff, After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, SearchFormat:=False).Activate

I just wanted to let you (and others) know. Like I said, though, the macro
is great!
Cara
 
Top