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