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

question-closed Dynamiczna iteracja po nr rzędu

Object Storage Arubacloud
0 głosów
312 wizyt
pytanie zadane 19 września 2023 w Visual Basic przez magda_19 Gaduła (3,080 p.)
zamknięte 19 września 2023 przez magda_19

Cześć, piszę kod, który ma czytać zawartość tabelki (dla przykładu - wypełnionych 5 rzędów) i wkleić treść od komórki H5 w dół, w zależności od ilości wypełnionych wierszy.(zdjęcie dla przykładu)

Mój kod wygląda tak. Na razie generowanie tesktu rozpoczyna się z komórki H5.

Nie do końca wiem jak napisać aby generowanie rozpoczynało się od H5 i szło w dół tyle ile jest wierszy w tabeli. Dodatkowo, są odwołania na sztywno do 5. wiersza, a docelowo miałyby się zmieniać w zależności od rzędu

 Private Sub Generuj_Click()

Dim i As Integer

table = Range("E5", Range("F5").End(xlDown)).Rows.Count
Range("E5", Range("F5").End(xlDown)).Select

'Range("E5").Select

For i = 1 To table
    Range("H5").Select
    'Text = Range("H5", Range("H5").End(xlDown)).Rows.Count
    Range("H5") = "Inwestycja w spółkę " & Worksheets("Spolki").Range("E5") & " w kwocie przypadającej na PFR " & Worksheets("Dashboard").Range("C3") & " FIZ: " & Worksheets("Spolki").Range("F5") & " " & Worksheets("Dashboard").Range("C9")

Next i

Application.ScreenUpdating = True

End Sub

 

komentarz zamknięcia: rozwiązane

Podobne pytania

0 głosów
0 odpowiedzi 300 wizyt
+1 głos
2 odpowiedzi 107 wizyt
pytanie zadane 21 września 2023 w Visual Basic przez magda_19 Gaduła (3,080 p.)
0 głosów
1 odpowiedź 102 wizyt
pytanie zadane 20 września 2023 w Visual Basic przez magda_19 Gaduła (3,080 p.)

92,653 zapytań

141,536 odpowiedzi

319,931 komentarzy

62,021 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!

...