Kategorie szkoleń | Egzaminy | Kontakt
  • 2
  • 2
  • 114

Cześć,

mam problem, może wynika on z późnej godziny i pewnie jest błahy.

 

Mam pliczek Excela z obsługa makr. W nim tworzę Suba, który ma wstawiać filtr zaawansowany, który pobiera dane z innego pliku Excela w podfolderze "base". Niby proste, jednak coś nie działa....

 

Poprosiłbym o wskazanie wskazówek, jak takie coś rozwiązać. Da radę ustawić, by wczytywało dane do filtra z innego pliku?

 

Workbooks.Open Filename:="ścieżka.....\lb_rates.xlsx"

            Windows("lb_app_modul_stawek_auto.xlsm").Activate
        
    Workbooks("lb_rates.xlsx").Sheets("wis").Range("A1:Z999999").AdvancedFilter Action:=xlFilterCopy, _
        CriteriaRange:=Workbooks("lb_app_modul_stawek_auto.xlsx").Sheets("Wyświetlanie").Range("D3:E4"), CopyToRange:=Workbooks("lb_app_modul_stawek_auto.xlsx").Sheets("Wyświetlanie").Range("B1000"), Unique:=False
        
   
        
    Windows("lb_rates.xlsx").Activate
    Windows("lb_rates.xlsx").Close
    Windows("lb_app_modul_stawek_auto.xlsm").Activate
    
        Range("B1").Select  
Łukasz_Bogucki
  • Zapytał
  • @ Łukasz_Bogucki | 08.01.2015
    • 2
    • 2
    • 4

Odpowiedzi (2)

  • 0

Może zrób filtr na miejscu, a wynik (tylko widoczne komórki) przekopiuj?

  • Odpowiedział
  • @ | 09.01.2015
  • TRENER ALTKOM AKADEMII
  • 0

Nie mogę. Bo założenie jest takie:

a)  żeby nie robić żadnych operacji/przetwarzań danych na plikach gromadzących dane

b) filtr zaawansowany będzie zbierał dane z wielu plików.

Musiałbym wrzucać skoroszyty do nowego pliku, przetwarzać i wysyłać wynik do pliku z wynikami. A tego nie chcę.

 

Mam już napisany nowy kod. Doślę go, jak przetestuję, czy działa.

Łukasz_Bogucki
  • Odpowiedział
  • @ Łukasz_Bogucki | 09.01.2015
    • 2
    • 2
    • 4