• Najnowsze pytania
  • Bez odpowiedzi
  • Zadaj pytanie
  • Kategorie
  • Tagi
  • Zdobyte punkty
  • Ekipa ninja
  • IRC
  • FAQ
  • Regulamin
  • Książki warte uwagi

VBA- szybkie pytanie o kopiowanie

Object Storage Arubacloud
0 głosów
209 wizyt
pytanie zadane 22 marca 2020 w Visual Basic przez qarq Początkujący (330 p.)
edycja 22 marca 2020 przez qarq

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ź :) 

1 odpowiedź

0 głosów
odpowiedź 22 marca 2020 przez halotelefonek Bywalec (2,410 p.)
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
komentarz 22 marca 2020 przez qarq Początkujący (330 p.)
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...

Podobne pytania

+1 głos
2 odpowiedzi 1,994 wizyt
pytanie zadane 19 marca 2021 w Visual Basic przez Jarek K. Początkujący (330 p.)
0 głosów
0 odpowiedzi 444 wizyt
pytanie zadane 1 maja 2020 w Visual Basic przez rafi-vir Nowicjusz (140 p.)
0 głosów
0 odpowiedzi 1,161 wizyt

92,666 zapytań

141,564 odpowiedzi

320,019 komentarzy

62,031 pasjonatów

Motyw:

Akcja Pajacyk

Pajacyk od wielu lat dożywia dzieci. Pomóż klikając w zielony brzuszek na stronie. Dziękujemy! ♡

Oto polecana książka warta uwagi.
Pełną listę książek znajdziesz tutaj.

Akademia Sekuraka

Niedawno wystartował dodruk tej świetnej, rozchwytywanej książki (około 940 stron). Mamy dla Was kod: pasja (wpiszcie go w koszyku), dzięki któremu otrzymujemy 10% zniżki - dziękujemy zaprzyjaźnionej ekipie Sekuraka za taki bonus dla Pasjonatów! Książka to pierwszy tom z serii o ITsec, który łagodnie wprowadzi w świat bezpieczeństwa IT każdą osobę - warto, polecamy!

...