Create a keyboard shortcut through Macro in order to copy paste special (divide)

Hello Team

I am trying to find a way to avoid all these time consuming clicks in order to copy paste special and divide.

I am always working with reports where figures need to be divided by 1000. Is there any way to:

1) run a macro through a keyboard shortcut key in order to divide all the selected cells by 1000 (ideal solution), or
2) copy 1000 from a cell and then use a macro to copy paste special and divide. (works fine as well if Option 1 is not possible).

Please find attached a very simple file. Let's assume that this is my generated report and I want to divide all the values by 1000.

Many thanks in advance
Yannis

Record a macro and assign the shortcut key you want then add this code into the Sub

Please Login or Register  to view this content.

Or create the code first and then:

1.On the Tools menu, point to Macro, and then click Macros.
2.In the Macro name box, enter the name of the macro you want to assign to a keyboard shortcut key.
3.Click Options.

4.If you want to run the macro by pressing a keyboard shortcut key, enter a letter in the Shortcut key box. You can use CTRL+ letter (for lowercase letters) or CTRL+SHIFT+ letter (for uppercase letters), where letter is any letter key on the keyboard. The shortcut key cannot use a number or special character, such as @ or #.

Note: The shortcut key will override any equivalent default Microsoft Excel shortcut keys while the workbook that contains the macro is open.


5.If you want to include a description of the macro, type it in the Description box.

6.Click OK.
7.Click Cancel

My personal preference is to do like below.

Please Login or Register  to view this content.

Or I'd just type 1000 into some out of way cell. Then select the cell & copy.
Select destination range, right click & hit "S" then "i" then Enter. (short cut for PasteSpecial, divide).