How to Use AutoSum in a Macro (103164)


The information in this article applies to:

  • Microsoft Excel for Windows 95
  • Microsoft Excel for Windows 5.0c
  • Microsoft Excel for Windows 5.0
  • Microsoft Excel for Windows 4.0a
  • Microsoft Excel for Windows 4.0
This article was previously published under Q103164

SUMMARY

In Microsoft Excel, there is no macro function to emulate the behavior of the AutoSum tool. However, you can activate this tool from a macro by using the SEND.KEYS() function to send the appropriate keyboard shortcut (ALT+EQUAL SIGN (=)) to start the AutoSum tool.

MORE INFORMATION

Microsoft Excel version 5.0 and later

Microsoft provides examples of Visual Basic procedures for illustration only, without warranty either expressed or implied, including but not limited to the implied warranties of merchantability and/or fitness for a particular purpose. This Visual Basic procedure is provided 'as is' and Microsoft does not guarantee that it can be used in all situations. Microsoft does not support modifications of this procedure to suit customer requirements for a particular purpose. 

Sub AutoSum()
    'This macro activates the AutoSum function on the active cell.
     Application.SendKeys ("%=~")
End Sub

Microsoft Excel 4.0

The following macro activates the AutoSum function in the active cell: 

   A1:   =SEND.KEYS("%=")
   A2:   =SEND.KEYS("~")
   A3:   =RETURN()
Explanation of Above Macro
   A1:   Sends the AutoSum Keyboard Shortcut
   A2:   Sends the Enter Key
   A3:   Ends the macro
Microsoft provides macro examples for illustration only, without warranty either expressed or implied, including but not limited to the implied warranties of merchantability and/or fitness for a particular purpose.

REFERENCES

"User's Guide 1," version 4.0, pages 152, 556
"Function Reference," version 4.0, page 385
Modification Type:MinorLast Reviewed:8/15/2005
Keywords:KB103164
©2004 Microsoft Corporation. All rights reserved.