Pełna wersja: Excel Forum - Porady, Pomoc, Excel Help, Excel FAQ
forum użytkowników Excela - makra, formuły, VBA, funkcje - porady, Excel
 
lo - fi version Excel Forum - Porady, Pomoc, Excel Help, Excel FAQ index

Uzupelnianie kolumny
Kliknij tutaj aby przejśc do pełnej wersji tematu

 
       Excel Forum - Porady, Pomoc, Excel Help, Excel FAQ Strona Główna -> Mam problem z makrem
Poprzedni temat :: Następny temat  
Litr Wysłany: 05-11-2008, 08:20  

Witam,

Gdy uzywam ponizszego rozwiazania do uzupelniania kolumny "O" to w rezultacie mam ja uzupelniona do samego konca.

Kod: Range("O1").Select
    Selection.AutoFill Destination:=Range("O:O")

Jak ja uzupelnic, ale tylko na dlugosci odpowiadajacej kolumnie "N"?
kur Wysłany: 05-11-2008, 08:31  

jeżeli odwołujesz się do jakiejś kolumny do komórki ostatniej wypełnionej
to może w ten sposób:
Kod: For i = 1 To 50000 'określasz nr wierszy
If Cells(i, "N") > 0 Then ' tu wstawiasz nr kolumny z danymi wypełnionymi
  Cells(i, "O") = "wstawiane dane" 'tu wstawiasz oznaczenie kolumny oraz funkcję, która ma być wstawiona w kolumnę
End If
Next
tkuchta1 Wysłany: 05-11-2008, 08:38  

może tak Kod: ostatnia = Cells(Rows.Count, "N").End(xlUp).Row
Range("O1").AutoFill Destination:=Range("O1:O" & ostatnia)
Litr Wysłany: 05-11-2008, 14:26  

Wielkie dzieki!
 
       Excel Forum - Porady, Pomoc, Excel Help, Excel FAQ Strona Główna -> Mam problem z makrem
Strona 1 z 1

To jest wersja lo-fi głównej zawartości. Aby zobaczyć pełną wersję z większą zawartością, obrazkami i formatowaniem proszę kliknij tutaj.



Strona używa plików cookies.

Kliknij tutaj, żeby dowiedzieć się jaki jest cel używania cookies oraz jak zmienić ustawienia cookie w przeglądarce.
Korzystając ze strony użytkownik wyraża zgodę na używanie plików cookies, zgodnie z bieżącymi ustawieniami przeglądarki.