Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/17.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel宏仅粘贴值_Excel_Vba - Fatal编程技术网

Excel宏仅粘贴值

Excel宏仅粘贴值,excel,vba,Excel,Vba,我写了一个宏,把日期从一张纸复制到另一张纸上 Sheet1.Cells(i, 3).Copy Sheet1.Paste Destination:=Sheet2.Cells(erow, 1) 但在第1页是公式,我只想复制值。如何更改此代码以满足我的需要?使用: Sheet1.Cells(i, 3).Copy Sheet2.Cells(erow, 1).PasteSpecial xlPasteValues 或: 使用: 或: 调查PasteSpecial及其参数。Sheet1.单元格(i,3)。

我写了一个宏,把日期从一张纸复制到另一张纸上

Sheet1.Cells(i, 3).Copy
Sheet1.Paste Destination:=Sheet2.Cells(erow, 1)
但在第1页是公式,我只想复制值。如何更改此代码以满足我的需要?

使用:

Sheet1.Cells(i, 3).Copy
Sheet2.Cells(erow, 1).PasteSpecial xlPasteValues
或:

使用:

或:


调查
PasteSpecial
及其参数。
Sheet1.单元格(i,3)。复制:Sheet2.单元格(erow,1)。PasteSpecial xlPasteValues
调查
PasteSpecial
及其参数。
Sheet1.单元格(i,3)。复制:Sheet2.单元格(erow,1)。PasteSpecial xlPasteValues
正常工作。可以用边框复制值吗?很好,可以了。是否可以使用边框复制值?
Sheet2.Cells(erow, 1).Value = Sheet1.Cells(i, 3).Value