我的工作表1中有17列,当我复制工作表2中的数据时,只有13列用指定的格式表2粘贴。
在那17列中,我有日期和时间戳。 13列以下的日期粘贴yyyy-mm-dd hh:mm:ss格式并粘贴超过第13列的日期(如果这是2018-03-01 03:00:00)它被粘贴为43160.125
我使用的代码是
sht1.Cells.Copy
sht2.Range("A1").PasteSpecial xlPasteValues
P.S:我也使用过NumberFormat,但没用。
答案 0 :(得分:1)
尝试此操作(未经测试)
sht1.Cells.Copy
sht2.Range("A1").PasteSpecial xlPasteFormats
sht2.Range("A1").PasteSpecial xlPasteValues
Application.CutCopyMode = False