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....
Jest kilka sposobów, możesz np. wykorzystać bindowanie kontrolek do danych w tabeli: skoro masz dane w tabeli w datasecie, po podpięciu jej jako źródła danych do listboxa, .NET potrafi automatycznie "śledzić" jaki jest aktualnie zaznaczony rekord, a przy zmianie zaznaczenia zmienić wartości pozostałych, zbindowanych, kontrolek. Taki przykładowy kod...
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...
Przy pojedynczym zaznaczeniu: 1-sza kolumna wskazanaKomórka = ListBox1.Column( 0 , ListBox1.ListIndex) 2-ga kolumna ma indeks1 itd Przy multi musisz przelecieć w pętli po wszystkich wierszach listy i zapisać tylko te, których ListBox1.Selected=True
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...
Piszę na "ślepo". Nie ingeruję za mocno w twój kod, a w szczególności poprawność zastosowanego warunku w funkcji IF (nie mam po takim wyrywku wiedzy by to z sensem analizować) Zamieniłem zmienną "k" na zmienną "lp". (bo lepiej się kojarzy i przy okazji zastąpi zadanie dane zmiennej "k". Chyba o to chodziło? SDMduplikatZnalezione.AddItem lp linią: SDMduplikatZnalezione.AddItem...
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, mam listbox'a z 4 kolumn, gdzie tylko jedna jest widoczna. Listbox ma ustawioną właściwość MultiSelect. No i mam problem, ponieważ zdarza się, że źle odczytuje wartości z kolekcji.. Spróbuję to opisać.. Formularz posiada Combobox i Listbox. Wartości do Listbox'a przypisywane są kwerendą w kodzie na podstawie zawartości Combobox'a. Listbox może...
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]
Witajcie, znajomy poprosił mnie o napisanie programu dla jego radia internetowego. Generalnie całość jest gotowa, tylko pozostaje problem z wyświetlaniem pozycji w listboxie. Program do planowania emisji generuje plik *.sel, w którym opis elementu wygląda w taki sposób: ; ---------------------------------- Emi=23:26:24.374 Typ=SND Trw=04:33.818...
Aj For k = 0 To 18 Kolumna nie moze byc 0 Worksheets("TLP").Cells(ListBox1.ListInd... k+1).Value = Controls("txt" & k & "v").Value
miałem podobny problem z jedną z wersji autocada chyba 2007. Przekształciłem kod pod twój przykład. zaręczam że działa(sprawdzałem) ; D Ale u mnie przy 40 kolumnach i 200 wierszach wczytywanie zajmowało 4-5 sekund więc nie jest to satysfakcjonujące. Użyj tego jak nie będziesz miała innej opcji. W skrócie działa tak znajduje znaki pomiędzy chr(9) i wczytuje...
Podpiąłem pod bindingsource'a tabelę zaciągniętą z bazy danych sql. Następnie zaś wykorzystałem tego bindingsource'a w listbox'ie ustawiając mu jako wyświetlaną wartość kolumnę Name tabeli (ListBox.DisplayMember="Name") a jako zwracaną wartość kolumnę ID tabeli (ListBox.ValueMember="ID") - kolumna ta jest kluczem głównym tabeli i zawiera wartości typu...
Witam, potrzebuje waszej pomocy, Mam textbox1 listbox1 i textbox8 Dane z textbox1 sa przerzucane do listbox1 do kolumny 5 razem z danymi z innych textboxów. Czy jest możliwość zsumowania wartości z tej kolumny w textbox8 Z góry dziękuję za wszelką pomoc[/table]
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...
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...
Witam, Na poczatku mam pytanie czy jest mozliwosc sformatowania listboxa tak aby w jednej kolumnie pokazywal np w wierszu od 1 do 10 liczby lub tekst, a w wierszu 11 do 20 liczby procentowo lub tekst (wiem jak to ogarnac pracujac na kolumnach, ale nie moge nic znalezc jesli chodzi o wiersze) Z gory dziekuje za pomoc I pozdrawiam
Czy w tym przypadku da się wprowadzić do listbox3 np. 3 klientów z ich produktami, po czym stworzyć zlecenie które będzie łączyć moduły jeden pod drugim? - jeśli chodzi o stworzenie zlecenia z tym sobie już poradziłem. Pokaż plik bo nie wiem co zmieniłeś, ale jak będziesz miał np. tych trzech klientów to będziesz sobie nadpisywał te komórki jak D2...
Generalnie wczytuję bazę MySql dokładnie jedna kolumna(z adresami) sęk tkwi więc w tym , żeby podzielić nie inwazyjnie tę kolumnę na poziomie kodu.
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
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 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ł?
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
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ć.
Ad1. Zapoznaj się wpierw z opisami dwóch właściwości "ListBox/ComboBox", mianowicie "Column" i "List" - dostępne pod "F1". Jedna z nich dokonuje transpozycji danych zaś druga nie, co oznacza że to, co dla jednej jest np. "obszar(x,y), to dla drugiej będzie "obszar(y,x) - występuje więc zamiana miejscami wierszy z kolumnami. Dodatkowo w kodzie powyżej,...
Może ktoś wie jak pisać do poszczególnych kolumn, jest własność Columns pozwalająca na utworzenie kolumn, tylko jak pisać coś do kolumny innej niż pierwsza? Wyciąg z helpa: For Columns values greater than 0, multiple columns accommodate the items as they wrap beyond the bottom of the list box. The Columns property specifies the number of columns that...
Proszę o pomoc. Formularz zawiera listę składającą się z 9 kolumn, do których dane pobierane są kwerendą wyciągającą je z 3 tabel. Chciałbym mieć możliwość sortowania całej zawartości listy wg poszczególnych kolumn, po wybraniu przycisku opcji. Jak się do tego zabrać? Nie chcę używać ponownie kwerendy sql tylko w celu dodania do niej ORDER BY... Przyznaję,...
Witam Opiszę problem w punktach: 1. Wczytuję kolejną pozycję do arkusza i wyświetlaną w ListBox na UserForm 2. ListBox zawsze ustawia się na pierwszej pozycji i żeby zobaczyć ostatnią wczytaną pozycję muszę pionowym suwakiem zjechać w dół. Pytanie: Czy można napisać makro, jeżeli się da, aby ostatnia wczytana pozycja była widoczna i podświetlona. Próbowałem...
Witam, Miałem problem z sortowaniem danych w wielokolumnowym listbox'ie ale dzięki temu forum, a zwłaszcza dzięki (at)PRL uporałem się z tym. Teraz nieoczekiwanie pojawił się nowy problem, a nawet dwa... Ale od początku Listbox ma kilka kolumn do których dane wybierane są kwerendą z kilku tabel (nie wszystkie pola tabel są w wyniku kwerendy). Po aktualizacji...
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ć?
Uwagi: 1. Nie ustawiaj na sztywno w projekcie formatki, to co potem ustawiasz programowo - ilość kolumn "ListBox2" 2. Czytaj składnię poleceń/obiektów i ich ograniczenia - maksymalna liczba kolumn w "ListBox" to 10, a w pętli próbujesz ustawić wartości dla 13 kolumn: 912728 Po wpisaniu daty w "TextBox" klikasz pole "Data" w "ListBox1", zwrotnie do pola...
Z ukrytych kolumn w listboxie, to wiem. Tylko lista jest ograniczona bodajże do 16 kolumn, a kwerenda może wybierać łącznie więcej pól z różnych tabel. Jeśli z tabeli, to Recordset jest dobrym rozwiązaniem. Tak, z tabel. Potwierdziłeś moje przypuszczenia. Wkurza mnie przypisywanie wartości np. 20 texboxom z odczytanego rekordu i miałem nadzieję, że...
Witajcie, czy jest możliwość formatowania warunkowego w n-kolumnowym ListBox'ie? Warunek byłby zawarty w n-kolumnie.
Witam wszystkich, mam formularz a na nim listbox (1) i pola txt (2). Z założenia w listboxie ma być zaznaczony wiersz, w którym tekst z 1 kolumny = sumie wartości pól tekstowych. Metoda _AfterUpdate pola txt zawiera: Zlecenie_lista.ListCount< Zlecenie_lista.Recordset.RecordCount +1 To oznacza, że czasem nie ładuje się cała lista do Listbox (Zlecenie_lista)....
Jeśli tak było trzeba :P Niestety nigdy nie robiłem nic na stringgrid , jest gdzieś jakiś tutorial do tego ? Znalazłem ładny kod , ale sortuje tylko 1 kolumnę , potrzebne mi są 2 kolumny , w 1 wpisze punkty w 2 nazwy drużyn z tym żeby sortowało mi całe wiersze według pierwszej kolumny
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....
Masz dwa wyjścia: 1. wyszukać odpowiedniego wiersza w pętli 2. łatwiej/szybciej -dopisać kolumnę pomocniczą w arkuszu oraz kolumnę w ListBox i z niej pobierać pozycję (załącznik). Na to bym na pewno nie wpadł przy mojej wiedzy. Dlatego bardzo dziękuję. Jest Pan niezawodny i bardzo życzliwy. Jest tylko jeszcze taki problem, że chyba ten zapis : Worksheets("Rejestr").Rows(pozycja).Dele...
Excel 2003 Jest tu 14 kolumn, ListBox na Arkusz. Czy to ma byc na Fomular? Dodano po 2 Na UserForm to samo -14 kolumn Dodano po 2 doczytałem że listbox może mieć max.10 kolumn jest link do tego?
Jak wejdziesz na arkusz1 i wybierzesz jakąś komórkę z kolumny A to pokaże ci się rozwijana lista. I chodzi o to aby wpisać pierwsze litery w tej komórce a lista sama się przefiltruje i pokaże ci wyniki pasujące do kryterium. Ważne jest żeby ta zasada tyczyła się całej kolumny tak aby można ją było w dowolny sposób modyfikować.
Hmm. A co ma się znaleźć na tej liście? Jeśli tylko model, to przypisz listę pod koniec (za pętlami) procedury 'wypełnijListy' (ListBox1.List = lstModel.List). Jeśli to ma być wielokolumnowa lista z wszystkimi informacjami, to najprościej byłoby dołożyć kolumnę z unikatowymi liczbami (Np WIERSZ()) w arkuszu "Procesory" i wg listy 'lstModel' przypisać...
Set c = Arkusz6. Columns(1) .Find(Me.ListBox2.List(i, 0), LookIn:=xlValues) robiłem identycznie, ale nie wiedziałem gdzie wcisnąć odwołanie do kolumny z nr ID. Dodano po 3 Problem rozwiązał Pan Clubs. Serdeczne pozdrowienia dla tego Pana. Dzięki wielkie.
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ę?...
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? Możesz sobie dodać okno do twojego...
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. 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, jestem debilem z VBA (uświadamiam na wstępie), dlatego mam pytanka 1. Czemu kod mi śmiga dla czterech kolumn, a dla pięciu wywala mi błąd? [syntax=vbscript] Dim MyArr() As Variant Dim r As Long, i As Long, j As Integer Dim LastRow As Long With Me.ListBox1 For r = 0 To .ListCount - 1 If .Selected(r) Then i = i + 1 ReDim Preserve MyArr(1 To 4,...
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ę...
To się rozwiązuje trochę inaczej. Para imię i nazwisko nie nadaje się na klucz główny, bo np. w klasie może być dwóch Janów Kowalskich i co wtedy? Zamiast tego zakładam, że w tabeli osób masz pole Id, klucz główny typu integer (w SQL Server ustawione jako Is Identity na true), jeżeli nie masz - to stwórz takowy. Wówczas masz przynajmniej dwie opcje...
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...
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, 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...
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...
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ć...
Witam Wszystkich Odpowiem od razu na pytania nie szukam gotowca, nie używałem exela chyba z 7 lat i wolał bym zrobić to na SQL i PHP :D Mam zadanie nie na moje siły i czas. Potrzebuję zrobić w exelu co jest jak dla mnie dziwną opcją bazę magazynu w której wyszukuje produkt wpada to do boxa z całą (3 kolumny) nazwą po niżej dodaję wielkość i ilość zamówienia...
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...
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. Chciałem zbudować playlistę do odtwarzacza multimedialnego w oparciu o tę kontrolkę. Wiem, że można by zbudować na listboxie, ale listbox nie posiada kolumn tylko wszystko dodaje jak leci. Chciałbym również na listview zrobić tzw drag and drop żeby z np z pulpitu przeciągać pliki na playlistę. W jaki sposób mogę zapisać do pliku/odczytać z pliku...
Witam Szukam jakieś książki (coś w tym rodzaju) w której byłby poruszany problem kombinatoryki pod kątem VB czy Delphi, dzięki której mógłbym rozwiązać podobny problem: Mam w dwóch listboxach kolejno podane w wierszach dane: a,b,c i w drugiej -,+. Danych w kolumnach może być więcej bądź mniej. Cały sprawa polega na tym aby z tych danych z tych kolumn...
Da się zrobić (w skrócie): - Tworzysz nowy formularz. - Kładziesz na niego 4 wspomniane pola (najlepiej tekstowe, choć z datą będzie "kłopot", przycisk (szukaj) oraz tabelę (ja w roli tabelki polecam kontrolkę o nazwie listbox). - Do zdarzenia "click" przycisku szukaj wstawiasz kod - który ustawia źródło danych (row source) wspomnianego listbox'a jako...
...ListView, który jest inną kontrolką niż ListBox (ma inne właściwości i inaczej się do niego ładuje dane). Ten sposób ListView2.ListItems = "'BAAN 3'!G8:K97" ładowania danych NIE JEST poprawny dla ListView, zapomnij o nim. To działa tylko z ListBox'em. USUŃ z formy wszystkie ListBoxy które tam miałeś... Zamiast nich wstaw i skonfiguruj...
Witam Mój ostatni problem polega na tym, że dane jakie umieszczam w bazie danych są nie po kolei tak jak mam je ułożone w listboxie albo w pliku. Zadaniem pisanego programu jest właśnie importowanie danych z ww. źródeł do bazy. W projekcie bazy jest kolumna z autonumeracją dzięki czemu po jej sortowaniu (w accesie) kolejność danych wraca do normy. (Jeśli...
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...
Przy zmianie typu danych kolumny na decimal (18,3) i wpisaniu kwoty w formacie z kropką dostaję błąd Input string was not in a correct format. przy linii [syntax=csharp] decimal a = decimal.Parse(txtCost.Text); [/syntax] Próbowałem też drugiej opcji czyli konwersji przy SELECT'cie ale coś nie mogę tego złożyć do kupy Zrobiłem próbny program składający...
Wybacz, ale mam wrażenie że w ogóle nie masz pojęcia co ten kod robi? Wiem, że jesteś nowicjuszem, ale jak piszesz jakiś kod to wypada przynajmniej wiedzieć, co robi linijka którą piszesz... Masz dwa, a właściwie trzy głupie błędy w zapytaniu metody loadcolumnname. VS powinien to wyrzucić w jakimś błędzie przy próbie wykonania tego zapytania. tego samego...
Cześć, tworzę wielozadaniowy UserForm (paczka załączona poniżej): 1032673 Po pokonaniu początkowych trudności, nie mogę poradzić sobie z zadaniem ComboBoxowi wczytywania danych z zewnętrznego zamkniętego pliku, co jest kluczowym zagdnieniem. Tzw. "elegancja" rozwiązania tj. czy zewnętrzny plik będzie się otwierał i zamykał, ma dla mnie drugorzędne znaczenie,...
Znalazłem problem . Z listą wszystko było w porządku . Coś mnie podkusiło żeby do drugiej kolumny listboxa wprowadzać wartości drugą pętlą i tutaj był błąd Po zmianie wszystko działa bezbłędnie . Rozwiązanie problemu: [syntax=vbscript]For Each komorka In zlecenia znalTekst = LCase(komorka.Value) If InStr(1, znalTekst, szukanyTekst) > 0 Then lstZnalezione.AddItem...
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ć...
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...
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...
Można jeszcze inaczej to zrobić. Najpierw wpisanie do ComboBox nazw zakresów komórek w arkuszu:[syntax=vb] Private Sub UserForm_Initialize() Dim zakres As Name For Each zakres In ActiveWorkbook.Names ComboBox1.AddItem zakres.Name Next If ComboBox1.ListCount > 0 Then ComboBox1.ListIndex = 0 End Sub [/syntax] Po wywołaniu zdarzenia Change ComboBox1 pokazane...
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...
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...
działa:D bardzo dziękuje :) mam jeszcze jedno pytanko: Jak użytkownik wybierze towar+ jego ilość to chciałabym aby w oknie TextBox wyświetliła mi się cena za ten towar za daną ilość. Czy ja to mogę zrobić w oknie TextBox i tam wpisać kod np: TextBox1.Value=IloscTowaru*worksheets("m... Chciałam tu do okna TextBox...
Witam wszystkich i proszę o wskazówki do niżej przedstawionego polecenia: 1.Wykonaj projekt (Wersja 1) obiekty: TextBox, przycisk Czytaj oraz Zapisz, obiekt Listbox 2.Przycisk czytak wykonuje: -wprowadza nazwę pliku z danymi (InputBox), nr punktu początkowego i końcowego (obiekty TextBox) -czyta z pliku współrzędne xp i yp dla punktu początkowego oraz...
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 ! Napisałem kiedyś program dla taty który gromadzi stałe dane kontrahentów, można je wyszukać dopisać zmienne i wygenerować pliki do wydruku. Wpisów zrobiło się dość sporo i na wyszukiwanie trzeba czekać ;( miałem coś takiego: Jak zoptymalizować wyszukiwanie i wykluczyć powtórzenia wyszukiwanych wierszy gdzie ciąg znaków pojawia się kilkukrotnie...
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")...
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...
... 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....
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...
Witam, mam problem szukajac tu na forum zrobilem tylko poczatek czyli polaczylem sie z baza danych [syntax=csharp]private void button1_Click(object sender, EventArgs e) { SqlConnection myConnection = new SqlConnection(); myConnection.ConnectionString = "Data source = Server\\SQLEXPRESS; User ID=it;Password=1234; DataBase=it"; myConnection.Open(); InitializeComponent();...