创建一个加/减按钮(Microsoft Excel)
在某些计算器上,有个非常方便的小按钮:加/减按钮。按下此按钮时,将在显示屏的正值和负值之间切换任何值。例如,如果显示屏显示数字57,则按下按钮会将显示屏更改为-57。再按一次将值切换回57。
如果您希望在Excel中执行此操作的“按钮”,您将很快发现程序中没有内置按钮。您可以使用宏快速创建一个:
Sub PlusMinus1() Dim cell As Range For Each cell In Selection If Application.IsNumber(cell) Then cell.Value = cell.Value * -1 End If Next cell End Sub
请注意,宏仅在宏启动时逐步浏览您选择的任何单元格范围。检查每个单元格是否包含数字。如果是这样,则将该数字的值乘以-1。结果是切换数字符号。
宏的一个缺点是,如果单元格包含一个公式,该公式将转换为一个值,然后乘以-1值。您可能不想丢失公式。在这种情况下,您可以依靠更具区分性的宏,该宏将检查该单元格是否包含公式。如果不是,则将其简单地乘以-1。如果是这样,则将公式调整为将结果乘以-1。
Sub PlusMinus2() Dim cell As Range For Each cell In Selection If Left(cell.Formula, 1) = "=" Then Cell.Formula = cell.Formula & " * -1" Elseif Application.IsNumber(cell) Then cell.Value = cell.Value * -1 End If Next cell End Sub
您可以将这些宏之一分配给快捷键或工具栏按钮,以便随时使用。
注意:
如果您想知道如何使用此页面(或_ExcelTips_网站上的任何其他页面)中描述的宏,我准备了一个特殊页面,其中包含有用的信息。
链接:/ excelribbon-ExcelTipsMacros [点击此处在新的浏览器标签中打开该特殊页面]。
_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。
本技巧(3256)适用于Microsoft Excel 97、2000、2002和2003。可以在以下功能区中为Excel的功能区界面(Excel 2007及更高版本)找到本技巧的版本:
链接:/ excelribbon-Creating_a_Plus_Minus_Button [创建加号/减号按钮]。