vbamania.pl
login:
hasło:
 
  *Rejestracja *Zapomniane hasło
 Dziś jest piątek, 17 maja 2024 roku.
Ustaw jako stronę startową Ulubione Napisz
PowrótPowrót do serwisu  RegulaminRegulamin rssRSS

  tytuł wątku:
Wątki dyskusji

"Przeciąganie" wartości komórek po filtrowaniu


otwartyotwarty rozpoczął: saimon postów: 3



napisał: saimon
postów: 32


umieszczony:
18 września 2009
08:40

  
Teraz wszystko pięknie działa

thnx!!
napisał: Trebor
postów: 1209


umieszczony:
16 września 2009
16:45

  
Pewnie od obeznanych z tematem dostanie się mi za poniższy kod:
Selection.AutoFilter Field:=17, Criteria1:="1"
Range("k2", Range("k2").End(xlDown).Offset(0, 1)).Select
Selection.FillRight


jednak jeśli założyć, że obydwaj jesteśmy trochę na bakier z przewidywaniem złego i nie przejmujemy się poprawnością kodu to może nic złego się nie stanie.

Pozdrawiam
napisał: saimon
postów: 32


umieszczony:
15 września 2009
09:13

  
Witam,

mam następujący problem z VBA:
Filtruje sobie w moim akrusiku dane:

Selection.AutoFilter Field:=17, Criteria1:="1"



Następnie zaznaczam dane wyfiltrowane w kolumnie K

Range(Range("k2:k2", Range("k2:k2").End(xlDown)).SpecialCells(xlCellTypeVisible).Cells(1, 1), _
                      Range("k2:k2").End(xlDown)).Select



Chciałbym "przeciągnąć" lub też skopiować te dane do kolumny L (filtr cały czas założony oczywiście) i daje:

Selection.FillRight



Jednak to nie działa ponieważ dane w kolumnie po prawej się nie uzupełniają....

Help!


<-wstecz  1  dalej->
wszystkich stron: 1


Sortuj posty: z