In order to copy and paste a range, it need not be selected.
This should improve performance.

Sub test()
Range("a1").Copy
Range("b1").PasteSpecial xlValues
End Sub

"Andreas Szabo" wrote:

Hi Newsgroup

I have the following VBA-Code in an Excel-Sheet to copy from the clipboard:

Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone,
SkipBlanks:=False, Transpose:=True

That works good, but after the change to Office 2003 i have a performance
problem
with the Selection.PasteSpecial.

Have anyone an idea to make it fast?

Thanks and greetings
Andy