1 2 3 4 5 6 7 8 9 10 | ВариантRange("A1:A10").Value = Range("A1:A10").ValueВариантRange("A1:A10").CopyRange("A1:A10").PasteSpecial Paste:=xlValuesApplication.CutCopyMode = FalseВ некоторых случаях, например, при работе с датами, результаты выполнения двух макросов, могут различаться. |