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? http://obrazki.elektroda.pl/5048931400_1...
zależy mi żeby makro zawierało listę funduszy (kodów), które można powiększać o kolejne nowe lub odejmować niepotrzebne. Makro będzie miało za zadanie usuwać wszystkie fundusze/kody inne niż na liście. Czy ja dobrze rozumiem kolego "m4xon", że oczekujesz żeby na forum ktoś sporządził Ci listę funduszy unijnych ? :D A na poważnie to gdybyś zamiast pustego...
Witam Mam problem z formularzem Mianowicie chciałbym dodawać do tabeli Poprzez formularz Wybieram z combobox wartość wpisuje w texbox ilość -klikam dodaj i dana wartość się dopisuje do istniejącej czy takie coś się da zrobić ?
Oczywiscie odpłatnie Zadanie wydaje się być proste. Namalować formularz pewnie potrafisz. Jak już go będziesz miał, to napisz co jaki klawisz ma robić i jakiś kod się napisze.
Witam, mam zadanie - napisać makro, ktore wywola dowolny formularz stworzony jako userform [syntax=vb]Sub wywolanie_formularza() Worksheets("Arkusz1").Activate UserForm1.Show End Sub [/syntax] Czy o to chodzi? Nie mam mozliwosci sprawdzenia dzialania ze wzgledu na to, ze nie mam w domu odpowiedniego oprogramowania :/ ...
a jeżeli baza jest wprowadzana do Excela? Bo ja w Excelu napisałem swój program, tego też nie napisałem :) Pomyślałem sobie nad takim rozwiązaniem że każda osoba będzie miała swój niezależny arkusz, albo plik Excela i mój formularz będzie nadpisywał tylko to co dana osoba wprowadzi. Co myślisz nad takim rozwiązaniem?
Według mojej fantazji chciał bym aby wyglądało to tak: startuje z pliku Exela pokazuje mi się sam formularz UserForm z polami do wyboru i wypełnienia. Użytkownik wybiera i wprowadza dane klika zapisz i dane lądują w odpowiednich kolumnach w odpowiednim arkuszu. A tu chodzi mi o to aby otworzył się sam UserForm bez okienek Excela w tle zminimalizowanych...
Czy te przyciski są osadzone bezpośrednio w arkuszu? Jeśli tak, można napisać kod, który (w wyniku odpowiednich działań) będzie ukrywał /odkrywał komórki, na których jest osadzony dany przycisk. Można też utworzyć formularz UserForm (lub dwa – niezależne), na którym będą umiejscowione przyciski . Formularz może się uaktywniać w zależności od pewnych...
Może(w jednym programie ). Nie może w tym samym UserForm kilka UserForm_Initialize lub UserForm_Activate etc.
Mam formularz UserForm gdzie jest masa przycisków CommandButton. Wszystkie robią coś zależne tylko od nazwy przycisku. Czy jest jest jakieś zdarzenie które rejestruje dajmy na to ostatnio kliknięty Command Button? Chciałbym stworzyć jedną procedurę i przekazać do niej nazwę buttona zamiast robić ich kilkaset podobnych.
Rozumiem, że chodzi o to, że nie ma formuły w dopisywanym wierszu. Dobrze myślę? Jak już masz formularz to możesz wyznaczać ten status VBA podczas zapisywania. Możesz też makrem wpisać tam kod formuły w tym dopisywanym wierszu. To nawet lepsze bo status staje się dynamiczny, będzie się zmieniał w czasie, ale użytkownik może zepsuć formułę.
Czy mógł by mi ktoś pomóc? Jestem zielony i nie znam sie na programowaniu w VBA. Wykonałem formularz z wykorzystaniem UserForm i chce dodać każdą daną z Textbox do arkusza i to mi się udaje, ale chce aby kolejne wpisanie wartości do TextBox było wpisywanie do wiersz a poniżej, a nie zastępowało te poprzednie. http://obrazki.elektroda.pl/1247350200_1...
prosze o podpowiedzi albo o małe poprawki W Twojej sytuacji (brak accessa) jedynym rozwiązaniem jest opracowanie formularza w excelu (zakładka deweloper, visual basic, insert, userform itd.) i drobne oskryptowanie w vba zapisujące dane formularza do odpowiedniej tabeli. Gdybyś posiadała accessa to wprowadzone dane poprzez formularz można swobodnie...
próbuję właśnie formularzem, mam formularz i TextBox1, TextBox2... i na końcu ComboBox1. W załączeniu podesłałem jak wygląda. Teraz musiałbym do przycisku dodać pewnie to makro które pisałem, a do zmiennych tych WIP, TAT itd podłączyć jakoś że ma brać wartości z pól w userform textbox 1, 2,itd. tylko nie wiem jak. Podpowiedz plz
Dzięki za odpowiedz. Arkusz mam prawie gotowy. Niestety nie umiałem zastosować zdarzenia Exit. Głowię się i nic nie wychodzi. Zostały dwie sprawy do zrobienia: 1. Po wprowadzeniu unikalnego numeru w postaci np: qwerty1 w oknie UserForm - formularz uzupełniał by się domyślnymi wartościami dla tego zdarzenia np. w polu "rodzaj uszkodzenia" zaznaczała...
Szkoda, że nie załączyłeś przykładowego pliku do przetestowania rozwiązania. Sądzę, że w tym przypadku powinno wystarczyć użycie zmiennej obiektowej, której przypisujesz jeden lub drugi Userform. Pamiętaj o słowie Set w przypadku obiektów. W załączniku masz przykład ilustrujący tę ideę na przykładzie kształtów.
Ok, później ogarnę i wrzucę. A tak na szybko to może być otwarty tylko jeden formularz do którego wprowadzam dane.
Witam serdecznie!! Zaczynam zabawę z VBA i utknęłam na tworzeniu formularza. Próbuję rozwiązać zadanie, w którym trzeba utworzyć skoroszyt o własnościach: 1.zawiera okno UserForm z co najmniej 4 przyciskami lub polami wyboru, w którym przynajmniej 2 mają przypisane makro. 2. temat okna: formularz zgłoszeniowy na studia podyplomowe(wykształcenie, wiek...
W jaki sposób można zablokować możliwość zamknięcia (poprzez czerwony krzyżyk w prawym górnym rogu) formularza. W moim przypadku formularz otwiera się automatycznie przy otwarciu pliku i chciałbym uniemożliwić przypadkowe jego zamknięcie.
Coś mi się kojarzy z tymi salami, ale kiedy to było... W każdym razie: w załączniku masz formularz z filtrem 2-poziomowym (opcjonalnie). Co prawda to typowa książka telefoniczna, ale zrobiona na tej samej podstawie.
Witam. Mam fragment kodu, który pozwala na edycję danych wpisanych w kolejne komórki wiersza tabelki. Kod pozwala na wybór wiersza, a następnie wyświetla formularz z aktualnie wpisanymi danymi - można w polu formularza je zmienić lub wykasować. Wszystko działa jak należy, o ile w linijkach odwołujących się do kolejnych komórek nie pojawi się liczba...
Cześć, Pilne pytanie, nie wiem jak to zrobić, proszę o pomoc :). W załączniku są 2 arkusze, pierwszy "tabela" ma pozycji Lp. 1-100, w drugim "formularz" odwołuję się w 11 miejscach do tabeli. Potrzebuję w tak "przeciągnąć" na dół w drugim arkuszu, żeby mieć 100 takich formularzy (w jednym arkuszu - od razu do druku), które odwołują się do prawidłowych...
Witam, Potrzebuję pomocy w przerobieniu makra. 1.Chciałbym aby po wywołaniu okna UserForm można było wpisać w Textbox1 liczbę do zamówienia i umieściło tą wartość w kolumnie "i" tabeli(arkusz Dodajzlecenie) W kolumnach C i D odpowiednio wpisało wartości pomnożone przez tą ilość wpisaną w TextBox1(nie jak jest teraz, ze wpisuje wagę i powierzchnię jednostkową)...
Witam! Chodzi mi o taki formularz który wysyłał by zawartość do kilku adresatów (do określonej grupy ludzi) Chciałbym utworzyć kilka grup odbiorców np. studenci klasa 1, studenci klasa 2 itd. Po wpisaniu treści w formularzu chciałbym zaznaczyć odpowiednią grupę np. studenci kl 1 oraz klasa 2 i po kliknięciu przycisku wyślij żeby tylko grupy wcześniej...
Dzien dobry czy zna ktos taki skrypt ktory zaraz opiszę? Wchodzę na stronę na ktorej widnieje panel logowania z polami login i hasło po wpisaniu hasło i login zostaje przekierowany do strony z formularzem ktory ma cztery pola. Imie i Nazwisko, godzina,dzien,pozycja. Po uzupełnieniu formularza klikam wyslij po kliknięciu dane wpisane do formularza pojawiaja...
Po wciśnięciu przycisku dodaj chciałbym, aby dane znalazły się automatycznie w formularzu pliku dodaj.php marek | kiel | Dodaj (w.php) w.php [syntax=php] <?php $con = mysql_connect("localhost","root"); if (!$con) { die('Could not connect: ' . mysql_error()); } mysql_select_db("biblioteka", $con); $wynik = mysql_query("SELECT imie,nazwisko...
Witam mam formularz z dwoma polami ComboBox W UserForm Initialize ma kod dla ComboBox [syntax=vbscript] Dim NazwyArkuszy As Integer For NazwyArkuszy=1 To Worksheets(NazwyArkuszy).Count With ComboBox1 .Additem Worksheets(NazwyArkuszy).Name end with With ComboBox2 .Additem Worksheets(NazwyArkuszy).Name end with [/syntax][/code] Mam funkcję pod przyciskiem,...
W kodzie formularza zostawiłbym tylko: [syntax=vbscript]Option Explicit Private Sub CommandButton1_Click() ActiveCell = ComboBox1.Value UserForm.Hide End Sub Private Sub UserForm_Activate() Dim r As Range Dim strr As Range With ComboBox1 .Clear On Error Resume Next Set strr = Range("ListaFiltrowana") For Each r In strr .AddItem r.Value Next r .DropDown...
Nadal błąd tym razem zmodernizowałem kod i dla próby zrobiłem miniaturkę mojego programu w którym chodzi o to by dane były wpisywane do arkusza poprzez formularz i po kliknięciu na formularzu przycisku oblicz wynik został wpisany do pola wynik w komórce D5 arkusza i zarazem pojawiał się na formularzu w TextBox4. Mimo że nie wywala błędu , tym razem...
Witam, Prośba dotyczy Excela i VBA, proszę o pomoc w rozwiązaniu następującego problemu, który jak sądzę jest banalny i dla tego nie udało mi się znaleźć odpowiedzi w googlach. Nie jetem zbyt biegły w VBA, ale korzystając z tego, co można wyczytać w sieci udało mi się zrobić kilka całkiem użytecznych i rozbudowanych makr. Teraz próbuję zrobić bazę zleceń...
możliwość modyfikacji userform np zmienić nazwe w pasu okna lub zmienic jego kolor itp? Możesz odwoływać się do prawie wszystkich właściwości widocznych w okienku "Properties" formularza przy dowolnym zdarzeniu (kontrolek włącznie). Np Private Sub UserForm_Initialize() With UserForm1 .BackColor = RGB(255, 255, 0) .Caption = "kehn"...
Zależy przy jakim zdarzeniu ładujesz obrazek. Przydałby się plik z przykładem. (at)clubs. Wstawianie obrazka do ImageBox powoduje irytujące "mrugnięcie" formularza. Mniej przeszkadza "mruganie" samej ramki...
Przeglądałem. Na jeden wątek znalazłem już rozwiązanie co do pkt. z odświeżaniem. Po prostu dołączyłem do kodu uruchamiającego formularz w arkuszu 1 wiersz: "Call UserForm2.UserForm_Initialize" Cały kod uruchamiający: [syntax=vbscript]Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Count = 1 And Not Intersect(Target, Range("Description"))...
Zaznacz pole formularza, w oknie "properties", odszukaj kategorii "Data" i wyczyść zawartość obu podrzędnych. http://obrazki.elektroda.pl/3614040900_1... Sprawdź także w Userform_Initialize (jeśli jest), czy nie ma tam przypisania.
Witam, mam formularz UserForm, w którym użytkownik wybiera produkt oraz datę, a następnie wpisuje w TextBoxa jakąś wartość. Chciałabym, aby wartość z TextBoxa zapisywała się do odpowiedniej komórki w Arkuszu 1. Wrzucam przykładowy plik.
Hmm, na rysunku nic nie widać... A z tego co zrozumiałem chcesz, by do formularza trafiły dane z "RW", gdzie "Rejestr(pozos)" >0 Jeśli tak, to:
A mógłbyś to rozwinąć? Jak aktywować formularz? Nie wiem do kogo adresowane są te pytania :D Na wszelki wypadek proponuję koledze i autorowi wątku przejrzeć info Microsoftu np. :idea: https://docs.microsoft.com/en-us/office/... oraz uwzględnić okoliczność, że używanie plecenia .hide...
Ale co chcesz osiągnąć? Nawet gdyby szło przewijać, zmiana wartości komórki w arkuszu nie zmieni wartości pola tekstowego. Musiałbyś wczytać ponownie... Jakimś sposobem byłoby umieścić ukrywanie formularza pod przyciskiem (UserForm.Hide), a w Thisworkbook_Open przypisać kombinację klawiszy uruchamiania makra odkrywania. Np dla Shift+a Application.OnKey...
Nazwa formularza w procedurze "Idz"?
Czyżby taki prosty błąd?[syntax=vb] For i = 3 To ostWrs If (InStr(1, etat, "| " & .Cells(i, 5) & " |") > 0 Or .Cells(i, 5) Like etat) And _ (InStr(1, firma, "| " & .Cells(i, 9) & " |") > 0 Or .Cells(i, 9) Like firma) And _ (InStr(1, szef, "| " & .Cells(i, 10) & " |") > 0 Or .Cells(i, 10) Like szef) And _ (InStr(1, kopalnia, "| " & .Cells(i, 11) & "...
Dzień dobry, mam problem z bazą stworzoną w Excel z wykorzystaniem VBA. Baza zawiera 3 formularze UserForm (o różnym stopniu rozbudowania) , gdzie w zależności od potrzeb wprowadza się różne dane do bazy. Dane są zapisywane w odpowiednio przygotowanych tabelach, które na potrzeby działania poszczególnych UserForm pobierane są do tablic dynamicznych...
Ad.1 Zerknij do ostatniej linii UserForm_Initialize. Tam jest przypisanie listy ComboBox'a do tablicy. Odwróciłbym to. Wykorzystałbym tę tablicę globalnie, z wypełnieniem jej już przy otwarciu pliku. W UserForm2 zamiast dodawania wartości do listy ComboBox'a w pętli, przypisywałbym tablicę. Plik co prawda będzie się otwierał ciut dłużej, za to inicjacja...
Skoro tylko jeden rekord, to wystarczy, w UserForm_Initialize przywrócić wartości poszczególnych kontrolek. Tak naprawdę nie potrzebujesz dwóch przycisków - wystarczy jeden, który załaduje dane z istniejącego formularza (ten z UserForm1.Show). Cały kod zapisywania zamiast w module Formularze_VBA, proponuję umieścić bezpośrednio w zdarzeniu kliknięcia...
Jak wyżej. W tym przypadku należy oprogramować zdarzenie ramki. Poniżej przykład dla Frame_Exit. Jednym z minusów jest to, że ramka "odezwie" się także przy zamykaniu formularza. Dlatego dodatkowy warunek i czyszczenie zawartości. Jeśli ramka służy tylko celom estetycznym, prościej będzie zamiast niej wstawić pusty Label z obramowaniem... [syntax=vb]Private...
Możesz to przykładowo ustawiać kodem przy inicjalizacji formularza :spoko: [syntax=vbscript]Private Sub UserForm_Initialize() With Sheets("Arkusz1") ostWrs = .Range("A65536").End(xlUp).Row lista = .Range("A2:D" & ostWrs).Value 'zapisanie do tablicy 2LBox.ColumnCount = 4 2LBox.ColumnWidths = "60pt;230pt;10pt;50pt" 2LBox.List = lista End With End Sub[/syntax]
Dzięki. Już zdążyłem to znaleźć w międzyczasie. I ile zauważyłem to drukarka zmienia sie w Office 2010 w 2013 już nie. Korzystam z userform. Pzdr.
Nie możesz zmieniać właściwości zamkniętego obiektu. Albo kombinuj z Load Form i Form.Show , albo ustaw tagi w aktywnym formularzu. [syntax=vb]Option Explicit Private Sub CommandButton1_Click() UserForm1.Tag = "" 'albo Me.tag = "" UserForm2.Show End Sub Private Sub ListView1_DblClick() UserForm1.Tag = "NoActivate" UserForm2.Show End Sub Private Sub...
Witam, proszę o pomoc w poniższym. Robię arkusz do skanowania wyrobów, które przyjeżdżają na magazyn. Zrobiłam to za pomocą formularza w VBA. Chciałabym aby w przypadku gdy któryś z TextBoxów w formularzu nie będzie posiadał tekstu to automatycznie po zatwierdzeniu będzie wpisywać się wartość "brak". W załączniku podgląd. mój kod: https://obrazki.elektroda.pl/7807554200_...
A spróbuj tego sposobu, do którego prowadził zapodany link w #2 [syntax=vbscript] #If VBA7 Then Private Declare PtrSafe Function GetSystemMetrics Lib "user32.dll" (ByVal nIndex As Long) As Long #Else Private Declare Function GetSystemMetrics Lib "user32.dll" (ByVal nIndex As Long) As Long #End If Private Sub UserForm_Initialize() frmkolekcjoner.Left...
Moim zdaniem wychodzisz z błędnego założenia. Sugeruję kolejność: 1. Kliknięcie przycisku w arkuszu otwiera formularz (i nic więcej). 2. Wypełnienie formularza przez użytkownika. Koniecznie zablokuj kontynuowanie bez wypełnienia kluczowych pól. Po wypełnieniu formularza można pobrać wartości potrzebne do przede wszystkim nadania nazwy wstawianego, nowego...
To jest fragment kodu do przycisku w formularzu użytkownika (Userform) w dokumencie Word. Zadaniem tego bloku kodu jest wstawienie do dokumentu wartości podanych w userformie i przywołanie procedury wstawiającej kwotę słownie. Jeśli zaś użytkownik dane okienko w userformie zostawi puste, albo wpisze 0, to makro ma w tylko skasować zakładkę. Niestety,...
Nie ładują się comboboxy w UserFormie . Mam otwarte dwa pliki Excela na 1 monitorze , na drugim edytor VBA . W momencie uruchamiania formularza F5 gdy nie jest kliknięty plik odpowiadający uruchamianemu formularzowi , kontrolki texbox i listbox są puste . Nie wiem czy to może powodować jakieś komplikacje przy użytkowaniu przez inne osoby ? Pliki pobierają...
Czekamy w takim razie na plik. Jednak uparcie sugeruję przygotowanie danych w arkuszu przed otwarciem formularza. Można to zautomatyzować Np przy inicjacji formularza...
Excel nie ma kontrolek typu linia w zasobniku. Kod, który pokazałeś nie jest tym, czego szukasz. Owszem wyrysujesz linię na ekranie, ale nie jest to linia na formie. Pozostaje skorzystanie z autokształtów. Zobacz [url=http://www.andypope.info/vba/userfo... Do ściągnięcia pożyteczny w takich przypadkach dodatek (UFDrawer.xla) z formularzem...
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"...
userform excel kontrolka userform userform makro
schemat kostek radio renault megane mierniki indukcyjnosci bezprzewodowe sterowanie urządzeniami
LG 50: Brak obsługi aplikacji myszką, tylko pilot Odzyskiwanie kodu do radia MFD2 - porady i metody