複製一個Excel工作表單元格的絕對值（而不是公式）

Question

我有一個工作表，我正在使用一個宏來創建一個圖表。由於數據是工作簿中的分散在不同的工作表，我複製相同，創建一組連續的列用於創建圖表：

Sheets("Data1").Range("A29:A39").Copy Destination:=Sheets("Chart").Range("AA29:AA39") 
Sheets("Data2").Range("D29:D39").Copy Destination:=Sheets("Chart").Range("AB29:AB39") 
Sheets("Data3").Range("I29:I39").Copy Destination:=Sheets("Chart").Range("ACI29:AC39") 
Sheets("Data3").Range("D129:D139").Copy Destination:=Sheets("Chart").Range("AD29:AD39") 

我的數據是這樣的：

CustomerA   489 456 93% 
CustomerB   63 0 0% 
CustomerC   123 123 100% 
CustomerD   185 172 93% 

以上是我希望在新複製的單元格中獲得的值，而不是如何使用公式計算它們。我正在使用上面的vba進行這項工作。

如何獲取絕對值，而不是我新複製的工作表單元格中的相對公式？

Answer 1

使用Value這樣

Sheets("Chart").Range("AA29:AA39").Value = Sheets("Data1").Range("A29:A39").Value 

更新：如果你正在傾倒的數據轉換成已經格式化爲數字和百分比細胞，然後這個過程比複製和粘貼清潔。如果你需要的格式，那麼你既可以結合一個特殊粘貼formtas與上面的線或我們兩個代碼相結合，

• 獲得單元格格式數據1之間，張玉峯和圖表

• 從數據1傾倒值Chart1從步驟1更換式

  Sheets("Data1").Range("A29:A39").Copy Destination:=Sheets("Chart").Range("AA29:AA39") 
  Sheets("Chart").Range("AA29:AA39").Value = Sheets("Data1").Range("A29:A39").Value