在使用Excel時，如果經(jīng)常需要將某些區(qū)域中的公式結(jié)果轉(zhuǎn)換為數(shù)值，可以使用下面的VBA代碼，并將其指定一個快捷鍵。這樣，用快捷鍵就可以快速將某些區(qū)域中的公式結(jié)果轉(zhuǎn)換為數(shù)值。方法如下：

??? 1.按Alt+F11，打開VBA編輯器，單擊菜單“插入→模塊”。

??? 2.在右側(cè)的代碼窗口中輸入下列VBA代碼：

??? Sub MakeValues()
??? Dim Rng As Range
??? Application.ScreenUpdating = False
??? Application.Calculation = xlCalculationManual
??? For Each Rng In Selection
??? Rng.Value = Rng.Value
??? Next Rng
??? Application.ScreenUpdating = True
??? Application.Calculation = xlCalculationAutomatic
??? End Sub

??? 3.關(guān)閉VBA編輯器，返回到Excel工作表界面。

??? 4.按快捷鍵Alt+F8，打開“宏”對話框。選擇“MakeValues”宏命令，點擊“選項”按鈕。

???

??? 在彈出的“宏選項”對話框中，為該宏指定一個快捷鍵，如“Ctrl+E”。

???

??? 單擊“確定”按鈕，關(guān)閉“宏”對話框。

??? 以后，無論在該工作簿的哪個工作表中，如果需要將某些區(qū)域中的公式結(jié)果轉(zhuǎn)換為數(shù)值，只需按快捷鍵“Ctrl+E”即可。其方便之處是使用了快捷鍵，較為快捷，另外還可以一次選區(qū)多個不連續(xù)的區(qū)域進行轉(zhuǎn)換，而用選擇性粘貼為數(shù)值的方法無法實現(xiàn)這一點。但其不足之處是運行宏代碼后，撤消列表中的內(nèi)容將被清空，因而無法撤消與恢復(fù)。