使用Excel Vba粘贴数据时出错

时间:2018-04-17 12:55:27

标签: excel vba excel-vba

我的工作表1中有17列,当我复制工作表2中的数据时,只有13列用指定的格式表2粘贴。

在那17列中,我有日期和时间戳。 13列以下的日期粘贴yyyy-mm-dd hh:mm:ss格式并粘贴超过第13列的日期(如果这是2018-03-01 03:00:00)它被粘贴为43160.125

enter image description here

我使用的代码是

sht1.Cells.Copy
sht2.Range("A1").PasteSpecial xlPasteValues

P.S:我也使用过NumberFormat,但没用。

1 个答案:

答案 0 :(得分:1)

尝试此操作(未经测试

sht1.Cells.Copy
sht2.Range("A1").PasteSpecial xlPasteFormats
sht2.Range("A1").PasteSpecial xlPasteValues
Application.CutCopyMode = False