loop excel makro

[andreas57]

how can i make this makro go through a hole document and do the changes liken in the first line?

Rows("2:2&quot.Select
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
ActiveWindow.SmallScroll ToRight:=5
Range("O1&quot.Select
Selection.Cut Destination:=Range("N2&quot
Range("O1&quot.Select
Columns("O:O&quot.ColumnWidth = 6
Range("P1&quot.Select
Columns("O:O&quot.ColumnWidth = 4.86
Selection.Cut Destination:=Range("N3&quot
Range("Q1&quot.Select
Selection.Cut Destination:=Range("N4&quot
Range("R1&quot.Select
Selection.Cut Destination:=Range("N5&quot
Range("S1&quot.Select
Selection.Cut Destination:=Range("N6&quot
Range("T1&quot.Select
Selection.Cut Destination:=Range("N7&quot
Range("N7&quot.Select
ActiveWindow.SmallScroll ToRight:=5
Range("V1&quot.Select
Selection.Cut Destination:=Range("U2&quot
Range("W1&quot.Select
Selection.Cut Destination:=Range("U3&quot
Range("X1&quot.Select
Selection.Cut Destination:=Range("U4&quot
Range("Y1&quot.Select
Selection.Cut Destination:=Range("U5&quot
Range("Z1&quot.Select
Selection.Cut Destination:=Range("U6&quot
Range("AA1&quot.Select
Selection.Cut Destination:=Range("U7&quot
Range("U7&quot.Select
ActiveWindow.SmallScroll ToRight:=5
Range("AC1&quot.Select
Selection.Cut Destination:=Range("AB2&quot
Range("AD1&quot.Select
Selection.Cut Destination:=Range("AB3&quot
Range("AE1&quot.Select
Selection.Cut Destination:=Range("AB4&quot
Range("AF1&quot.Select
Selection.Cut Destination:=Range("AB5&quot
Range("AG1&quot.Select
Selection.Cut Destination:=Range("AB6&quot
Range("AH1&quot.Select
Selection.Cut Destination:=Range("AB7&quot
Range("AB7&quot.Select
ActiveWindow.SmallScroll ToRight:=-9
Rows("8:8&quot.Select
Range("G8&quot.Activate

i would be very thankfull for help

andreas owen
aowen@swissonline.ch

 

[rfeenie]

you need to put in the defragmental flux capacitor over your CPU, that should sort it

 

[Dreamboat]

rfeenie: He's puncturing the space/time continuum.

Andreas: It would be a lot easier if you just typed the steps that tell exactly what you want to do. Feel free to email the spreadsheet and an explicit explanation to me. I'll help you out.

~dreamboat~
Brainbench MVP for Microsoft Word

http://www.brainbench.com

techsupportgirl@home.com
Brainbench MVP for Microsoft Word

http://www.brainbench.com