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 Proszę o pomoc. Jaki popełniam błąd w kodzie dla...
Witam wszystkich serdecznie Mam malutki problem z polem combobox od kilku dni próbuję wczytać wartość do ComboBox-a. Pole działa prawidłowo jeżeli chcę wybrać dane z rozwiniętej listy ComboBox-a w userForm. Czy jest możliwe abym odczytał dane z komórki np Activecell.offset(0,5) a jednocześnie mógł zmienić wartość rozwijając listę. Przy zapisie nie mogę...
Witam, Od jakiegoś czasu staram się posługiwać VB, z jakimś nienajgorszym skutkiem jednak z rzeczami trudniejszymi gorzej:). Czy można powiązać ze sobą : 1. Wartość z textboxa ze definiowaniem listy do comboboxa? CHodzi mi o to że w textboxie pojawia mi się miasto i wg tego miasta w comboboxie miała by się pojawić odpowiednia lista klientów. 2. Jak...
Dzień dobry, Przy wykorzystaniu Userform wprowadzane są dane da arkusza. Arkusz traktowany jest jako swego rodzaju baza danych. Jedna z kolumn tworzy nazwany dynamiczny zakres: "PESELW" [ =PRZESUNIĘCIE(DaneOsobowe!$B$2;0;0;ILE.N... ]. Następnie ten zakres wykorzystany jest do wygenerowania listy w combobox: [syntax=vbscript]...
Witam! Mam taki problem. Umieściłem na swojej stronie listę rozwijaną typu ComboBox (polecenie select). Chciałem, aby po wybraniu odpowiedniej pozycji listy otwierała się właściwa strona (konkretnie chodzi o wybór kategorii galerii foto). Nie mogę jednak w żaden sposób tego powiązać, PHP nie widzi tych danych. Czy ma ktoś na to jakąś metodę?
Witam! Mam mały problem. Zabrałem się za stworzenie skryptu java, w którym za pomocą listy rozwijanej można sterować wyświetlaniem różnych stron. Wszystko działa prawie dobrze, poza jednym drobiazgiem. Jak zmusić skrypt do wyświetlania stron w innym oknie niż to, w którym jest skrypt umieszczony? A oto skrypt: <SCRIPT LANGUAGE="JavaScript">...
Mam problem z rozwijaną listą w combobox'ach. Listy te zapełniam przy użyci poniższych poleceń: Me.ComboBox9.RowSource = Range(Cells(3, 21), Cells(33, 21)).Address ' data Me.ComboBox10.RowSource = Range(Cells(3, 22), Cells(14, 22)).Address i w zasadzie wszystko działa OK, ale jednak czasami lista jest...
Witam. Mam dwa pytania i prośbę o pomoc. W załączonym pliku zrobiłem wniosek z oknem 'Forms' który ułatwia mi jego wypełnianie. Jednak mam mały problem jak zrobić żeby w oknie ComboBox pojawiła się cala lista pracowników która jest w osobnym arkuszu 'Lista pracowników'? I jeszcze jedno pytanko jak zablokować czerwony przycisk zaznaczony na screenie...
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, 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 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...
Witajcie. Mam w excelu na formatce combobox który przez RowSource zaciąga jakiś zakres danych np (A2:C40). Na rozwijanej liście combo wyświetlam dane z kolumny "A" wspomnianego zakresu. Jak w polu tekstowym comboboxa zaczynam coś wpisywać pojawiają się sugestie/podpowiedzi zaczerpnięte z listy rozwijanej combobox. Jak zrobić aby podczas wpisywania w...
Witam jestem początkujący jeśli chodzi o programowanie i poszukuje cały czas rozwiązania umożliwiające wyświetlenie nazw tabel w comboboxie, jezyk to VB.net, baza danych Access połączanie sterownikiem OLDB, programuje w Visual studio 2015. Bardzo proszę o pomoc.
Witam, Mam problem z ComboBox do formularza (UserForm1) dodałem listę (comboboxa) Problem polega na tym, że nie mogę wpisać wartości wybierlanch do listy [syntax=vb] -------------------- Wersja 1 Sub ComboBox2_Change() ComboBox2.Clear With ComboBox2 Select Case ComboBox2 Case "User" .AddItem = "PS" .AddItem "JS" End Select End With --------------------...
Witam Tworzę sobie klasę samochod i w tej klasie mam utworzony obiekt samochod1 i samochod2, jak zrobić, żeby w combobox1 pojawiała mi się lista do wyboru utworzonych obiektów (samochód1, samochód2) i żeby np. w combobox2 wyświetlał mi sie kolor wybranego samochodu. ( przykładowo w combobox1 wybieram samochod1 a w combobox2 wyswietla mi sie jego kolor,...
A może jeszcze byś napisał czy robisz winforma czy może w Excelu coś skubiesz... ogólnie zdefiniować ilość dni możesz tak... [syntax=vbnet] dim Next100Day As Date = DateAdd(DateInterval.Day, 100, DateTime.Now) [/syntax] to sto dni do przodu z minusem będzie do tyłu, możesz użyć również miesięcy lub lat... [syntax=vbnet] dim Next2Month As Date = DateAdd(DateInterval.Month,...
Nie mogę sobie poradzić z załadowaniem listy z godzinami do ComboBox. W Excelu stworzyłem ładną listę z sformatowanymi godzinami: 1:00 2:00 itd., niestety w oknie zobaczyłem to: 945334 Mam taki kod programu: Private Sub UserForm_Initialize() ComboBox1.AddItem "" For x = 0 To 11 Step 1 ComboBox1.AddItem (Arkusz5.Cells(10, x...
łatwiej w userformie wypunkować coś pod daną nazwą parę razy niż oddzielnie pokazywać. Tu nie byłbym taki pewien. Zrób coś z dublami (nie wiem jakiego typu masz dane), może zakres listy pobieraj z dwóch kolumn posortuj i dopiero podstaw jako listę combobox'a
[syntax=vb]ComboBox1.ListIndex[/syntax] Tylko że ListIndex zaczyna liczyć od 0 więc jeżeli chcesz poznać wiersz to : [syntax=vb]wiersz=ComboBox1.ListIndex+1[... Ale jeżeli listę pobierasz nie od pierwszego wiersza arkusza należy dodać liczbę wierszy od pierwszego do wiersza w którym zaczyna się początek listy czyli np: [syntax=vb]wiersz=ComboBox1.ListIndex+1....
Witam, mam problem z listą rozwijaną Combobox2, w Combobox1 wszystko jest w porządku - po wybraniu pierwszych znaków pojawia się lista rozwijana. W Combobox2 nie mogę jej uzyskać. Oto kod: [syntax=vbscript]Private Sub UserForm_Initialize() Dim ost As Long With Arkusz1 ost = .Cells(.Rows.count, "C").End(xlUp).Row If ost = 2 Then ComboBox1.AddItem .Range("C3").Value...
Koledzy pomożecie z takim drobiazgiem. Bo mam zaćmienie. Private Sub UserForm_activate() Sheets("LISTA").Activa... Dim a As Integer a = 4 + ComboBox1.Value Me.ComboBox3.RowSource = Range(Cells(4, 3), Cells(a, 3)).Address Jeśli Combox1 ma wartość jest OK ale jeśli jest puste wyskakuje błąd nr 13 i nie...
Witam, Lista jest ładowana na bieżąco, ponieważ listy filtrowane się zmieniają za każdym wpisaniem litery. Ma działać i działa tak że po wpisaniu jednej litery w Combobox2 lista się zawęża o wszystkie pozycje które taką literę posiadają i tak w kółko, aż nie wybiorę jednej pozycji z listy Combobox2. Niestety jak w kolejnym Combobox kliknę kursor aby...
Czy zamiast poniższego : Worksheets("Arkusz2").OLEObjects("ComboB... = "Nazwa_firmy3" można wstawić jakiś inny kod Można tu wstawiać każdy inny kod :idea: :D ale zawsze musisz wiedzieć co wstawiasz :?: i w jakim celu :?: :D Obecnie - do nie wiadomo w jakim celu stworzonego ComboBoxa :cry: z listą firm pobraną z zakresu: 'Robocze':F6:F34...
Witam Mam utworzony form1 i form2. W form 1 mam combobox1 z rozwijana lista elementów. Mam tez button, który włącza drugi Form2, a tamten ukrywa i taki sam button mam w form2. Wybieram sobie z listy rozwijane comboBox1 jakiś element i przechodzę buttonem do form2. Problem polega na tym, ze po powrocie z form2 do form1 wartość w combobox1 ustawia się...
Witam, Jak w temacie. Combobox o nazwie SMkolor w userformie, próbuję dodać listę z innego arkusza(Kolor) niż aktywny(mogą różne arkusze), problem w tym, że nie wiem jak napisać kod który dodał by tylko pola wypełnione z pierwszej kolumny arkusza "Kolor". Czy mógłby ktoś miły pomóc? Dodano po 55 Jakby co to sobie już poradziłem, wklejam kod... może...
Witam, Mam mały problem w Excelu. ComboBox1 ma załóżmy 10 wierszy, klikam, żeby rozwinąć listę. Na obecną chwilę .Value = "" ponieważ nic jeszcze z listy nie zostało wybrane. 1. Jeśli wybiorę 8 wiersz myszką, .Value = "osmy wiersz" a ComboBox1_Click() wykonuje mi np funkcję WybranoOsmyWiersz() czyli zaszły zdarzenia Change oraz Click 2. W sytuacji jeśli...
Po prostu wpisuje nazwe? Bo w zaden sposob nie moge zmusic COMBOBOX`a po uruchomieniu do tego zeby rozwinela mu sie jakakolwiek lista, samych elementow ktore wpisywalem tez nie posiada, bo wiadomo, moznaby wybrac cos np strzalkami na klawiaturze, czy rolka po zaznaczeniu comboboxa. W czym moze tkwic problem?
Mój program swoją bazę czerpie z bazy Access. Również z innego pliku Access do pola combobox przypisany jest Data Source, przez co mam listę w menu rozwijanym. Czy da się tak ustawić, aby np. domyślnie pierwszy wpis z Data Source pojawiał się w polu comboboxa. W tej chwili to pole jest puste, dopiero jak rozwinę menu to mogę coś wstawić lub ręcznie...
[syntax=vbscript]Private Sub ComboBox1_Change() [F1] = ComboBox1 End Sub Private Sub OptionButton1_Click() Me.ComboBox1.RowSource = "Arkusz1!A1:A5" [F1] = ComboBox1 [E1] = "litera" End Sub Private Sub OptionButton2_Click() Me.ComboBox1.RowSource = "Arkusz1!B1:B5" [F1] = ComboBox1 [E1] = "cyfra" End Sub Private Sub UserForm_Initialize() Me.OptionButton1...
Witam :) Chciałbym dodać sobie rozwijaną listę do formularza, mianowicie chciałbym aby po wybraniu jakiejś pozycji z listy wpisywał się przypisany odpowiednio TEKST do formularza. Podam fragment kodu aby to lepiej zobrazować ;) <script type="text/javascript"> function doStuff() { var txt = ""; if (document.getElementById("i...
Nie wiem jak zrobić by z comboBoxa można było wybrać 2 bądz więcej numerów katalogowych Nie da się. Musiałbyś wykorzystać pole listy z ustawionym MuliSelect na wartość 1 lub 2. Następnie sprawdzać cała listę i działać warunkowo (if Listbox.Selected(indeks/licznik pętli)=true then) Ewentualnie umieścić dodatkowe, wielowierszowe pole listy z pionowym...
Najszybciej zmień tu z 'hide' na 'unload' (hide ukrywa przez co nie odświeża ci się lista) [syntax=vbscript]Private Sub CommandButton1_Click() 'kliknij w wprowadz_nowy 'Me.Hide 'zamknij poprzednie okno Unload Me UserForm1_1.Show 'pokaż nowe okno End Sub[/syntax]
No powielasz kod który napisał admas_nt [syntax=vb]Private Sub Workbook_Open() Dim oSheet As Excel.Worksheet Dim oCmbBox1 As MSForms.ComboBox Dim oCmbBox2 As MSForms.ComboBox Dim oCmbBox3 As MSForms.ComboBox Set oCmbBox1 = Sheets("Kombi").ComboBox1 Set oCmbBox2 = Sheets("Kombi").ComboBox2 Set oCmbBox3 = Sheets("Kombi").ComboBox3 oCmbBox1.Clear oCmbBox2.Clear...
opracowałem kod ale chyba coś nie działa Private Sub lista_Change() Dim n As Integer, i As Integer n = Sheets("arkusz1").Range("a").CurrentRegi... - 1 i = Sheets("arkusz1").Range("1").CurrentRegi... - 1 lista.Value = Range("1").Offset(n, 0).Value wy.Caption = Range("a").Offset(i, 0).Value End Sub
Witam, w arkuszu mam 150 list rozwijanych typu combobox Makro ma wybrać 5 z nich i załadować do nich dane Listy mają nazwy Lista_1_01, Lista_2_01, Lista_3_01, Lista_4_01, Lista_5_01 z tym że ostatnie 2 cyfry zmieniają się od 01 do 30 i są brane z komórki F1 z tego względu że nie potrafię zrobić tego inaczej, napisałem coś takiego: [syntax=vbscript]Sub...
Albo tak. W przykładzie użyłem dwa pola kombi AciveX i troszeczkę kodu dla ComboBox1.
Hm może tak. Panowie lesławek, oraz clubs - bardzo dziękuję za pomoc. Oba zaproponowane rozwiązania działają, nauczyły mnie kolejnych nowych rzeczy i jestem za to bardzo wdzięczny. Gdyby ktoś był ciekawy jak wygląda finalny kod (być może jest więcej takich laików jak ja), to podaje go poniżej: [syntax=vbscript] Option Explicit Dim tbl() As Variant...
Witam. Tym razem przy projektowaniu mojego pliku utknąłem przy ComboBox i ListBox- a dokładnie, dodania do nich ewentualnych możliwości jeśli oczywiście jest taka opcja. Jeśli chodzi o ComboBox: czy jest możliwość aby w ComboBox umieszczonym w oknie UserForm wybrać coś z rozwijanej listy i aby to co wybiorę pozostało w tym ComboBox nawet po restarcie...
Znowu coś sknociłem. tak fajnie dało sie wybierać wartości w karcie zdarzenie z comboboxów a teraz nie mogę ustawić żadnych wartości w datamember albo valuemember..i oczywiscie nie da sie wybierac w oknach combobox.
Bo Kolega niedokładnie czyta - a może ja nie dość to zaakcentowałem... ;) W kodzie #4 są dwa connection stringi, jeden zakomentowany. Ten zakomentowany jest dla plików xlsx , ten odkomentowany - dla plików xls . Używają innych wersji aparatu danych, i dla łączenia z xlsx musisz zakomentować (lub usunąć) ten pierwszy, a odkomentować drugi. Druga sprawa...
Witam Mam problem w budowie makara, które odeśle mnie do ComboBoxa lub TextBoxa. 1 Opcja Chce żeby z innego arkusza odsyłało mnie do CB lub TB tak aby było już to wybrane (podświetlone rozwinięta lista) 2 Opcja po kliknięciu w przycisk pojawia się CB z innego arkusza dokonuje zmiany klikam w inną część arkusza, CB znika i zmienia się parametr, który...
[syntax=vbscript]ComboBox1.List = [ListaDziewczynki].Value[/syntax]
witam ponownie, (at)PRL, dziękuję, makro działa poprawnie, ale kontynuując temat - zaznaczamy OptionButton "litera" oraz w ComboBox'ie "B", a następnie zmieniamy literę na "cyfrę", to w Comboboxie dalej zostaje wpisana wartość "B". Co można zrobić, żeby w przypadku zmiany pola wyboru wartość z listy się zerowała (albo przyjmowała wartość domyślną)?
Umieść to w kodzie arkusza vba [syntax=vbscript]Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Intersect(Target, Range("B3:B12")) Is Nothing Then Call Lista.Lista End Sub[/syntax] Może to zrobić Np tak
Witam, mam problem jak w temacie: w folderze mam kilka plików INI. Potrzebuję w ComboBox wyświetlić listę tych plików z ukrytym rozszerzeniem (z możliwością utworzenia nowego pliku poprzez wpisanie nowego tekstu w ComboBox - tekst będzie nazwą pliku) aby edytować sekcje w wybranym pliku (lub tworzenie nowych sekcji). Za wszelkie sugestie z góry thx
ComboBox ma właściwość DataSource, do której to właściwości przypisuje się kolekcję obiektów (listę, albo DataTable, obojętnie). Następnie określa się właściwości DisplayMember oraz ValueMember. DisplayMember określa, jaka kolumna z DataTable albo właściwość obiektu ma zostać użyta jako widoczny tekst w combo. Natomiast ValueMember na tej samej zasadzie...
Jak zwykle (z całym szacunkiem), upieram się przy swoim ;) Uzasadnienie: 1. Wydajność kodu 2. Jeśli powtórzy się pesel? (ktoś oddał, znowu wypożycza, wypożycza drugie) 3. Łatwiej wyłapać błędy 4. Hmm, eee, yyy, coś jeszcze wymyślę ;) Druga sprawa: lista samochodów powinna być aktualizowana. Nie powinno być na niej aut już wypożyczonych.
W jaki sposób można się uchronić przed błędem "invalid property value" w comboboxie? Nie blokując wpisywania? W pozycji RowSource jest umieszczona lista z wartościami tekstowymi. Ewentualnie czy jest możliwe ewentualnie czy jest możliwe wyrzucenie msgbox'a zamiast błędu?
ComboBox to lista wartości (Items). Wszystko jest dokładnie opisane w dokumentacji - tylko czytać: ... reszta - wujek Gugiel..
A nie byłoby prościej utworzyć listę przy Initialize na podstawie wartości z combo UserrForm1 ? Podmień procedurę w UserForm2 na [syntax=vb]Private Sub UserForm_Initialize() firma = UserForm1.ComboBox1.Value wrs = 2 ComboBox1.Clear With Sheets("Arkusz2") Do While .Cells(wrs, 4) <> Empty If .Cells(wrs, 4) = firma Then ComboBox1.AddItem .Cells(wrs,...
Można tak: [syntax=vb]Sub AddItem(ByVal sItem As String, ByRef cmbBox As ComboBox) ' adds item retaining alphabetic order Dim l As Long For l = 0 To cmbBox.ListCount - 1 Select Case StrComp(cmbBox.list(l), sItem, vbTextCompare) Case 0: Exit Sub ' already in the combobox Case 1 cmbBox.AddItem sItem, l Exit Sub End Select Next l cmbBox.AddItem sItem End...
Witam, Czy można w VBA excel stworzyć formularz z kilkoma comboboxami, ale w taki sposób, aby po wybraniu w pierwszym ComboBoxie dowolnego pola(wariantu), automatycznie w drugim polu CB ilości pól(wariantów) była ograniczona? Dla przykładu podam: w pierwszym ComboBoxie mamy do wyboru np. rośliny ( Owoce, Warzywa, Kwiaty, Drzewa), w drugim polu CB pojawia...
Błędy powoduje arkusz Temp (musisz posprawdzać tam formuły itp.) lub wyłączyć "obliczanie skoroszytu" czyli w Ten skoroszyt kod [syntax=vbscript]Private Sub Workbook_Open() Application.Calculation = xlManual End Sub[/syntax] a w [syntax=vbscript]Private Sub cbNazwisko_change() cbIMIE.Value = "" cbNAZWISKO.ListFillRange = "LISTANAZWISK" cbNAZWISKO.DropDown...
Projektując formę, we właściwościach comboboxa masz RowSource. Możesz je ustawić tak, aby wskazywało źródło danych w arkuszu, np. [syntax=vb]Sheet2!A1:A7[/syntax] Jeżeli zakres może się zmieniać dynamicznie, wtedy np. w zdarzeniu Initialize formy wstawiasz: [syntax=vb]Private Sub UserForm_Initialize() ost_w = Sheet2.Cells(Sheet2.Rows.Count, 1).End(xlUp).Row...
Witam Od dłuższego czasu nie mam żadnej odpowiedzi. Bardzo proszę o pomoc !!! Postaram się uprościć moje pytanie. Dlaczego w niżej podanym kodzie nie jest przekazywany adres? [syntax=vb] Dim i As Integer Dim y As String ' lista wyboru Dim ListaArray As Variant Dim Ctr As Integer ListaArray = Array(RodzajLiniiLista, RodzajDodReaktLista) RodzajLiniiLista...
Aż mi głupio o to pytać ale jak prawidłowo zadeklarować swoją klasę, jak ją dam w program.cs przed Main to nie "widzi" jej w form1.cs? Swoją drogą próbowałem użyć obiektu klasy label i nic, lista jest pusta, mimo, że label ma metodę ToString().
Tak program powstaje w MFC. Chodziło mi o coś takiego jak SetItemData + GetItemData. Choć nie jest to idealne rozwiązanie ponieważ ID(z bazy danych) przypisuje się pozycji na liście a nie konkretnemu elementowi (konkretnej wartości) na stałe. Korzystam z automatycznego sortowania(włączona opcja sort) a więc po dodaniu nowej wartości do listy nastąpi...
dlaczego ograniczenie listy następuje dopiero po wpisaniu spacji Należy zmienić warunek porównujący stringi. Funkcja InStr szuka także wewnątrz. Np pamiętasz, że sala ma w nazwie "020" a nie pamiętasz początku. W przypadku długich ciągów metoda nie sprawdza się. Spróbuj [syntax=vb]If UCase(Left(lista(i, 2), Len(txtOpisSali.Text))) = UCase(txtOpisSali.Text)...
Witam jak to zrobić. Aby do każdej z aktywowanych komórek w Excel w wybranym zakresie przypisać listę w której to byłoby do wyboru z rozwijanej listy np: - "" - "osobisty" wygląda to tak jakby Filtr lecz nie jest to filtr Excel. przy czym nie we wszystkich komórkach miałaby być jedna i ta sama lista? dzięki z góry
Podepnij się pod zdarzenie rozwijania listy. W obsłudze tego zdarzenia wyświetl swoją listę którą będzie formatka bez frame i na tej formatce dorzucisz swoje komponenty i po ich obsłudze zwrócisz do Combo wynik i w Combo zrobisz to co chcesz
Excel. Jest właściwość MatchEntry ale to nie rozwiązuje problemu. Owszem mogę wprowadzić dowolny tekst ale chciałbym zachować równocześnie możliwość rozpoznawania czy tekst jest nowy czy istniejący na liście. Przy ustawieniu MatchEntry na None kązdy tekst, niezależnie czy istnieje na liście czy nie ma ListIndex = -1. Także chciałbym móc korzystać z...
Mam problem z dopisaniem do Arkusza1 (WuZetka) do komórki E9 kontrahenta wybranego z Comboboxa. Pewnie dlatego, że pod przyciskiem WSTAW nie masz żadnego kodu... ;) Wstaw go - kod będzie podobny do tego, który podałem jako ostatni, a nawet prostszy, bo znasz adres komórki, do której chcesz wstawiać. Dlaczego lista kontrahentów jest inna niż towarów....
Dziękuję za pomoc :) Dokładnie napisałeś to co chciałem. Więc teraz doprecyzuję to co chciałbym uzyskać i jeszcze coś dodatkowego. Pozwoliłem sobie skorzystać z jakiejś wersji pliku, który krążył w sieci i go odpowiednio zmodyfikować. Plik w załączniku. Dwie kwestie. 1. Jak zrobić listę w Combobox2, gdy mamy dane w Combobox1 i są one zależne. Jak będzie...
A czy mógłbyś mi podesłać kod? Dodano po 2 Oto lista wymaganych elementów, takich jak sprzęt, oprogramowanie, infrastruktura sieci, umiejętności, wiedza i dodatki Service Pack: Program Microsoft Visual C# .NET Średni poziom wiedzy na temat pojęć dotyczących programowania w języku C#
Witam, nie mogę sobie poradzić z jednym tematem. Stworzyłem kalkulator w którym jest kilka comboboxów z listami wyborów. I... chciałbym aby makro które wykonuje w danym kalkulatorze różne obliczenia na koniec zmieniło w comboboxie wybraną z listy wartość na inną. Piszac wprost. combobox ma listę wyboru: brak wskaźnik 1 wskaźnik 2 wskaźnik 3 ... pracując...
Tak przepraszam pomyliłem się chodziło mi combobox. Może za mało dokładnie napisałem. Do comboboxa ładowana jest lista pliku txt, musiała być tak aby była szybko edytowalna w notatniku. A wygląda ona tak nawa1 d=10 s=5 w=3 nawa2 d=9 s=5 w=3 nawa3 d=6 s=7 w=5
ComboBox ma indywidualne zdarzenia i właściwości. Spróbuj oprogramować przy zmianie (set.focus lub range().select). Rozwinąć bez myszy można stosując Alt+DownArrow. W podanym przykładzie jednak, zamiast ComboBox'ów, o wiele łatwiej byłoby zastosować poprawność danych przez listę. Miałbyś większe możliwości "skakania" po arkuszu przy Workscheet.Change.
Takiej odpowiedzi się nie spodziewałem :D Jajecznica może być przecież zarówno na śniadanie, obiad, czy kolację... Akurat w tym przypadku nie będzie takiej sytuacji, że jakieś danie może być dostępne w kilku porach - jajecznica zawsze będzie na śniadanie ;) W związku z tym, chce mieć podział na 5 list z potrawami, bo jak dodam 25 potraw na sniadanie,...
Poradziłeś mi prawidłowo, by dopisać do comboboxa ten fragment: Private Sub ComboBox1_Change() Range("F11") = ComboBox1.Text End Sub Ale nie działa to przy ten dynamicznej liście tej którą nazwałeś "piękna listą", spróbuj tam dopisać ten fragment. To będzie lista która będę docelowo używał,mój błąd, że nie wysłałem jej od razu, ale nie widziałem, że...
Dzień dobry.Posiadam dwa takie same tunery z kartą Smart HD+.Na jednym nagrywam na twardy dysk.Po podłączeniu dysku do drugiego tunera wyświetlana jest lista nagrań,jednakże nie odtwarzają się one.Czy ktoś spotkał się z takim problemem.Czy istnieje możliwość wgrania jakiegoś softu lub coś podobnego aby można było odtworzyć nagrania.
Hej, Dzięki za odpowiedzi, temat rozwiązałem jednak inaczej. Po pierwsze wybranie wartości z combo1 zapisywałem w komórce L1. Na podstawie tej kolumny zrobiłem somie kolumnę pomocniczą, która pokazywała mi imię nazwisko wtedy, gdy firma w wierszu zgadza się z L1, w przeciwnym razie zostawiałem puste pole I teraz cały "trik" Drugie combo działa następująco:...
Mam kolejny problem, który przeoczyłem poprzednim razem a mianowicie moja lista działa prawidłowo tylko w momencie gdy w komórkach arkusza są opisy niepowtarzające się. W przeciwnym przypadku (jak w przykładzie - gdzie powtórzyłem nazwę Towar 4) pojawia się przy pierwszym powtórzeniu (przesuwając przyciskiem Comboboxa - strzałką w dół) pętla powrotu...
ak zrobic by rozwijała mi sie ta lista tak jak teraz tylko nie same nazwiska ale również nip Zamienić combobox na listbox.
Witaj -lista -> wybierz ActiveX ComboBox powiedzmy że chcę wybrać po 1 komórce z każdej kolumny [syntax=vbnet]Sub plus1() For Each c In Selection c.Value = c.Value + 1 Next End Sub [/syntax]
Popatrz sobie tutaj [url=]Link W skrócie: - dodawanie - Me.MojeKombi.AddItem - usuwanie - Me.MojeKombi.RemoveItem
Kolego thestreet . Nie można tak bezmyślnie "szastać kodem" gdzie popadnie. Polecam zapoznanie się z podstawami nie w kodzie formularza (patrz Link wyżej, zasięg zmiennych). 2. Kolega JRV sugerował przypisanie i tylko przypisanie wartości zmiennej w zdarzeniu ComboBox. Na chłopski rozum: Combobox powinien mieć wypełnioną listę po otwarciu formularza....
Najwygodniej byłoby zrobić UserForm z dwoma ComboBox'ami, gdzie na podstawie wyboru pierwszego (nazwa arkusza) wypełniało by się drugi danymi z dwóch kolumn. Bardzo uprościłoby ujednolicenie nagłówków. Oczywiście jest to do zrobienia w obecnej postaci, ale nie we wszystkich arkuszach występują obie poszukiwane kolumny. Co w takim przypadku?
Podmień [syntax=vbscript]Private Sub cbdodaj_Click() Dim ost As Long With Sheets("SUMA_PRACY_FORM") ost = .Columns("B").Find(What:=ComboBox1).Row .Cells(ost, "C") = .Cells(ost, "C") + ilosc_spf End With End Sub[/syntax]
Po wybraniu wartości w pierwszym CB, [syntax=vbnet] Combo 2. Items. Clear For i = 0 to lista. Count -1 lista z której ładujesz combo If lista. Item (i) <>Combo1. Selecteditem. Value then Combo 2. Item. Add(lista. Item(i)) End if Next [/syntax] To zdarzenie wywołaj przy combobox 1. Selecteditemchange
Dzięki za sugestie . Zminiłem ładowanie listy na dynamiczne i zadziałało, szkoda że nie rozumiem przyczyny . Nie łapię "jawnie określone " w RowSource - wpisuje nazwę zakresu np. lista_Czegos , inny sposób wywala błędy ; pewnie czegość nie wiem?. Dynamicznie AddItem działa przy otwartych innych plikach i o to chodzi - trochę więcej zachodu bo trzeba...
Spróbuj tak: np w Excel 2007 wejdź w zakładkę Deweloper - włącz Tryb projektowania - otwórz Właściwości - znajdź ListFillRange i wprowadź tam cały zakres jaki ma się ukazywać w Twoim Comboboxie :idea:
hmm.. Otwieram to w excel2007; w J1 tylko #GB bez zadnej listy(poprawnosc danych lub form ComboBox lub ActiveX Combobox) ActiveSheet.shapes.count - wynik zero Jakiego rodzaju lista?(poprawnosc, form lub ActiveX) Jaky sens tyle nazew zakresow?(Tabela....)
mozesz mi powiedziec jak ? :D moja wiedza na temat ComboBox jest zadna niestety..... :(
lista wielokrotnego wyboru , po naciśnięciu edytuj można edytować zawartość Przejrzałem Twój plik i niestety "za Chiny" nie mogę zrozumieć :cry: co masz na myśli używając nazwy lista wielokrotnego wyboru . Co to ma być jakiś listbox, czy combobox :?: ale co wtedy ma znaczyć wielokrotny wybór u Ciebie ? Robiłem już jakieś listboxy z wielokrotnym wyborem...
Dr, ja zrozumiałem, że nie o to chodziło. To w comboboxie miały znaleźć się klikalne linki. A co do rozwiązania, to nie da się tak, ale można oszukać - utowrzyć taki wirtualny ComboBox, który tak naprawdę wyświetli warstwę (po kliknięciu na grafikę, w kodzie nie ma żadnego option/select!), która może spokojnie zawierać linki. Niemniej taka metoda ma...
Witam, kolejne moje pytanie dotyczy wyświetlanej listy ComboBox-a. A mianowicie: mam arkusz Excela zawierający ok 20 kart, każda karta ma swoją nazwę całkowicie różną od innych. Moje pytanie: czy jest możliwe, aby nazwy kart były wyświetlane w postaci listy ComboBox-a (ComboBox np: na pierwszej karcie), jeżeli tak to jak przejść do edycji danej karty,lub...
Tylko częściowo sobie poradziłem. Nie daję rady co do cmbSiec z listą arkuszy i zapis do BAZA i do arkusza wskazanego w cmbSiec Proszę o pomoc, chociaż kawałek kodu.
Dzień dobry, Przygotowałem, a raczej zaadaptowałem na podstawie opisanych przykładów kod pod swój arkusz excela. Mam 2 problemy: 1. Potrzebuję w arkuszu "material cost" z którego pobierane są dane dopisywać pozycje - w związku z tym potrzebuję aby combo odświeżało sobie dane przy otwarciu (lub jakiś trigger do odświerzania po wpisaniu nowych danych)...
Witam, chciałem napisać program, który pobiera dane z bazy i wyświetla je w dataGridView. Baza zawiera trzy tabele: Studenci, Pracownicy oraz Wydziały. Każdy student i pracownik są przypisani do danego wydziału. Stworzyłem w bazie widok za pomocą komendy: [syntax=sql][/syntax]create view widok as select Student.idStudent, Student.Imię, Student.Nazwisko,...
Chyba chodziło Ci o to: [syntax=vbnet]Imports System.IO Public Class Form1 Public lista(15) As String Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim Wykladowcy() As String, x As Integer, linia As String FileOpen(1, "C:\Users\Wojtek\Desktop\Zaliczenie VB\Zaliczenie Vb\Zaliczenie Vb\Studenci.txt",...
Pomogło ale tylko przy wyborze z Combobox 1 i 2, jeśli natomiast szukamy nie po nazwie elementu ale po indexie to w pierwszym momencie po wybraniu pierwszych znaków z Combobox 3 jest dobrze ale wystarczy cofnąć się np. Esc lub Backspace i wtedy klawiszami "Góra", "Dół" uzyskujemy błąd (Zdjęcie 1) a polem przycisku Comboboxa 3 - listę z Comboboxa 1 (Zdjęcie...
Witam! Ta wersja już weryfikuje poprawność dat i czasu. Nie nałożyłem restrykcji na ilość dzwonów (może być ich więcej niż trzy), dodałem legendę dzwonów zgodnie z Twoimi sugestiami oraz ostrzeżenie przy zapisie, że plik o danej nazwie już istnieje. Co do ostrzeżeń, wypisz mi ich treść, bo nałożyłem ich trochę w rodzaju "nie wykrył dwukropka", "nie...
Zrobiłem pewien plik, który jak się uruchomi wyskakuje okno UserForm z miejscami do uzupełnienia arkusza. Część tekstu wpisuje się w TextBox'y a część wybiera z list ComboBox'ów. Problem pojawia się wtedy gdy kliknę na listę ComboBox, Excel się zawiesza i bez zamknięcia z poziomu menadżera urządzeń nic się nie poradzi. Nie wiem co jest nie tak?
To się wszystko przeplata... Ten cały "tryb bezpołączeniowy" polega tak naprawdę na tym, że dataadapter "sam" decyduje, kiedy połączenie otworzyć, a kiedy zamknąć. "Sam" w cudzysłowie, bo to Ty metodami Fill czy Update pośrednio o tym decydujesz. Możesz robić to samo w róznych momentach w trybie połączeniowym za pomocą connection.open() i connection.Close()...
wypełniam arkusz pierwszy z niego wypełniają się trzy następne odpowiednimi informacjami... I w tym momencie zrobiłbym aktualną listę drukarek i "przydzielił" odpowiednim arkuszom Np w UserForm. [syntax=vbscript]Dim WshNetwork As Object, oPrinters As Variant Dim i As Integer, txtMsg As String Set WshNetwork = CreateObject("WScript.Network") Set oPrinters...
A może zastosować inne rozwiązanie? Zastanawiam się i kilku rzeczy nie mogę rozgryźć. Zapytam: 1. Czy plik to jeden miesiąc, czy więcej? 2. Jeżeli nie, to co będzie za pół/półtora roku? 3. Czemu ma/miał służyć pierwszy arkusz? Zakładając, że plik to miesiąc można ten arkusz wykorzystać do przedstawiania wyników wyszukiwania (stosując listę, combobox,...
Hej! Mam problem tzn: Mam listę ComboBox w której wyświetlają mi się pewne towary. I mam ListBox gdzie chciałabym aby wyświetlała się ilość dostępna na magazynie+żeby użytkownik mógł wybrać ilość którą chce kupić. Private Sub WybierzTowar_Change() //tutaj nic nie wpisywałam End Sub natomiast: Private Sub IloscTowaru_Click() Dim poz As Integer poz =...
miesiace to inne zagadnienie :) tam beda automatyczne podliczenia godzin pracy w danym miesiacu jesli chodzi o szczegoly. Czyli szukasz unikatowych wartości dla JobNo & Description? Bez względu na daty, czasy, etc? tak, bez wzgledu na inne wartosci unikatowe wartosci maja sie znalesc w tblList na podstawie unikatowych danych pobieranych z tabeli HoursDetails...
Wszystko fajnie, tylko zmiana drugiego formularza (Polska, Niemcy, Anglia) powoduje zmianę w pierwszym Ale tak wynika z Twojego opisu. Teraz to już nic nie rozumiem ;) Listę do ComboBox/Listbox mozna przypisać na wiele sposobów (z tablicy .List=tablica, z zakresu .rowsource=Range(), pojedynczo przez add). Dokładnie opisane jest to w pomocy.
1. Tak. Wiersz równy wartości zmiennej wrs , usuwasz. Tu trzeba będzie przepisać listę ComboBox'a, lub po prostu zamknąć i otworzyć ponownie uForm 'Wybierz'. 2 & 3. Z tego wychodzi, że: a) jeśli zaznaczono 'BrakTłumaczenia (chk górny) - email i 'Archiwum' b) jeśli 'BrakWarunków' - email i 'Dane_Przetworzone' c) w pozostałych przypadkach 'Dane_Przetworzone'...