【Excel VBA】僅複製數值到另一區域

VBA僅複製數值

前一篇有介紹到「複製目前區域儲存格」，但如果是有公式的儲存格(如下圖)，VBA不複製公式僅複製數值該怎麼做呢？

【Excel VBA】選取/複製目前區域儲存格

輸入巨集

※輸入以下指令※

Sub 僅複製數值到另一區域()
Range(“A1”).CurrentRegion.Copy
Range(“L1”).PasteSpecial Paste:=xlPasteValues
End Sub

語法說明

Range(“A1”).CurrentRegion.Copy
‘複製「A1」儲存格向右與向下到空白欄與空白列邊界的範圍，也就是「複製」目前區域儲存格。
Range(“L1”).PasteSpecial Paste:=xlPasteValues
‘於「L1」儲存格「貼上『數值』」

執行巨集

點選「開發人員」-「巨集」或按下「Ctrl」+「F8」快捷鍵，並「執行」巨集。

執行後即僅複製數值到另一區域。

貼上的數值沒有置中排列，我們也可以在加句語法，使數值「置中排列」。

修改語法

※輸入以下指令※

Sub 僅複製數值到另一區域()
Range(“A1”).CurrentRegion.Copy
Range(“L1”).PasteSpecial Paste:=xlPasteValues
Selection.HorizontalAlignment = xlCenter
End Sub

執行後即僅複製數值到另一區域並置中排列。

其他文章分享