Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Syntax problem
Can anyone debug this? Sub TransposeData3() sr = 1 dr = 0 For sr = 1 To 29 Step 10 ' Change 100 to suit number of rows in th source Column dr = dr + 1 Range(Cells(sr, 1), Cells(sr + 9, 1)).Select ' Select A1:A1 first loop, then A11:A20 next loop etc Selection.Copy Cells(dr, 2).Select ' Select B1 first loop, then B2 second loo etc Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True Next End Su -- unknowndevic ----------------------------------------------------------------------- unknowndevice's Profile: http://www.excelforum.com/member.php...fo&userid=2664 View this thread: http://www.excelforum.com/showthread.php?threadid=39961 |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Problem with Syntax? | Excel Worksheet Functions | |||
Syntax problem | Excel Worksheet Functions | |||
Operator syntax - VBA problem | Excel Programming | |||
Another Syntax Problem | Excel Programming |