To nie taki hop-siup: w VBA masz trochę ograniczoną liczbę obiektów którymi by można to wykonać w miarę prostu, więc trzeba samemu napisać dwa fragmenty kodu: jeden odpowiedzialny za wyłuskanie niepowtarzających się wartości z podanego zakresu i drugi, który je posortuje rosnąco (zakładając, że te dane mają być posortowane). Można by do tego wykorzystać...
Czyżby taki prosty błąd?[syntax=vb] For i = 3 To ostWrs If (InStr(1, etat, "| " & .Cells(i, 5) & " |") > 0 Or .Cells(i, 5) Like etat) And _ (InStr(1, firma, "| " & .Cells(i, 9) & " |") > 0 Or .Cells(i, 9) Like firma) And _ (InStr(1, szef, "| " & .Cells(i, 10) & " |") > 0 Or .Cells(i, 10) Like szef) And _ (InStr(1, kopalnia, "| " & .Cells(i, 11) & "...
Witam Prawdopodobnie jest, to nie tylko jest tak szybko zrobić. To praktycznie wszystko od nowa robić. I do tego, aby być trochę czasu. Tak co na to? Do UserForm1: [syntax=vb]Private Sub CheckBox1_Click() wybor End Sub Private Sub CheckBox2_Click() wybor End Sub Private Sub CheckBox3_Click() wybor End Sub Private Sub CheckBox4_Click() wybor End Sub...
Cześć, Mam 2 pytania: 1) Jak za pomocą comboboxu z nazwami miesiecy można wyszukać danych w arkuszu tylko z wybranego miesiąca? 2) Jak przenosić dane z wybranego wiersza, np:wybrane imie i nazwisko i pesel odoby do userforma2 z pytaniami, aby następnie taki zakrusz z odpowiedziami zapisac jako pdf, bez dawania konkretnej scieżki w systemie, a żeby osoba...
Proszę przedstawić efekty swoich dotychczasowych dokonań w celu rozwiązania swojego problemu.
skopiowalam twoj kod i dostosowalam do kolumn i teraz mam w formularzu w odpowiednich listach odpowiednie kolumny ale jak mam zrobic zeby mi zawezalo te listy czyli jak wybiore Suchbegrif to zostana mi przefiltrowane Selektion i tak samo Stärke tak jakbym filtrowala w Tabeli.. i teraz wyswietlaja mi sie Artikel przefiltrowane tylko przez Suchbegrif...
plik nigdzie się nie zapisuje :/ To jest w pomocy... No, trzeba zapisać :) najlepiej z wybranym typem pliku (filtr w ListBox okna dialogowego) [syntax=vb]Dim fd As FileDialog nazwaPliku = "NOWY PLIK" & ".doc" Set fd = Application.FileDialog(msoFileDialogSave... With fd .InitialFileName = "c:\" & nazwaPliku .AllowMultiSelect = False .If .Show Then ThisDocument.SaveAs...
Fajne te Twoje pytania. ;) Ile sam sie przy nich uczę. ;) Znalazłem rozwiązanie na Twoje pytanie, daj mi 10 min to poskładam to czytanie i wrzucę tu. ;) [syntax=vb] Private Sub txtNazwisko_Change() Call AktualizujListe(txtNazwisko.Text, 0) End Sub Private Sub txtZnaczek_Change() Call AktualizujListe(txtZnaczek.Text, 2) End Sub Private Sub AktualizujListe(ByRef...
Pliku, ze względu na charakter danych udostępnić nie mogę. Może tak: https://obrazki.elektroda.pl/5468719800_... Na powyższym zrzucie jest fragment Arkusza1 zawierający dane, o których pisałem w poprzednim poście. Po zastosowaniu filtra Worksheets(1).Range("$A... & Worksheets(1).Cells(Rows.Cou...
A ewentualnie taka opcja? W pliku A(o stałej nazwie) jest Makro, które: Otwiera wskazany(przez userform) plik B ze zeminną nazwą. W pliku B filtrowane są dane i kopiowane do pliku A(o stałej nazwie) do nowo utworzonej zakładki - do tej chwili wszystko mam. Teraz chciałbym aby makro przechodziło do pliku B, który wczesniej był wskazany w Userform i zamykało...
trochę nie w tej kolejności, no i te nazwy, ale... powinno działać [syntax=vbscript]Dim PicPath As Variant 'Deklaracja zmiennej, która będzie przechowywać ścieżkę pliku Dim FileFilter As String 'Deklaracja zmiennej, która będzie argumentem FileFilter Dim FilterIndex As Integer Dim Title As String FileFilter = "Pliki Graficzne, *.JP*" 'Tutaj podajemy...
Coś mi się kojarzy z tymi salami, ale kiedy to było... W każdym razie: w załączniku masz formularz z filtrem 2-poziomowym (opcjonalnie). Co prawda to typowa książka telefoniczna, ale zrobiona na tej samej podstawie.
Taki przykład. Na jednej formie mam ListBoxa, który w zdarzeniu initialize pobiera dane z tablicy1 (wcześniej załadowane od tablicy z arkusza) . Procedura w zdarzeniu Change (TextBox) filtruje dane w arkuszu (poprzez porównywanie ciągów w TextBox i arkuszu) i tworzy nową tablicę2 z pasującymi rekordami, która trafia do tego listBoxa (w miejsce tablicy1)....
A u mnie działa ten kod i to bardzo dobrze :/ a kolega pomaga czy Hejtuje ? bo jak hejtuje to F..K Hejters ! Dodano po 4 Trzeba jeszcze dodać tylko filtry odpowiednich rozszerzeń plików jakie chcemy implementować.
Witam, mam problem związany ze zobrazowaniem wartości komórek innego arkusza w danym skoroszycie w czasie gdy otwarty jest UserForm. Załączony arkusz jest "okrojony" w celu udokumentowania problemu , który napotkałem. Pytanie brzmi: Czy można tak określić reguły UserForm aby uzyskać taki efekt jaki zamieściłem w na załączonym obrazku ? (jest to sytuacja...
Generalnie z ListView wybierana jest pozycja, na której będą dokonywane dalsze operacje. Możliwych jest kilka operacji. Do każdej jest przycisk. A dodatkowo do domyślnej można użyć dwukliku. Nie jest mi na rękę uruchamianie Activate, bo mi to resetuje filtry i na nowo wczytuje listę i zmienia sortowanie. Użycie Initialize zamiast Activate nie zda niestety...
(at)clubs Hej Clubs, zauważyłem pewien "błąd". W momencie gdy wartości w kolumnie są jednakowe, kod tego nie obsługuje i pozostawia pustę pole. Rozumiem, że "usedrange.find -> xlvalues tego nie ogarnia? Stworzyłem drogę okrężną, z nanoszeniem wartości na zaznaczonych wierszach za pomocą listbox_change i objektów przy init userforma, ale wywala mi się...
Mam w moim pliku dodane okno (na poniższym screenie) na podstawie którego drukuję arkusz z odpowiednimi danymi. Ogólnie to wszystko jest OK. Poniżej jest kod który wszystko przesyła do arkusza. Okno pozwala na wydruk pojedynczej listy dla jednego pracownika. Jak zrobić aby okno miało możliwość wydrukować taki sam arkusz dla wielu pracowników? http://obrazki.elektroda.pl/3447331200_1...
Chyba błąd jest bo poprzez nieodpowiedni wpis w okienko próbujesz zdefiniować tablicę z zerową lub ujemną pozycją w pierwszym jej wymiarze Spróbuj dodać warunek i w razie braku danych zatrzymaj procedurę. Nie wiem jak wpłynie to na dalsze działanie programu. Jeżeli wyskoczą dalsze błędy trzeba by był postąpić z nimi analogicznie. Wracając do kodu myśle...
Witam, Mam bazę danych w Excelu jak poniżej. lpKod obcyProducent 1111/001 aaa 2111/002 aaa 3111/003 aaa 4111/004 aaa 5111/005 b 6111/006 b 7111/007 b 8111/008 b Stworzyłem userform w którym są dwa commandboxy (producent i kod obcy). W producent mam do wyboru aaa oraz b, dodane przy użyciu .rowsource. po wybraniu jednego nakłada się filtr i ogranicza...
Nie ja nie chcę żadnego gotowca. Wcześniej nie mogłem wstawić tego co już mam bo pisałem temat na szybko. W dalszym ciągu nie wiem jak to rozwiązać. Mam w oknie UserForms jak widać dwa pola do wyboru rodzaju daty: 1. txtMiesiac - do wyboru miesiąca 2. txtRok - do wyboru roku http://obrazki.elektroda.pl/6727683400_1... Poniższym kodem...
UserForm1 Wartość/Szanse na powodzenie: W polu wartość wpisywana jest kwota - jak zrobić, żeby po wpisaniu liczby, automatycznie formatowałaby się ona 0000,00 ZL? W przypadku pola Szanse na powodzenie - liczba automatycznie formatowana do procentów. Komentarz: Czy można wprowadzić automatyczne zawijanie tekstu? UserForm3 Zakładka Inwestycje/Projekty...
I to kolejny dowód że człowiek całe życie się uczy. Nie wiedziałem że w Excelu jest coś takiego jak ListView. Gdzie w projektowaniu UserForm jest coś takiego? Na załączonym screenie nic takiego nie mam :/ . http://obrazki.elektroda.pl/8173343700_1... Ogólnie to o taki efekt mi chodzi i coś takiego chciałbym osiągnąć. Tylko że w moich...
Dzięki bardzo (at)clubs , rozwiązanie jest OK. I jeszcze drugie pytanie o którym wspomniałem wcześniej. Po inicjalizacji okna UserForms w oknie 'Górnik' pokazuje mi odpowiednie dane, dane są już wstępnie przefiltrowane w ten sposób że pokazuje mi w oknie tylko tych pracowników którzy w kolumnie 53 mają wpis 'PRAWDA'. Jednak jak chcę dodatkowo przefiltrować...
ListIndex w combo UserForm2 nie ma zastosowania w taki sposób, ponieważ lista jest wynikiem filtrowania. Rozwiązań jest jak zwykle kilka: 1. Wielokolumnowy Combobox, gdzie wyświetlana jest tylko jedna kolumna. Po wybraniu wartości, w Label'ach umieszczamy zawartość pozostałych kolumn. 2. Klasycznie - z wykorzystaniem tablicy, tu ListIndex jak najbardziej....
Witam, Robię Userforma z coboboxami. Pierwszy combo działa jako filtr i z bazy filtruje pojedynczą daną. Wykonanie operacji w combo odzwierciedla baza. Ja bym chciał aby 2 combo zawierało listę składającą się tylko z widocznych danych przypisanych do do rekordu z combo1 i także filtrowało ale bez tworzenia tabelki pomocniczej. Całość działa super ale...
Cześć, Mam pewien problem do rozwiązanie. Może ktoś zechce mi pomóc. Potrzebuję utworzyć Okienku UserForm w excelu, które ma wybierać dane na zasadzie filtrowania i wyświetlania danych. Wszystkie dane znajdują się w pliku excel. Zawiera on 1 arkusz: dane Widok User form tak jak w pliku excel. Chodzi o to że w userform: użytkownik z listy rozwijanej...
Witam, Mam problem z makrem do wczytu pliku (skoroszytu excel). Plik co prawda jest wczytywany ale tylko pierwszy arkusz. Jak zedytowac to makro tak żeby wczytane zostały wszystkie arkusze? Procedury które mam dalej dotyczą pierwszego arkusza. [syntax=vb] Dim plik As Variant Private Sub CommandButton1_Click() Dim Filtr As String Dim Tytul As String...
Witam, mam problem z programem napisanym w Excelu 2003, sprawa wygląda tak: mam jeden arkusz z danymi zaprojektowany w ten sposób że każda kolumna zawiera dane jednej grupy produktów w początkowych wierszach następnie jest jeden wiersz z typem danej grupy produktów a następnie znajdują się kody poszczególnych produktów każdy w osobnym wierszu (jeden...
Tutaj niestety pojawił się następny problem jak przenieść mechanizm pola "Przycisku 1" arkusza "Szukanie obiektów 2" na przycisk "Nowe rozliczenie' arkusza "Zamówienia, rozliczenia 2"? Dokładniej na "Combobox1" tak aby dalej był zsynchronizowany z Label3 i Label24. Bardzo proszę chociaż o wskazówkę na "moim" poziomie. Podziwiam ludzi, którzy porywają...
Witam, Po kilku dniach męczarni nad makrem postanowiłem poprosić o pomoc. Mój problem dotyczy makra a konkretnie przycisku który ma przechodzić po widocznych wierszach. Activecell.offset(1,0).select działa ale przechodzi po kolejnych wierszach. W arkuszu założony jest filtr i nie mam pojęcia jak przejść do następnego WIDOCZNEGO wiersza. Jest to możliwe...
subwoofer filtr wzmacniacz filtr sieciowy filtr zakłócenia filtr filtr lodówka samsung filtr
zamek kabina yosan mikrofon subwoofer logitech
tabela kodów pilota kamery action
Jak podłączyć silnik trójkąt 380V do sieci trójfazowej? Adaptacja przepustnicy w Suzuki Grand Vitara 1.9 DDiS