Aj For k = 0 To 18 Kolumna nie moze byc 0 Worksheets("TLP").Cells(ListBox1.ListInd... k+1).Value = Controls("txt" & k & "v").Value
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...
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ć.
Może(w jednym programie ). Nie może w tym samym UserForm kilka UserForm_Initialize lub UserForm_Activate etc. Witam, Nie wiem czy dotarł ostatni post dotyczący możliwości znalezienia kodu. O co mi chodzi ? Przy wprowadzaniu zmian w Properties udało mi się dodać do "ListBox-a" kolumnę z polami "MultiSelect" . Metodą dedukcji oznacza to, że jeśli taka...
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]
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...
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".
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.
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.
Witam. Tym razem piszę bo mam problem z kolumnami w ListBox. Mam w LisBox ustawione 12 kolumn w których mają mi się wyśietlić dane. Poniższy kod miałby to zrobić. Problem w tym że kod wysypuje mi się przy 11 i 12 kolumnie. Wydaje mi się że kod jest ok ale tych dwóch kolumn nie chce mi wyświetlić danych. Dlaczego? Co jest nie tak z kodem? [syntax=vb]Sub...
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ć?
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.
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.
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....
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" &...
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...
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"...
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...
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...
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...
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ł?
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.
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()...
... 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....
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")...
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...
Zależy w jakim kontekście. Jeśli chodzi ci tylko o wyszukanie danej daty, to najprościej: Find, Do...Loop, itd. Natomiast, jeśli chciałbyś następnie użyć "położenia" daty jako koordynaty dla pozyskania danych z innych kmórek, to bardzo "pożyteczna" byłaby funkcja "Match", którą można by użyć w konstrukcji: " Cells(wiersz, kolumna).Value " , gdzie wiersz...
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ć...
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....
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...
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...
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...
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ć...
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
jak zrobić by po wyborze numeru zamówienia w comboboxie :?: i wpisaniu ilości sztuk w textboxie :?: właśnie o tą wartości powiększają się ilość :?: w komórce wiersza :?: w którym jest zamówienie wybrane z comboboxa :?: Nie jasne gdzie (w którym arkuszu) ? chcesz prowadzić te rozliczenia :cry: Natomiast ilości na asortyment :?: są zliczane w arkuszach...
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 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
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...
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...
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...
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ę?...
excel listbox listbox excel kolumna listbox
oporność głośnik sterowanie radiem kenwood stm32 własny bootloader
płyta indukcyjna elektrolux sterownik pompy ciepła
Krups EA8908 - komunikat "Odłączyć i ponownie" Krups Evidence EA81 – mokre fusy w pojemniku, wilgotna kawa po parzeniu, regulacja młynka
