.Copy
.PasteSpecial Paste:=xlPasteValues
mužeš nahradit za
.Value = .Value
Application.CutCopyMode = False pak již není potřeba.
.Copy
.PasteSpecial Paste:=xlPasteValues
mužeš nahradit za
.Value = .Value
Application.CutCopyMode = False pak již není potřeba.