VBA- szybkie pytanie o kopiowanie

Question

Cześć, Szybkie pytanie odnośnie kopiowania. Mam w excellu sporo danych ułożonych kaskadowo.

x x x x x x x x x

a a a a a a a a 

y   b b b b b b b b

       y c c c c c c c c c 

 

 

Chciałbym skopiować komórki x  w komórki oznaczone jako y 

 

napisałem coś takiego : 

Sub test2()

Dim i As Long
For i = 7 To i = 96 Step 1
Activeworksheet.Cells(i, i - 1) = Activeworksheet.Cells(5, i - 1)
Next i
End Sub

 

Kiedy odpalam makro nic się nie dzieje... Gdzie popełniłem błąd?

Z góry dzięki za odpowiedź :) 

Answer 1

Nie wiem dlaczego pisałeś w ogóle coś takiego. wystarczyło skopiować wiersz z danymi x przez prawy klawisz myszki i wkleić w nowej pozycji. pozdrawiam

Comments

na schemacie źle to pokazałem, pola y leżą z przesunięciem 1,1, powinno być tak:

x x  x x x x x x x

a a a a a a a a a a

y   b b b b b b b b b b

     y c c c c c c c c c c c

        y

itd...