ale jestem głupi Nie myśl w ten sposób. Parę(naście/dziesiąt(już?)) lat temu zmieniałem format daty przy ### i dopiero po kilku dniach zaskoczyłem ;)
Listy dla pola kombi nie sortuj poza arkuszem, nie pozbierasz się z indeksami. Nie rozumiem natomiast dlaczego uparłeś się biegać przez ogródek, jeśli do furtki dwa kroki...
[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....
Po zmieszaniu kodów wyszło mi: [syntax=vbscript]Private Sub Workbook_Open() For x = 1 To Cells(1, Columns.Count).End(xlToLeft).Column Sheets(1).ComboBox1.AddItem Cells(1, x) Next End Sub Private Sub ComboBox1_Change() Cells(Rows.Count, Application.Match(ComboBox1, Rows(1), 0)).End(xlUp)(2).Select End Sub [/syntax] Temat na razie wisi w powietrzu. Autor...
Udało mi się :) Dziękuje za nakierowanie na poprawność danych przez listę. "skakanie" mam odpalane przez key_down.
Witam potrzebuje rozwinąć moja bazę magazynową. Nie wiem 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
Proponuje zmienić nazwy zmiennych "placowka, podzespol" aby były różne dla każdego ComboBox. np. tak: [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 ElseIf ost > 2 Then placowka = .Range("C3:C" & ost).Value ComboBox1.List...
Witam, Chciałbym się dowiedzieć, czy istnieje jakiś sposób, aby po anulowaniu zmian w ComboBox (BeforeUpdate wybiera Cancel) omawiany ComboBox powracał do wyświetlania indeksu wybranego przed próbą dokonania zmiany?
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,...
ad.1 Przy zdarzeniu Change ComboBox'a sprawdzany jest każdy znak wprowadzany z klawiatury. Jeśli sprawdzany ma być tylko pierwszy, pierwszym warunkiem będzie Len(NazwaCombo.value)=1, następnie porównujesz (w pętli) z listą. Najprościej wstawić polecenie opuszczenia pętli przy pozytywnym wyniku porównania, a warunkiem kontynuowania kodu zrobić licznik_pętli...
I cóż? Nikt nie ma pomysłu jakby to można fajnie zautomatyzować?
Tak Public Uas As String W podpowiedzi istnieje możliwość wyboru ComboBox1.Value the default property of a combobox is the value property
Hmmm, ale jaki będzie następny krok? Jak przekazać informacje o wyborze z ComboBox do systemu? A wybór ile stron wydrukować i temu podobne kwestie? Nie lepiej od razu: Application.Dialogs(xlDialogPrint).Show ?
Przecież parametrem funkcji wyboru (np Range) jest adres w postaci tekstowej.
mam problem ze stworzeniem makra, tzn w excelu mam tak comboboxa z 30 wpisami, przycisk, chciałbym żeby po naciśnięciu przycisku, wybrana pozycja w polu kombii wskakiwała na 1 pozycje w kolumnie, następnie zmieniam wybór w polu kombii, naciskam przycisk, i wskakuje na drugą pozycje w kolumnie.. itd, oczywiście poprzednie umieszczone w kolumnie mają...
cześć, mam problem i dalszą naukę jak powiązać dwa okna combobox tak aby gdy wybiorę wartość EAST to w drugim będzie możliwość wyboru 1,2 lub 3. Gdy wybiorę następną np SOUTH to będzie dostępne 11, 22 lub 33
Witam. Mam prośbę o udzielenie pomocy. Mam pewien plik który filtruje mi listę na podstawie dat. W tym kodzie mam zastosowany taki warunek: [syntax=vb]If DateValue(ark.Cells(i, 7)) < Date Then[/syntax] ...ten warunek filtruje mi daty które są już nieważne. Ja potrzebuję zastosować jeszcze inny warunek do filtrowania tak aby przefiltrowało mi daty...
https://obrazki.elektroda.pl/7836119800_... Jak na rysunku chce zablokować możliwość wprowadzania jakichkolwiek znaków w pasek wyboru. Aby był możliwy tylko wybór dodanych wartości z listy. [syntax=vbscript]Private Sub UserForm_Activate() 'Asortyment wybór Me.ComboBox1.Clear Me.ComboBox1.AddItem "Surowce" Me.ComboBox1.AddItem "Półfabrykat"...
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. Potrzebuję podpowiedzi odnośnie zapisywania danych z formularza do Arkusza. [syntax=vbscript]Me.ComboBox_jako.Clear 'Wyświetlane dane do wyboru Me.ComboBox_jako.Style = 2 Me.ComboBox_jako.AddItem "Detal zgodny = 100 pkt " Me.ComboBox_jako.AddItem "Niewielka niezgodność = 50 pkt " Me.ComboBox_jako.AddItem "Poważna niezgodność = 0 pkt "[/syntax]...
No i nie daję już rady z ComboBox-TextBox Moje założenie to wybrać towar z listy - automatycznie wpisuje się do TextBox (txtNazwa), w następnym TextBox wpisuję ilość (txtIle) i po zatwierdzeniu DOPISZ, dane znajdą się w komórkach C18 i E18 a pola Combo i Text czyste. Następny wybór i kolejne wolne, czyli C19 i E19 Dziękuję jeśli ktoś poświęci troszkę...
Nic z tego. Chodzi zapewne o "formularzowe" w arkuszu. Nie wykorzystasz komórki z indeksem pola kombi dla obu sposobów. Jeśli wpiszesz tam formułę, to przy ręcznym wyborze (we wtorek) zostanie zastąpiona indeksem. Najprościej byłoby wstawić ComboBox'y ActiveX i oprogramować...
Bez makra się nie obejdzie. Wprowadź do arkusza objekt rysunkowy (Image1) tam gdzie ma być to zdjęcie. I wprowadź kod przyporządkowując w każdej liście wyboru każdą z wybranych opcji do jakiegoś rysunku. np tak: Select Case ComboBox1.ListIndex Case 0 Image1.Picture = LoadPicture("c:\rys1_1.jpg&... Case 1 Image1.Picture = LoadPicture("c:\rys1_2.jpg&...
Witam, Mam problem z ustawieniem liczby miejsc po przecinku w zależności od wyboru z ComboBox. Próbowałem już na dwa sposoby kodem: Round(liczba, liczba miejsc po przecinku), oraz Format(liczba, "#.000") i nic. Proszę o pomoc w znalezieniu rozwiązania. Z góry dziękuję i Pozdrawiam
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...
Nie ma standardowych "podwójnych" combo box - trzeba wyświetlaniem w drugim sterować na podstawie tego co jest w pierwszym. Jeśli tylko do tego ma służyć UserForm, to można rozważyć inną koncepcję: - na górze arkusza zrobić "sekcję" wprowadzania danych i zablokować przez okno-> zablokuj okienka - wybór sali w komórce z listy zadeklarowanej w Dane->...
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...
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. http://obrazki.elektroda.pl/9899559500_1... przy czym nie we wszystkich komórkach miałaby być jedna i ta sama...
W arkuszu OCENA trzeba zacząć wpisywać nazwisko. Proponuję na literę K. PO wyborze nazwiska reszta ładnie się uzupełnia. Problem w tym, że jeśli cokolwiek próbuję zmienić w arkuszu lista znów się rozwija. Dziś zauważyłam, że próbując zmienić coś w innym pliku excel, jeśli ten z załącznika jest otwarty, też mam ten problem. Zdarzenie Change działa zbyt...
Zakisił Ci się jakiś błąd w arkuszu "podział na kolory". Przynajmniej w tym załączonym pliku. Trzeba było zrobić kopię i to dopiero w Calc (!). Moja propozycja: -ComboBox, wypełniany przy WorkbookOpen z arkusza "Opcje" (możesz sobie dopisywać kolory) -dodatkowa gałąź w instrukcji If sprawdzająca Indeks ComboBoxa -dodatkowy warunek z wykorzystaniem InStr...
Różne drogi prowadzą do Rzymu Zastosowałeś jedną w VBA (jak dla mnie trochę przekombinowaną - ale działa) Ja bym to zrobił np. tak edit: Jak teraz patrze na "twoje" rozwiązanie to widzę że właściwie są tam zmieszane ze soba (przedstawione wyżej przeze mnie) dwie metody na raz, co jeszcze bardziej przekonuje mnie w stwierdzeniu "przekombinowane".
Ok, nie dyskutuję, że to jest źródło błędu, wspominam jedynie, że dopóki nie miałem doczynienia z dodawaniem do pustej listy nie zauważyłem błędu. Ponieważ staram się słuchać rad mądrzejszych odemnie zmieniam właśnie mój kod tak aby nie mieć w ComboBoxach więcej niż 9 kolumn. Tak na wszelki wypadek, zakładam bowiem, że jeśli w jednym przypadku pojawił...
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...
Dodaj jeszcze wyjście z pętli jak znajdzie dubel i będzie działać. Inaczej, jeżeli poszukiwany arkusz nie będzie ostatni to sprawdzając nazwę kolejnego arkusza znów włączy się przycisk, co daje efekt że niby kod nie działa, a kod wyłączył przycisk i znów go włączył bo nazwa kolejnego arkusza nie odpowiada nazwie z cmbAnkieta więc trzeba to przerwać...
Hej! Zupełna zagwozdka mam takie dane jak w załączniku i teraz tak potrzebne mi sa 3 pola wyboru i jesli w pierwszym polu wybiorę określną wartość to będzie to ograniczenie dla 2 pozostalych pól jesli w drugim wybiorę określony projekt, to w trzecim combobox powinny pojawic sie do wyboru tylko wartości odpowiednie dla wybranego projektu czyli wybieranie...
cc2.Clear ' combo 2 gdzie wrzucam pozycje Worksheets("Budżety").Activate pozycja = Empty For Each c In ActiveSheet.Range("a1:a22") ' przeszukiwanie nr projektu If c = cc1.Value Then ' jeżeli znalazł projekt wybrany w combo 1 pozycja = ActiveSheet.Cells(c.Row, 3) 'wybiera pozycje cc2.AddItem pozycja ' dodaje pozycje End If Next c I teraz po tym wyborze...
Witam! Mam problem tego typu. Postanowiłem dodać parę opcji do załączonego pliku i zadanie mnie przerosło. W początkowej formie, arkusz służył do wprowadzania numerów paczek zeskanowanych skanerem z listu przewozowego. Założenia arkusza: 1. Po kliknięciu w przycisk: Wprowadzanie nr przesyłek, w wyświetlonym UserForm domyślne kursor znajduje się w polu:...
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...
Witam, Jestem początkująca w programowaniu VBA w Excelu. Mam problem z okodowaniem Comboboxa tak aby w zależności od wyboru z listy kopiował mi zakres komórek z innego Arkusza do drugiego w konkretnie wskazane miejsce, W załączniku dołączam plik .xlsm z moim przykładem. Chciałabym żeby w arkuszu MP HOLT-WINTERS po wyborze z ComboBoxa: np. "V"Excel kopiował...
W Excelu masz do wyboru, dwa sposoby zastosowania pola wyboru: 1. Pole kombi - pobierasz go z menu Formularze ( trudniej jest go zaprzegnac do roboty z poziomu VBA, latwiej przy zastosowaniu formul ) 2. ComboBox - pobierasz go z menu Przybornik Formantów i mozesz wszelkie ruchy zwiazane z dzialaniem tego obiektu wykonac swobodnie w VBA Jezeli dane ktore...
kopiowanie funkcji chodzi mi o przeniesienie do arkusza1 gotowego wzoru bedacego w komorce w arkuszu3, z tym ze, wzor liczy np. mnozac 4 komorki przez siebie w ustalony sposob - czyli wzor. Wzor moze ulec zmianie i zmieniam go w arkuszu3. Dlaczego ? Dlatego ze w arkuszu3 beda inne wartosci 4 kolejnych mnożonych komórek. W arkuszu3 wyliczam sobie współczynnik...
Nie mam Corel'a, ale VBA chyba wszędzie podobny... Najprościej byłoby z FileDialog. Jeśli konieczna jest lista dysków w ComboBox, to można połączyć z FileSystemObject. Załączam przykład takiej listy plików w Excel'u.
aby tylko ta fraza się ukazywała Do takiego działania Comboboxa konieczne byłoby utworzenie specjalnego kodu VBA :cry: - wydaje mi się jednak, że niewarta "skórka wyprawki" :D Zgodnie z właściwościami Comboboxa - każda wpisana litera w polu edycji wywołuje w reakcji - system podpowiedzi :!: , a lista wyboru ustawia się z pierwszym wyrażeniem spełniającym...
dodałem rabat przy zakupie Już wcześniej się zastanawiałem: Dlaczego rabat przy zakupie? Jako cenę zakupu wpisuje się cenę z rabatem i nikogo (łącznie z US) nie obchodzi cena bez rabatu. Istnieją różne systemy rabatów: procentowe, kwotowe, łączone (Np: jeśli poniedziałek to rabat 5% ale nie więcej niż 5zł) i musiałbyś je wszystkie uwzględnić :) Natomiast...
Witam, mam do napisania program, który ma zrobić analizę kursu wybranej waluty w wybranym przedziale czasowym. Program wczytuje plik z zewnątrz .txt w którym jest data z przedziału 2018-01-02 do 2018-11-30 a obok są kursy walut z poszczególnego dnia. W programie po uruchomieniu makra działa opcja wybrania pliku i załadowania go do arkusza w excelu ale...
Nie chciałbym pokazywać całości xlsx. Pola Kombi nie są definiowane w VBA a są wstawione bezpośrednio w arkusz. Nie wiem jak się do nich odwołać w vba. Szukam po omacku i natrafiłem na combobox.itemindex. Jak odwołać się jednak w vba do formantu wstawionego bezpośrednio do arkusza?
Witam! Stworzyłam w pliku ze sporą ilością danych 3 wyszukiwarki, a dokładniej 3 comboboxy z zawężaniem podpowiedzi w liście rozwijanej w zależności od wprowadzonej wartości. Niestety mam problem z którym nie potrafię sobie poradzić, a mianowicie: Gdy w jednym z pól zacznę wpisywać wartości i coś wybiorę z podpowiedzi https://obrazki.elektroda.pl/2298353700_...
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! mam następujący problem: za zadanie mam stworzyć tabelę(formularz wyboru w vba) z ciepłem właściwym różnych produktów. Wszystkie dane mam wypisane w komórkach excela. Tabela ta ma być w formie formularza vba gdzie wybierając odpowiedni produkt z comboboxa będą się wyświetlać odpowiednie dla niego dane. Moje pytanie jest następujące: Czy muszę...
Mianowicie do arkusza VB wstawiłem pole ComboBox hmmm... dla jasności: na co dzień nie zajmuję się programowaniem Kolega zrobi PrintScreen'a ze swojego okna i zamieści w poście bo jak narazie to ta wypowiedź jest niejasna i coś mi się wydaje, że poszukiwane rozwiązanie jest inne niż to co napisano. Zamiast ComboBox do daty proponuję "DateTimePicker"....
Użyłem Select Case, żeby nie zapisać pół strony instrukcją IfThenElse. Teraz jaśniej? Dobra, już tłumaczę. 1. Takie (zgodne z VB) a nie inne pole kombi, bo zdarzenie "Przy zmianie" reaguje tylko na zmianę wartości. Gdybyś chciał wpisać te same oceny raz za razem, to zmiana by nie nastąpiła. Należało użyć innego zdarzenia, o które kombi formularza jest...
combobox wybór excel combobox combobox excel
termet miniterm elegance zgrzytanie laptopa sonoff sceny
detektor przewodów detektor przewodów
Wzmacniacz Rotel: Cichy lewy kanał, jak podłączyć tuner? Szybkie miganie diody power - komputer się nie włącza