• 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
202 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,948 wizyt
pytanie zadane 19 marca 2021 w Visual Basic przez Jarek K. Początkujący (330 p.)
0 głosów
0 odpowiedzi 433 wizyt
pytanie zadane 1 maja 2020 w Visual Basic przez rafi-vir Nowicjusz (140 p.)
0 głosów
0 odpowiedzi 1,123 wizyt

92,543 zapytań

141,384 odpowiedzi

319,487 komentarzy

61,929 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

Kolejna edycja największej imprezy hakerskiej w Polsce, czyli Mega Sekurak Hacking Party odbędzie się już 20 maja 2024r. Z tej okazji mamy dla Was kod: pasjamshp - jeżeli wpiszecie go w koszyku, to wówczas otrzymacie 40% zniżki na bilet w wersji standard!

Więcej informacji na temat imprezy znajdziecie tutaj. Dziękujemy ekipie Sekuraka za taką fajną zniżkę dla wszystkich Pasjonatów!

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!

...