Microsoft Excel复制并粘贴date格式
任何人都可以帮助我复制和粘贴，但保持数据的格式为date和所有数字的所有数字。 所以例如我有客户ID应该是3位数（000），并且date是date格式。 但是当我复制和粘贴时，date变成了一个奇怪的整数，ID变成1位数。 这是现在的输出
复制自：
001 AVC BDE 130 6/23/2013
当我粘贴它成为：
客户ID名称types数量date1 AVC BDE 130 41448
谁能帮忙？ 这是我的代码
ActiveSheet.Range("A1:F1").Copy wkbDisplayOrder.Worksheets("Customer's Order").Select ActiveSheet.Range("A1:F1").PasteSpecial Paste:=xlPasteValues 假设你对复制字段中的格式感到满意，那么你可以做一个简单的粘贴而不是粘贴特殊的。 现在你的代码只是粘贴值，因为这一行：
Paste:=xlPasteValues
你也可以把它改成这个：
Paste:=xlPasteValuesAndNumberFormats
试试这个代码（联合国testing）
ActiveSheet.Range("A1:F1").Copy wkbDisplayOrder.Worksheets("Customer's Order").Select ActiveSheet.Range("A1").NumberFormat = "@" ActiveSheet.Range("E1").NumberFormat = "MM/dd/yyyy" ActiveSheet.Range("A1:F1").PasteSpecial Paste:=xlPasteValues