Proszę o pomoc związana z ListBoxem i pobieraniem wybranej pozycji z listy do ustalonej komórki oraz wyświetlaniem tej pozycji również jako 4 kolumny, jak to jest w pierwszym. Mam stworzoną tabelę z 4 kolumnami, która jest wczytana do pierwszego ListBoxa. ListBox ustawiłem tak, aby wyświetlał 4 wczytane kolumny i wszystko gra. Problem pierwszy pojawia...
Dzięki, dokładnie o to chodziło. Dorobiłam wyszukiwanie dla pola "Opis sali" i "Adres sali" i znów mam pytanie: - dlaczego ograniczenie listy następuje dopiero po wpisaniu spacji, tzn. w polu "txtOpisSali" wpisuję "e" i dopiero gdy wpiszę spację lista się "zawęża"? W ListBox chciałam wyświetlić nazwy kolumn, ustawiłam więc właściwość ColumnHead na "True"...
Witam, Zaczynam naukę z VBA i napotkałem następujący problem: Potrzebuję do ListBox wprowadzić dane z tabeli składającej się z 9 kolumn i np. 100 wierszy (najlepiej, żeby nie było ograniczenia). Próbuję na różne sposoby i nic... :((( Z Comboboxem sobie poradziłem jakoś: poniżej kod: Private Sub UserForm_Activate() CB_REJON.RowSource = Sheets("Arkusz1").Range("TAB_REJON...
Dziękuję za odpowiedz, z tym "leniwcem " nie tak do końca się zgodzę :), Powinienem może załączyć plik było by łatwiej, więc załączam teraz. Przy wypełnianiu listbox wszystko fajnie działa, natomiast nie odświeża mi się suma w textbox1 - chyba że kliknę (?) i jeszcze jedno czy mógłbyś rzucić okiem na : Private Sub TextBox_Tytul_Gry_Sprzedaz_Change()...
Ja zrobiłbym to w ten sposób, że dane o czasie pracy wpisywałbym do kolumny F sformatowanej jako tekst, i pierwszej wolnej np.K i sformatował ją jako czas. Dane do tabeli przestawnej brałbym z kolumny K.
Aj For k = 0 To 18 Kolumna nie moze byc 0 Worksheets("TLP").Cells(ListBox1.ListInd... k+1).Value = Controls("txt" & k & "v").Value
Tak chyba najprościej będzie. W "Module2" masz wypełnianie listy. Na wzór wstawiłem pierwsze trzy (z ośmiu). Musisz sobie tylko dopasować szerokość kolumn w Initialize oraz dopisać pozostałe. Kolejność zostawiam Tobie. W moim przykładzie zaczyna się od "model", dalej "typ" i "chipset".
Siedzę już nad tym problemem 3 dni i nie mogę sobie poradzić. Poradziłem sobie z tym, że w kontrolce „Label5” wyświetlają się liczby sformatowane z oddzieleniem tysięcy i dwoma miejscami po przecinku. Daje mi to ten zapis: Label5.Caption = Format(Round(suma1, 7), "# ### ###.00") To pozwala na szybszą orientację w wyświetlanych kwotach. Próbuję...
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...
Zauważyłem, że na tym forum jest spore grono fachowców z Excela, wiec przedstawiam swój problem, może mi ktoś pomoże. Wprowadzane są dane w tabeli - w poszczególnych wierszach. W jednej z komórek muszę wprowadzić dane związane z określoną listą (lista ta ma kilkanaście pozycji, ale o bardzo długich nazwach - więc proste rozwiązanie typu "sprawdzanie...
Witam 1. AddItem ma limit do 10 (0-9) 2. Przez AddItem nie da rady przypisać nazw jedynie przez RowSource
Metod jest kilka możesz rozszerzyć tą funkcję (czy zakres) do D i w listboxie przez np. ColumnWidths = "20;20;0;20" "ukryć" wyświetlić tylko interesujące kolumny
Witam. Próbują utworzyć ListBox w którym wyświetlało by mi dane w wielu kolumnach (dane z całego miesiąca). Niestety kod który zastosowałem pozwala wyświetlać dane tylko w max 10 kolumnach. Jednak dla przykładu napisałem kod który pokazuje co dokładnie chcę osiągnąć. Ogólnie to potrzebuję aby ListBox wyświetlił mi dane w co najmniej 38-40 kolumnach....
Dzień dobry Mam taki problem, z którym sam nie potrafię sobie poradzić. Mam stworzone useform poprzez który sa wprowadzane dane do arkusza excela. W tym useform mam okno listbox, którego zadaniem jest wyświetlanie wprowadzonych już danych celem uniknięcia powtórzen. w user form mam wpowadzone makro które pozwla by ta lista w arkuszu sie fitrowała wg...
Witam. Mam 2 problemy/zapytania z listboxem w excelu 2013. 1. Stworzyłem listboxa w userform, połączyłem z listą w arkuszu (rowsource), ale nie wiem jak zrobić że jak kliknę na liście to wybrana pozycja pojawi w wybranej komórce arkusza 2. czy jest możliwe takie stworzenie listboxów, że w zależności od wyboru w pierwszym pojawi mi się odpowiedni kolejny...
witam nie umiem poradzić sobie z ustawiwniami w ListBox. Mianowicie chcialbym aby wygladala i funkconowala jak lista forum elektrody "Temat (typ, marka, symbol, problem)" lub jak lista miesiecy w kalendarzu DTPicker. Czyli jedna kolumna i bez scroll bar. jak to zrobić? prosze o pomoc. z gory dziekuje http://obrazki.elektroda.pl/1657812500_1...
Witam serdecznie... Napotkałem problem z filtrowaniem rozwijanej listy w ComboBox Po kliknięciu w komórki kolumn C , D , E w Arkuszu1 wyświetla się okno UserForm Okno to zawiera rozwijaną listę ComboBox, pokazującą zawartość kolumny B Chcę żeby formant ComboBox wyświetlał przefiltrowaną listę kolumny B http://obrazki.elektroda.pl/7211171300_1...
witam mam problem z odpowiednim wyświetleniem danych w okienku combobox. Chciałbym żeby był jednakowy tabulator, czyli kolumna pod kolumną. Pobieram dane z bazy i wyświetlam je z comboboxie. .AddItem rst![Kategoria] & rst![Typ, nr katalogowy] rst.MoveNext Wiem że można to podzielić BoundColumn. Ale nie wiem jak zrobić żeby była kolumna pod kolumną....
Witam. Proszę o podpowiedz w jaki sposób można zwijać i rozwijać kolumnę z danymi w arkuszu Excel za pomocą rolki w myszce.
Witam Mam pytanie jak dodać zaznaczoną zawartość w listboxie do wskazanej wcześniej komórki w innym arkuszu, nadmienię iż w listboxie jest kilka kolumn które również muszą być dodane w tym samym wierszu. Poniżej załączam plik.
Witam Mam zadanie do rozwiązania i nie wiem, czy jest możliwe zautomatyzowanie opisanego poniżej procesu ??? Chodzi o Excel 2003. Mam dane liczbowe w 3 kolumnach, które mogą się powtarzać w obrębie tej samej kolumny i/lub innych pozostałych 2 kolumnach. Chodzi o porównanie tych danych i "przepisanie" do kilku kolumn w zależności od spełnionych warunków...
Witam Sprawdziłem posty do początku roku 2007 i nie znalazłem odpowiedzi na to pytanie, a mianowicie. Posiadam Excel 2003 EN i nie mam pojęcia jak odwrócić komórki tzn... 1 2 3 4 5 6 7 8 9 A Chciałbym abym miał odwrotnie, chciałbym wywrócić je na lewą stronę. 9 8 7 6 5 4 3 2 1 Tyle, że jest więcej wierszy. Wierszy jest ok 12 a kolumn ok 1000 Będę wdzięczny...
Witam. W dołączonym pliku przycisk USUŃ, usuwa każdą zaznaczoną pozycję z listy. Nie umiem sobie poradzić z tym, żeby Przycisk USUŃ usuwał również przefiltrowaną pozycję z listy po wybraniu w ramce WYSZUKAJ ADRESEM BUDYNKU. Czyli wpisuję dany adres np. Jarosławska 10. Następnie naciskam przycisk ZNAJDŹ. Podświetlam pozycję Jarosławska 10 m 14 i naciskam...
Witam, Jak zmodyfikować kod do wczytywania danych z pliku txt aby były wczytane do 2-óch oddzielnych Combobox'ów? Przykład w załączniku. Program jest narazie na starcie więc jest tylko jeden przycisk opisany kodem, reszta jest w planowaniu. Proszę o wyrozumiałość ponieważ jestem początkujący. Oto kod: Private Sub cmbwczytaj_Click() Dim InFile...
cześć, mam do Was wielką prośbę, ponieważ nie wiem jak do końca zrobić aby w combbox przypisać wartości z arkusza poza opcją Source: =Arkusz1!D8:D25 Czy istnieje aby przypisać takie wartości jakoś inaczej i pomijane były wiersze puste ? Czy ewentualnie można zrobić tak, aby dane wyświetlane w liście combbox były od najmniejszej do największej, ale żeby...
Dziękuję :D Działa. Mam jeszcze dwa pytania: Pierwsze dotyczące drukowania zaznaczonego tekstu w Listbox'ie. Chodzi o to jaka komenda ma być w CommandButton_Click jeżeli chcę wydrukować to co zaznaczyłem plus dwie kolumny dalej? czyli np: jak zaznaczę w Page1 wiersze od 01 do 15 to wydrukuje mi się zaznaczenie ale z dwiema kolumnami więcej z tym zaznaczeniem...
Wszystko mi działa, ale to sortowanie niestety nie. Mam połączenie z bazą dodaje usuwam rekordy i jest ok. Dane wyświetlam w listbox. chodzi mi dokładnie o to żeby posortować dane wg 1 kolumny czyli wg nazwy (alfabetycznie) i wyświetlić ponownie listbox.
Witam ponownie. Czy w ListBox , w którym mam ustawione np. 3 kolumny jest możliwość aby dla każdej kolumny ustawić inny zakres RowSource ? Mam trzy różne zakres i każdy z nich chciałbym wyświetlić w osobnej kolumnie jednego ListBox-a . Czy można coś takiego zrobić?
Można obejść ograniczenie ListBox'a do 10 kolumn przez załadowanie danych do zmiennej tablicowej, ale bardziej eleganckim rozwiązaniem będzie użycie kontrolki ListView zamiast ListBox.
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ć.
Tak, da się. I to na kilka sposobów -Najprościej nazwać zakresy i te nazwy umieścić na liście wyboru (list/comboBoox). -Jeśli ilość wierszy jest zawsze równa, można zastąpić powyższe mnożeniem indeksu listy. -Array i wybór wg indeksu -Tablica j.w. -Select Case Wyniki najprościej umieścić w ListBox, gdzie ilość kolumn=ilości kolumn zakresu.
Nie rozumem o co chodzi z tym leczeniem kanałowym i co to ma do dolnej kolumny... Ogólnie ciekawy pomysł... dolna kolumna... Biorąc kod marcimix wyszło takie coś: [syntax=vb]Type iCell Row As Integer Col As Integer End Type Sub ColorNext() Dim C As iCell Dim r As Range Dim tmp As Range Dim step As Integer C.Row = Excel.ActiveCell.Row C.Col = Excel.ActiveCell.Column...
Nie zaszalałeś z programowaniem... Jak przypisujesz listę do kombo? W kodzie, czy właściwościach? Lista ma indeks (od zera), więc wiersz będzie równy Kombo.ListIndex +1 Wystarczy dodać: Cells(indeks listy +1, kolumna)= Cells(indeks listy +1, kolumna) + wartość z pola Było kilka podobnych tematów, poszukaj. I trochę samodzielności kolego ;) ComboBox/ListBox...
Wartości do listboxa wpisuję funkcją AddItem.Pierwsza kolumna to wartość zmiennej, druga i trzecia to wartości z comboboxów. [syntax=vb] With Me.listbox_karata_zapisu .AddItem "" .Column(0, lp - 5) = lp_pracownika .Column(1, lp - 5) = Me.ComboBox1.Value .Column(2, lp - 5) = Me.ComboBox2.Value End With[/syntax]
1. Wstaw przycisk, najlepiej ActiveX, Menu>Wyświetl kod i wklej: Magazyn.Show 2. No, mamy. 3. Zmień w Initialize formularza: indeksy = .Range(" A 2:K" & OstW).Value na B 4 i 5 Działa przecież... A! sorry. Ma zwracać z kol.A, wyświetlać kol.B. Pkt.3 - zapomnij. Trzeba pozmieniać we właściwościach ListBox formularza.
... Jak naciśniemy w arkuszu Kosztorys pole B7 czyli to białe puste szybko dwa razy to otwiera się Listbox z wyborem danej pracy ... Wszystko działa ok ... No niezupełnie ... ' ListBox1_Click ' usuwa z komórki ' AB7 ' wartość liczbową i po zamknięciu okna nie można go już ponownie otworzyć bez wstawienia tam liczby. ... Potrzebne są tylko trzy zmiany....
Nadal klapa. Wykorzystałem podany kod, przerobiony na moje potrzeby. Wyskakuje błąd " Nie można ustawić własności RowSourse .Nieprawidłową wartość obiektu ". Mój kod wygląda tak: [syntax=vb]Private Sub CommandButton1_Click() With ListBox1 .ColumnCount = 3 .ColumnHeads = True .RowSource = "=Sheet1!A2:C6" End With End Sub[/syntax] Oczywiście dane, które...
Andie, W Listbox1 mam 5 kolumn, w ostatniej kolumnie sa ceny ktore dostaja sie tam z textbox, przeliczenie chcialbym miec za kazdym razem po dodaniu czegos do listy o ile jest to mozliwe ponizej kod, ewentualnie dwa posty wyzej zalacznik z plikiem [syntax=vbA] Function SumaListbox(LBox As MSForms.ListBox, kolumna As Integer) As Double Dim i As Integer...
Jeśli masz zainstalowany jakiś program do podglądu/edycji pdf, to wystarczy otworzyć plik przez Shell. Przy założeniach: 1. Multiselect wyłączone 2. Nazwa pliku w pierwszej kolumnie ListBox'a (jeśli jest >1) będzie coś w tym stylu (zamiast Change, może być Click) [syntax=vb]Private Sub ListaDokumenty_Change() Dim she As Object Set she = CreateObject("Shell.Application")...
Witam. Mam pytanko związane z oknem ListBox. Okno to wyświetla kolor czcionki jaki sobie ustawie. Czy jest możliwość aby w ListBox w którym wyświetlają się jakieś informacje w paru kolumnach, niektóre z tych informacji wyświetlały się w inny kolorze jaki bym potrzebował?
Cześć wszystkim! Chciał bym zapytać w jaki sposób rozwiązać zagwuzdkę jaką mam z exce'em. Chcę aby w wybranej komórce można było posortować i wybrać element z dodatkowej lisy w innym arkuszu. Czyli mam jakąś tam listę składającą się z kilkunastu komórek w jednej kolumnie. I chciałbym móc wybrać którąś z tych komórek w innym arkuszu w innej komórce wpisując...
Witam, nie wiem czy ja mam coś nie tak, czy tez mój excel (bo wg mnie co najmniej jedno z rozwiązań, których próbowałam powinno zadziałać. Mam formularz, w którym jest kontrolka RefEdit o nazwie Dane_wej oraz ListBox o nazwie Lista_kolumn. Chciałam by, w formularzu , w polu listy pojawiły się dane z pierwszego wiersza z zaznaczonego zakresu - czyli...
Witam Mam podobny problem bo chcę schować kolumny po wybraniu zakresu z PolaNazwy ( te wybrane chcę aby zostały widoczne) . Czy jest to możliwe poprzez listboxa i czy mogę poprosić o pomoc krok po kroku bo jeszcze się uczę tego narzędzia :) Dziękuje i pozdrawiam Krzysztof A może być inaczej? Przykładowo przez listbox? http://obrazki.elektroda.pl/9822597900_1...
Kod ten jest skopiowany z okna 'Temat' i sam zobacz, wpisałem dla przykładu cyfrę 5 a zapis zaczyna się i tak od wiersza 2. Sprawdź na oknie 'Vydejka' (na razie działa tam tylko dodawanie nowej pozycji). Przy okazji, w starym pliku mam do arkusza dołączony poniższy kod który ma za zadanie skopiować zawartość komórki w kolumnie 'C', jak ten kod przerobić...
Witam wie ktoś może jak zapisać całą tablicę "listbox" do pliku tekstowego? Robię to w ten sposób... Idealnie by było gdyby zapisać całą tablicę z podziałem na kolumny bez używania pętli. : D
W momencie wyszukiwania w UserForm Daty w Listbox Pomijając kwestię wyszukiwania samej daty (odpowiedź już padła dwa razy), to: 1. Co to jest " myDate " ? Pojawia się w deklaracji, a potem od razu w funkcji "Format", nie ma żadnego przypisania, a więc tylko wartość "żadną" - "Me.ListBox1 = Format( myDate , "dd/mm/yyyy")" 2. Po co kasować pole listy...
Moja baza pracowników zawiera około 1000 pracowników a każdy pracownik ma przypisane około 150 kolumn z przeróżnymi danymi. Baza jest aktualizowana prawie nonstop. Wolałbym utworzyć bazę danych w jakimś pliku tekstowym ale takim z którym dał bym sobie rady (przyznam że jeszcze nigdy czegoś takiego nie robiłem, do tej pory pracuję na bazie umieszczonej...
Aby nie otwierać nowych wątków, napiszę tutaj. Mam problem z formatem daty w 2'iej kolumnie. Wygląda tak D/M/RRRR, a chciałbym coś takiego DD-MM-RRRR. Coś tam wypociłem, ale sypało sie po sortowaniu i wracało do starego formatu. Podobnie wygląda to z godziną, wyświetla sie w postaci ułamka. Mam nadzieje, że to ostatni mój problem. Z góry dzięki za pomoc....
Ok, to najlepiej w bloku cmdDodaj_Click() za wszystkimi ifami sprawdzającymi poprawność danych dać coś takiego. Myślałem, że te dane są przeliczane na arkuszu i dopiero sprawdzane względem poprawności. Takie coś załatwia sprawę: [syntax=vb]If WorksheetFunction.CountIf(Sheets("Rejest... txt4.Text) > 0 Or _ WorksheetFunction.CountIf(Sheets("Rejest...
Witajcie, Natknęłam na mały problem podczas łączenia dwóch makr. Chciałabym, żeby po zamknęciu listy rozwijanej uruchamiało się makro kopiujące wyniki i dzielące je w kolumny - makro 'Dzielenie'. Próbowałam kilkoma różnymi sposobami, lecz bez rezultatu. [syntax=vb]Private Sub ListBox1_Change() Dim i As Integer For i = 0 To ListBox1.ListCount - 1 If...
Jeśli dane w "Kolumna5" są unikatowe, to można przez "zwykłe" kopiowanie: [syntax=vbscript]Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean) Dim wSrc As Long, wDst As Long If ListBox1.ListCount = 0 Then Exit Sub wSrc = Sheets("ARK_1").Columns(5).Find(what:=Li... lookat:=xlWhole).Row wDst = Sheets("ARK_2").Range("A" &...
Zabrałąe sie za tworzenie bazy danych i wymysliłem sobie że zrobie formularz i bedzie sam uzupełniał bazę danych i ok wyszło mi coś tam w vba napisało mi się jako tako. Ale stoję teraz pod murem mam bazę, która zawiera obecnie 1750 rekordów w 16 kolumnach. W kolumnach mam pokolei: nazwisko, imię, data zatrudnienia...... i np w ostatnich dwóch data badania...
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...
Witam, Potrzebuję pomocy. Mam zrobioną listę składającą się z wielu wierszy i kolumn w arkuszu. Za pomocą VBA ta lista wyświetlana jest w ListBoxie gdzie mam kilka textboxów i kontrolek do wprowadzania i sortowania wpisów w mojej liście. Sortowanie działa bez zarzutu, a także wyszukiwanie. Gdy wyszukuję wpisy powiedzmy po literze D, to wyskakują mi...
Czyli z tego co zrozumiałem, wynikałoby że maksymalna liczba kolumn to 10. Ale używam ComboBoxy i ListBoxy z większą liczbą kolumn. Także odwołuje się do wartości kolumn o indeksie powyżej 10 i jest ok. Także przy dodawaniu, jak wspomniałem, jeżeli na liście są już jakieś pozycje to nie ma problemu żeby dodać kolejną. Chyba że źle rozumiem ten fragment...
Nie wiem jak inni, ale mam wrażenie że czegoś tu brakuje... Nie sprawdzasz, czy zaznaczono checkbox. Od początku. Warunek pętli Do jest OK. Platforma, dedukuję, to kolumna 7 w "Magazyn" i to powinien być pierwszy filtr. Dalej, nie widzę innego wyjścia niż sprawdzanie kolejno checkbox'ów. Nie zgadnę, który czego dotyczy. Ale ogólny schemat powinien wyglądać...
Dodaję załącznik z plikiem oczywiście dane zostały zmienione. Gdy wchodzi się do pliku pojawia się na start userform wybieramy pierwszą opcję dodawania do magazynu. Gdy już będzie widoczny arkusz do wprowadzania danych to wpisujemy datę, z listboxa wybieramy selekcję następnie wpisujemy ilość w zielony textbox (jeżeli chcemy coś dodać) lub czerwony...
Witam, Piszę z prośbą o pomoc,a mianowicie potrzebuje pomocy przy wyświetlaniu zdjęć. Obecnie mam dwa ListBoxy pierwszy do wybrania numeru faktury + wtedy zmieniają mi się wszystkie dane w TextBoxach - wszystko to zaczytuje się z excela i to jest ok. Natomiast drugi ListBox obecnie służy tyko do wybrania zdjęcia - i z tego chciałbym zrezygnować Chciałbym...
Witajcie po raz kolejny potrzebuje waszej pomocy Szczerze mowiac to nawet nie za bardzo wiem jak opisac ten przypadek , ale sprobuje. W userform1 wpisuje kwote zakupu ktora jest przerzucana do userform11 jako label58 oraz textbox_punkty, nastepnie w TextBox_Klient wyszukuje klienta i po podwojnym kliknieciu dodaje punkty dla danej osoby w zaleznosci...
Witam. Mam małe pytanie. W jaki sposób można zmniejszyć margines w kolumnie listbox'a. Chodzi o to, że mam listbox'a z 35 kolumnami . W kolumnach są liczby max czterocyfrowe. Jednak aby się mieściły, właściwość .ColumnWidths musiałem ustawić na 25. Nawet przy formatce na cały ekran pojawia się dolny pasek przewijania, a tego chciałbym uniknąć. Zauważyłem,...
Witam Mam zrobić w Access'ie bazę danych która jest zaimportowana z Excel'a. Niestety to moje pierwsze starcie z Access'em więc nie mam zielonego pojęcia jak się robi co niektóre rzeczy :( Na formularzu jest listBox który wyświetla dane z tabeli (pobranej z Excel'a). Problem jest w tym jak przeedytować tą tabelę w Access'ie i jak dodać nową kolumnę?...
listbox excel kolumny listbox excel listbox filtr
głośniki studyjne piekarnik uszkodzić zaprawa wapienna
skontroluj układ wydechowy renault skontroluj układ wydechowy renault
Podajnik ślimakowy - przyczyny wyłączania się Sprawdzenie przewodu między regulatorem a ECU w Ford S-Max
