Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 703
Default Ctrl-A Fix for Excel 2003

I was able to whittle it down from all the help I got from you folks
(10/10/2007, thank-you-very-much) to something quite simple. (See below.)

I like to use control keys. I'm getting old and my right hand gets tired
from clicking all day long. (It's affecting my love life) <g

For those of you who like to use the Ctrl-A key to Select All, don't get bit
by thinking pressing it twice is selecting the entire sheet. If your active
cell is one of those buggy cells directly to the North and West of your data,
(and your data extends beyond the visible rows and columns of your window) it
may LOOK like the entire sheet is selected, but it may not be.

If you happen to have a blank row or column in the middle of your data you
may not even be getting all your data, less yet the entire sheet.

I created the following macro from other people's suggestions. I thought I
had to bind the Ctrl-A key to it every time I opened a workbook (in
Workbook_Open) but I discovered something. When I exported the macro there
was an attribute attached to it by the VB IDE. Whenever I import that module
into a new workbook it gets automatically bound to the Ctrl-A key. Nice.

Copy and paste these lines into Notepad. Save As Module1.bas, then import
the module into any workbook to fix Ctrl-A. It won't work trying to paste
the lines into the VB editor because the attribute lines need to be read in
and stripped by the IDE.

Attribute VB_Name = "Module1"
Public Sub CtrlA()
Attribute CtrlA.VB_ProcData.VB_Invoke_Func = "a\n14"
'
Dim CellAddress As String
'
CellAddress = ActiveCell.Address
Cells.Select
Range(CellAddress).Activate
'
End Sub

P.S. you can always rename the module, or in my case, I included it with all
my utilities that I always load into any new workbook.

P.P.S. The command you can enter in the immediate window to bind the Ctrl-A
key, should you need to know is:

Application.MacroOptions Macro:="CtrlA", ShortcutKey:="a"

(there is a HasShortcutKey:=True parameter, but it doesn't seem to be
necessary. Also, the "a" must be lowercase.)

Later,
Charlie

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3,986
Default Ctrl-A Fix for Excel 2003

Even though I don't use the keyboard controls very much, it was very nice of
you to come back with the information, Charlie. I am sure there are others
who will use it.

"Charlie" wrote:

I was able to whittle it down from all the help I got from you folks
(10/10/2007, thank-you-very-much) to something quite simple. (See below.)

I like to use control keys. I'm getting old and my right hand gets tired
from clicking all day long. (It's affecting my love life) <g

For those of you who like to use the Ctrl-A key to Select All, don't get bit
by thinking pressing it twice is selecting the entire sheet. If your active
cell is one of those buggy cells directly to the North and West of your data,
(and your data extends beyond the visible rows and columns of your window) it
may LOOK like the entire sheet is selected, but it may not be.

If you happen to have a blank row or column in the middle of your data you
may not even be getting all your data, less yet the entire sheet.

I created the following macro from other people's suggestions. I thought I
had to bind the Ctrl-A key to it every time I opened a workbook (in
Workbook_Open) but I discovered something. When I exported the macro there
was an attribute attached to it by the VB IDE. Whenever I import that module
into a new workbook it gets automatically bound to the Ctrl-A key. Nice.

Copy and paste these lines into Notepad. Save As Module1.bas, then import
the module into any workbook to fix Ctrl-A. It won't work trying to paste
the lines into the VB editor because the attribute lines need to be read in
and stripped by the IDE.

Attribute VB_Name = "Module1"
Public Sub CtrlA()
Attribute CtrlA.VB_ProcData.VB_Invoke_Func = "a\n14"
'
Dim CellAddress As String
'
CellAddress = ActiveCell.Address
Cells.Select
Range(CellAddress).Activate
'
End Sub

P.S. you can always rename the module, or in my case, I included it with all
my utilities that I always load into any new workbook.

P.P.S. The command you can enter in the immediate window to bind the Ctrl-A
key, should you need to know is:

Application.MacroOptions Macro:="CtrlA", ShortcutKey:="a"

(there is a HasShortcutKey:=True parameter, but it doesn't seem to be
necessary. Also, the "a" must be lowercase.)

Later,
Charlie

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
ctrl+home - Excel 2003 tiff Excel Discussion (Misc queries) 6 January 7th 08 11:27 PM
Ctrl+`(grave) does not work in Excel 2003 Smirnoff Excel Discussion (Misc queries) 3 October 19th 07 07:30 PM
MS Excel 2003 CTRL+F missing hits MS Excel 2003 CTRL+F Error Excel Discussion (Misc queries) 2 October 26th 06 12:50 PM
Select All missing, Ctrl-A not working (Excel 2003 SP2) JimO Setting up and Configuration of Excel 6 September 25th 06 01:54 AM
ctrl+F in Excel 2003 shida Excel Worksheet Functions 0 October 12th 05 11:53 AM


All times are GMT +1. The time now is 08:54 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"