ben_hogan
03-17-2010, 02:55 PM
Dear Sirs,
The code up to the RIGHT step works fine, but the PasteSpecial part. Can someone please help me out telling me what am I doing wrong?
Also, I have not been able to find a reference about Expriecions, such as the definition and examples of usage.
Thank you for your help . . . .
Range("Q9:Q25").Select
Sheets("NOTE JOURNAL 3").Select
Range("T3").Select
Application.SendKeys "^{DOWN}", True
Application.SendKeys "{RIGHT}", True
PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True
The code up to the RIGHT step works fine, but the PasteSpecial part. Can someone please help me out telling me what am I doing wrong?
Also, I have not been able to find a reference about Expriecions, such as the definition and examples of usage.
Thank you for your help . . . .
Range("Q9:Q25").Select
Sheets("NOTE JOURNAL 3").Select
Range("T3").Select
Application.SendKeys "^{DOWN}", True
Application.SendKeys "{RIGHT}", True
PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True