logo elektroda
logo elektroda
X
logo elektroda
REKLAMA
REKLAMA
Adblock/uBlockOrigin/AdGuard mogą powodować znikanie niektórych postów z powodu nowej reguły.

[Rozwiązano] Excel VBA: Wyszukiwanie i wyświetlanie zadań z dzisiejszą datą w ListBoxie

ochenta92 27 Wrz 2020 15:11 534 6
REKLAMA
  • #1 18945777
    ochenta92
    Poziom 2  
    Posty: 3
    Cześć,
    sprawa jest taka - w pracy prowadzę ewidencję prowadzonych spraw w excelu. Żeby uniknąć kolejnego programu itd, mam już opcję zapisywania zadań na konkretną datę. Chodzi mi o to, żeby przy uruchomieniu makra, doszło do przeszukania pliku i wylistowania wszystkich spraw np na listboxie, przy których będę miał zapisaną dzisiejszą datę. Poniżej jak widać kolumna z datą kiedy ma być wyświetlone zadanie, obok nr wiersza (później się to to do czegoś innego ma przydać).
    Excel VBA: Wyszukiwanie i wyświetlanie zadań z dzisiejszą datą w ListBoxie
    Próbowałem z czymś takim, jak na razie chciałem tylko sam moduł wyszukiwania wszystkich wierszy z dzisiejszą datą:

    Kod: VBScript
    Zaloguj się, aby zobaczyć kod

    a wynik chcę umieścić tutaj:
    Excel VBA: Wyszukiwanie i wyświetlanie zadań z dzisiejszą datą w ListBoxie

    Tak aby pojawiło się tam 582 i 587.
    Szukałem czegoś podobnego na forum, ale nie widzę nic co by pasowało.
    Z góry dziękuję za pomoc.
  • REKLAMA
  • #2 18945809
    PRL
    Poziom 41  
    Posty: 6882
    Pomógł: 953
    Ocena: 891
    Cytat:
    Z góry dziękuję


    Z góry proszę o plik. Mamy sobie sami tworzyć formularz i wypełniać komórki danymi? No chyba, że chcesz odpowiedź w Paintcie.:)
    Pomogłem? Kup mi kawę.
  • REKLAMA
  • #3 18945896
    ochenta92
    Poziom 2  
    Posty: 3
    Załączam więc plik po wyczyszczeniu z danych wrażliwych.
    Załączniki:
    • Open Claims 1.1.rar (70.99 KB) Musisz być zalogowany, aby pobrać ten załącznik.
  • REKLAMA
  • REKLAMA
  • #5 18947103
    kinggustav
    Poziom 27  
    Posty: 797
    Pomógł: 93
    Ocena: 93
    Ciekawe jak szybko jedna kolumna w ListBox przestanie wystarczać? Fajnie by było widzieć więcej danych. :)
    Jeżeli trzeba będzie wiele kolumn, to mam gdzieś przykład, tylko muszę go wygrzebać.
  • #7 18955118
    ochenta92
    Poziom 2  
    Posty: 3
    Dzięki wszystkim za pomoc, ale postanowiłem obejść tą sprawę tworząc po prostu osobny arkusz. Niestety mimo tego nie osiągnąłem celu, który chciałem. Poprzez funkcje tablicowe wyszukuję zadanych dat, te zwracają mi numery przypisane odpowiednio do dat i zwracają mi odpowiednie dane, które następnie są możliwe do rozdzielenia na listy. Listy odpowiednio wprowadziłem do komórek wyboru. Obok poprzez wybranie daty ustawiam, na jaką datę ma się przestawić data, kiedy znów się wyświetli zadanie. Jedynym minusem tej metody jest brak możliwości edycji pewnej części danych, ponieważ przywołuje wartość komórki poprzez adresowanie pośrednie, więc jedynie ją nadpisuję poprzez łącz.tekst i potem podmieniam tekst w komórce - ten który był, na ten, który jest nadpisany (i w sumie na tym skończyło się tutaj użycie VBA).

    Odnośnie małej ilości danych - cała reszta danych tak na prawdę jest nieistotna w tym momencie - to numery wewnętrzne, dane do innych arkuszy, które nie mają wpływu na to, co chciałem osiągnąć. Jedynymi informacjami, które byłyby niezbędne jest numer sprawy (który i tak można zastąpić numerem wiersza) i data na którą miało być ustawione przypomnienie oraz tekst przypomnienia składający się z tekstu zapisanego w komórce oraz z dopisanej wartości. Cała reszta nie brała udziału w działaniu.

    Potrzebna jest tylko jedna kolumna - wybierająca odpowiednio najbliższą datę przypomnienia z pośród wielu kolumn różnych dat (data przypomnienia, data rejestracji, data rejestracji +14 (automatyczne przypomnienie), oraz kolumna w której jest zapisany numer sprawy.

    Także nie do końca, ale osiągnąłem zakładany wynik

Podsumowanie tematu

✨ Użytkownik poszukuje rozwiązania w Excel VBA do przeszukiwania zadań z dzisiejszą datą i wyświetlania ich w ListBoxie. Przedstawił fragment kodu, który nie działał zgodnie z oczekiwaniami. Otrzymał kilka odpowiedzi, w tym przykład kodu do inicjalizacji formularza, który dodaje zadania do ListBoxa na podstawie daty. Inni uczestnicy dyskusji zauważyli, że jedna kolumna w ListBoxie może być niewystarczająca, sugerując potrzebę wyświetlania większej ilości danych. Użytkownik ostatecznie zdecydował się na stworzenie osobnego arkusza, aby obejść problem, jednak napotkał trudności z edycją danych, co ograniczyło jego możliwości w VBA.
Wygenerowane przez model językowy.
REKLAMA