Pod przyciskiem "Wybierz Zdjęcie" mam teraz kod : [syntax=vb] Sub CommandButton4_Click() Dim CommandButton4 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 CommandButton4 = Application.GetOpenFilename(FileFilter)....
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, 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...
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ć...
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...
Hej! Potrzebuje troche pomocy z VBA i uzyciem autofiltra. Mam okno z UserForm gdzie sa 2 pola do podania danych (textBoxes). W jednym mozna podac imie osoby a w drogim nazwe miasta. Staram się zrobić kod z Autofiltr, gdzie na podstawie wprowadzonych informacji VBA filtruje mój arkusz: - Jeśli ktos podal imie osoby, to patrzy sie na kolumne Q i wyszukuje...
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...
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...
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...
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)....
(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ę...
No szkoda że temat ma ograniczoną ilość kliknięć na http://obrazki.elektroda.pl/9948249500_1... . Już tyle pomocy mi tu udzieliłeś że za każdą z nich zasługujesz na http://obrazki.elektroda.pl/9948249500_1... . Nie chcę otwierać ciągle nowych tematów skoro każdy dotyczył by jednego i tego samego pliku Dodano po 1 No a teraz mam kolejne...
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.
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...
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...
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...
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...
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....
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ć...
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, w załączonym pliku w arkuszu "Rozlicz" jest przycisk 'Nowe rozliczenie" i tu właśnie moja wiedza nie pozwala mi rozwiązać napotkanego problemu. Załączony fragment jest częścią dużo większej całości i został "okrojony" aby pokazać gdzie tkwi problem. Po wywołaniu Userform1 daną placówkę mogę wybierać przy pomocy filtra lub wpisując kolejne znaki...
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...
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...
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...
sieciowy filtr zakłócenia filtr subwoofer filtr wzmacniacz filtr filtr lodówka samsung filtr
wzmacniacz ul1111 schemat agregatu trójfazowego wzmacniacz unitra prawy kanał
manetka hulajnoga interfejs delphi
Aktualizacja BIOS w HP Mini 200-4200sw: krok po kroku Detektor zera w układzie LA1844: piny 11 i 12