将单元格从一个工作表复制并粘贴到另一个工作表,并将其乘以一个值

时间:2014-12-03 07:49:17

标签: excel vba excel-vba

Worksheets(stockcode & "_CF_" & marketcode).Range("B11").Copy
Worksheets(stockcode & "_Stock ratio_" & marketcode).Range("D16").PasteSpecial

我运行这两行代码从一个工作表复制并将其粘贴到另一个工作表上。在它的中间,我想在粘贴到最后一个工作表之前将它乘以-1。有什么办法吗?

1 个答案:

答案 0 :(得分:0)

因为你只想复制一个单元格而且它(希望)是一个你可以写的数字:

Worksheets(stockcode & "_Stock ratio_" & marketcode).Range("D16") = Worksheets(stockcode & "_CF_" & marketcode).Range("B11")* -1