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...
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...
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.
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 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ć ?
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łę.
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
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...
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...
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,...
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.
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"...
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...
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"))...
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.
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...
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...
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...
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...
Tak masz zasięg w całym formularzu (i projekcie, dopóki formularz jest otwarty): Private Sub UserForm_Initialize() GetObject ("c:\zeszyt1.xls") Workbooks("zeszyt1.xls"... End Sub Private Sub CommandButton1_Click() TextBox1 = Worksheets("Arkusz1")....
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_...
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) & "...
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]
Nazwa formularza w procedurze "Idz"?
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...
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ą...
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...
Chodzi mi o to by ulokować otwieraną formę pośrodku (centralnie) na ekranie. [syntax=vbscript]Private Sub UserForm_Initialize() frmkolekcjoner.StartupPosition = 0 frmkolekcjoner.Top = (Application.Height / 2) - (frmkolekcjoner.Height / 2) frmkolekcjoner.Left = (Application.Width / 2) - (frmkolekcjoner.Width / 2) End Sub[/syntax]
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...
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...
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.
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,...
Czekamy w takim razie na plik. Jednak uparcie sugeruję przygotowanie danych w arkuszu przed otwarciem formularza. Można to zautomatyzować Np przy inicjacji formularza...
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"...
Ale gdy wskazujesz obszar to ten inny skoroszyt staje się aktywnym (no bo jak wskazujesz obszar bez aktywacji innego skoroszytu) żebyśmy się dobrze zrozumieli mam otwarte dwa pliki (a plik z makrem) i (b - dowolny inny) żeby wskazać obszar pliku b muszę go wywołać.(czyli otwierasz a uruchamiasz userform przechodzisz do pliku b wtedy uruchamiasz inputbox)
Podsumowując: 1) Jest/ma być formatka=Formularz=okienko=UserForm 2) Są w nim/niej przynajmniej: 2x ComboBox (lista zleceń, osoby), 2x TextBox (dodawanie zlecenia, edycja zlecenia ... numeru ? ... inna ?), 2x Label (wyświetlanie zlecenia/wartości/osoby/inne ?), 5x CommandButton (edycja, dodawanie, usuwanie, szukanie, zamknięcie formatki) 3) Potrzebne...
Cześć Mam pewien problem z pętlą w UserForm. W formularzu mam m.in. dwa pola tekstowe, które muszę ze sobą połączyć. Kiedy do TextBox1 skanuje kod kreskowy to chciałabym żeby w TextBox2 pokazywała się nazwa tego produktu pobierana z listy w excelu właśnie po tym kodzie. Domyślam się, że trzeba to zrobić albo vlookupem, albo szukać po liście w jakiejś...
Jest sobie w "łekseselu" procedura np. 'Worksheet_Change', działa ona w ten sposób, że wychwytuje zmianę zawartości komórki arkusza, tj. stawiamy kursor na jakiejś komórce, wpisujemy coś z klawiatury i po wćiśnięciu 'pankracego entera' uruchamiana jest w/w procedura. No i niby mamy co chcemy, ale ...: 1. tutaj dane będą wprowadzane w wiele komórek w...
[syntax=vbnet]arkusz1.range ("a11").value = "*-*" Userform1.checkbox1 = (mid(arkusz1.range ("a11").value,1,1) = "*") Userform1.checkbox2 = (mid(arkusz1.range ("a11").value,2,1) = "*") Userform1.checkbox3 = (mid(arkusz1.range ("a11").value,3,1) = "*")[/syntax] Możesz też zapisać jako potęgi dwójki, np: binarne 101 czyli: arkusz1.range ("a11").value =...
Tu o tym piszą i dają makro: http://www.xtremevbtalk.com/archive/inde... Najprościej to chyba tak: wpisz w google: "vba spreadsheet in userform" i poczytaj.
"Wyskakujące okno" - trzeba wykorzystać UserForm, MsgBox sie do tego nie przyda. Przy zdarzeniu Initialize formularza, wpisz wywołanie procedury zamykającej formularz przez Application.OnTime (opis z przykładem w pomocy). Sumuj przez Worksheetfunction.Sum(argumenty), wartość przypisz do Label.Caption i... to wszystko.
Proponuję: W arkuszu "ewidencja" w G2 wpisać formułę: =(F2-E2)*24 format liczbowy i mamy godziny pracy. Trochę więcej zachodu będzie jeśli zakończenie pracy jest następnego dnia Np 23:30 do 6:15 (chociaż z arkusza wynika, że nie). Kod formularza UserForm4 przy inicjowaniu moim zdaniem powinien wyglądać tak Private Sub UserForm_Initialize() licznik...
Witam, w Excel VBA zrobiłem sobie formularz w ktorym dodałem ComboBox zawierający dane z arkusza 1 od B2 do B10. Po wybraniu pozycji w ComboBox program wstawia mi tą wartość do komórki F9 w arkuszu 3. Chcę teraz wstawić zależność, że jesli w Combobox zostanie wybrana pozycja nr1 to do kolejnej komórki zostanie pobrana inna wartość już z arkusza 2. Mam...
... vba działa tak jak powinno ale po przeniesieniu do właściwego pliku i zmianie zakresów przestaje pokazywać miejsce docelowe jeszcze nie wiem o co chodzi ... ... :) ... warunki graniczne ... :) ... jak się je zmieni, to będzie działać dla innych ... :) ... to był tylko 'przykład', jak ten poniżej , dla całego arkusza w zakresie komórek: 65536 wierszy...
Problem jest w kodzie formularza, a konkretnie w procedurze inicjalizacji. Wyremuj - zobaczysz, że działa. A teraz już sam dochodź - co spieprzyłeś :) Mam nadzieję, że pomogłem :) Uprzedził mnie :)
... Chcialem zrobic tak zeby po nacisnieciu przycisku unlock bylo wprowadzane haslo i jak zablokuje zeby nie bylo wg opcji edycji bo teraz jak nacisne ptaszek "yes" wywala mi blad 400.. (podczas trybu zablokowanego)... A jak skomplikowane mogą być makra, żeby kolega wiedział o co w nich chodzi ? Okienka dialogowe 'UserForm' kolega trochę zna ? Czy...
wyszukiwanie przestaje mi działać, albo dalej pokazuje datę amerykańską. :?: :?: :?: A czy mógłbyś kolego pokazać zrzut - jak działa ten Twój formularz :?: No zwłaszcza z tą datą amerykańską :cunning: W mojej ocenie ten formularz wyszukuje całe "rekordy", a tym samym nie możesz właściwie formatować pojedyńczego pola tego rekordu - daty :not: W Twoim...
Witam, mam mianowicie taki problem mam Date1 i Date2. Data1 jest to data ostatniego sprawdzenia np.22.01.2016, a Data 2 jest to data kolejnego sprawdzenia po roku, po 2, 3,4,5 latach czyli np.:22.01.2018. Dzień i miesiąc są takie same, tylko rok ulega zmianie. Pracuje w USerForm, mam formularz i teraz chciałabym aby przy podwójnym kliknięciu w pole...
Jak pisze w pomocy Sends a bit-by-bit image of a UserForm object to the printer. (...) PrintForm prints all visible objects and bitmaps of the UserForm object. PrintForm also prints graphics added to a UserForm object. (...) The printer used by PrintForm is determined by the operating system's Control Panel settings. Nie masz wpływu na wydruk tą metodą....
Plik jest załączony. Fragment kodu o którym mówimy dotyczy UserForm "Pobieranie", początek: wiersz 23. Słowem wyjaśnienia: cały plik ma na celu wprowadzenie na magazynie komponentów zasady FIFO (kolejka). Na ten moment możliwe jest tylko wprowadzanie dostaw i pobieranie komponentów. Część tabel jeszcze nie jest wykorzystywana.
W poleceniu jest napisane że formularze i okna dialogowe należy zrobić w MS Word, czyli należy uruchomić MS Word Wcisnąć Lewy ALT + F11, kliknąć prawym klawiszem na Projekcie następnie Insert -> UserForm. Aby forma uruchamiała się przy otwierani dokumentu Word można zastosować takie marko [syntax=vb]Private Sub Document_Open() UserForm1.Show End Sub[/syntax]...
Cześć, W swoim formularzu chciałbym umieścić kalendarz, który aktywowany będzie przyciskiem w zeszycie Input a wybrana data wpisywana do komórki C18. Kalendarz stworzyłem za pomocą UseForm w Excelu. Niestety nie wiem jak połączyć tę formę z przyciskiem aby pojawiał się ten kalendarz. Wielkie dzięki za pomoc, Laik2013
Ok, więc kod prawie działa. Prawie, bo rozpoczyna wpisywanie w A1 a powinien zapisywać od E4 - pierwsza komórka z nr LP. Poza tym wpisuje nr wiersza z arkusza a nie nr wiersza z tabeli. W tabeli ostatnie 314 w wierszu 318 i kod wpisuje 319 gdy wstawia LP Dodatkowo jeszcze podpowiedzcie jak: 1. Sprawdzić czy wpisana wartość w formularzu to liczba 2....
Witaj. Tak w tym stylu, ale : -z możliwością wybierania lub dodawania kolejnych arkuszy -wprowadzania danych kolejno po sobie z poziomu jednego wiersza coś w rodzaju formularza do wprowadzania danych. Mógłby to być po prostu jeden wiersz na Arkuszu1. http://www.coderscity.pl/ftopic862-0-asc... tu znalazłem Userform do wprowadzania danych i było...
Witam, mam userform w którym wyświetlane są recordy z arkusza "Baza". Jednym z tych pól jest data gwarancji (kolumna G). W bazie zapisana jest w formacie rrrr-mm-dd natomiast w formularzu w textbox wyświetla się w formacie mm/dd/rrrr. Jak to zmienić żeby wyświetlało się w formacie rrrr-mm-dd jak w bazie.
Jak wyżej ;) Data w Excelu zapisywana jest jako liczba i nie ingerowałbym w to. Formatowanie daty radziłbym stosować tylko dla estetyki formularza. Czyli: 1. User wpisuje datę do TetBoxa 2. Sprawdzamy czy wartość jest datą 3. Zapisujemy w "bazie" lub później, przy zapisie 'cells() = DateValue(TexBox.value) 4. Formatujemy w formularzu (coby ładnie, nie...
... Dla lepszego zobrazowania i wpisywania wymiarów można wykorzystać formularz excela. Np. coś takiego: http://obrazki.elektroda.net/74_12270180... ... Tak na marginesie się zapytam: Czy ten rysunek w oknie userform1 jest aktywny? Możesz dołączyć arkusz z tym userform'em?
W pliku Excela w arkuszu "wzór" zrobiłam wzór inputboxa :?: :D . Widzę w załączonym pliku, że masz dopiero wstępny zarys, szkic projektu, który chcesz zrealizować :cry: Brak danych i nieprecyzyjny opis Twoich przekształceń uniemożliwia mi jakąś konkretną pomoc. W mojej ocenie dla takiego projektu winnaś zapoznać się z tworzeniem tzw. UserForm i możliwością...
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...
... działa świetnei do momentu, kiedy zamiast 6 produktów faktura ma 7 produktów, tak więc dodaje nową linie z produktem, co automatycznie przesuwa mi komórke C5, w której ma byc numer zamówienia jedna linie niżej czyli teraz mój inputbox musi wstawi numer zamówienia do komórki C6, a nie C5. Ale przy powyższym kodzie zawsze będzie wstawiał do C5 -...
Witam, w ostatnim czasie chciałem utworzyć userform, w którym dokonywane będą skany kodów kreskowych (długość 14 znaków). Poniżej poszczególne etapy pracy formularza: 1)Skan kodu kreskowego w textbox, 2)Kopiowanie wartości text box (automatycznie/ textbox change() do akrusza karkulacyjnego, 3)Wyczyszczenie pola textbox oraz kolejne skany w kolejnej...
skopiowalam twoj kod i dostosowalam do kolumn i teraz mam w formularzu w odpowiednich listach odpowiednie kolumny ale jak mam zrobic zeby mi zawezalo te listy czyli jak wybiore Suchbegrif to zostana mi przefiltrowane Selektion i tak samo Stärke tak jakbym filtrowala w Tabeli.. i teraz wyswietlaja mi sie Artikel przefiltrowane tylko przez Suchbegrif...
Nie udaje mnie się to, że nadal gdy uruchomię jakiś inny skoroszyt to z automatu ten ukryty się pojawia. "Otwierasz plik "Formularze VBA.xlsm", uruchamiasz UserForm1, ukrywasz okno pliku i z poziomu UserForma :!: otwierasz windowsowy Eksplorator plików" A więć wygląda to tak: - klikam ikonę na pulpicie i ma się pojawić tylko i wyłącznie useform w takiej...
W drugim (UserForm1) formularzu pod przyciskiem bo próbuję i nie wychodzi.. Napisz co nie wychodzi. Jakiś komunikat o błędzie? Dane lądują nie tam gdzie trzeba?
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....
Witam, Proszę o pomoc w zmodyfikowaniu makra aby po wyborze z UserForm1 pozycji, dopisywało oprócz nazwa oraz waga, również powierzchnię(do kolumny E) ps. UserForm1 działa po dwukrotnym kliknięciu w tabeli kolumna C Arkusz Formularz. plik w załączniku zmieniony na bez obsługi makr - z obsługą traktowany jest jako zabroniony plik.
Witam, mam plik z dwoma kolumnami z danymi. W pliku znajduje się Userform (niestety nie wiem, czy da się załadować plik z formularzami), przy pomocy którego wybieram kolumnę, z której chcę zsumować dane. Po wybraniu z listy wybranej kolumny uruchamiane jest makro sumujące dane oraz wyświetlające komunikat w postaci zsumowanej wartości. [syntax=vbscript]...
[syntax=vbnet]Function arkuszIstnieje(nazwa As String) As Boolean arkuszIstnieje = False For Each Sheet In Worksheets If nazwa = Sheet.Name Then arkuszIstnieje = True Exit For End If Next Sheet End Function Sub wpisywanie() ' ' wpisywanie Makro ' ' Dim nazwa As String Dim dp As Date Dim dk As Date Dim df As Date Dim w12 As Boolean Dim t8 As Boolean...
Niestety nie może to być tabela przestawna bo dane mają wpisywać się do pewnej przygotowanej już przez kogoś innego tabeli stanowiącej Formularz, z którego będą korzystały różne osoby. Dodano po 17 Właściwie to metodą prób i błędów większość udało mi się zrobić. Dla UserForm1 i UserForm2: Proszę pamiętać o używaniu znaczników syntax . Opcja Listing...
Aleś Ty uparty :D Wystarczy raz sprawdzić warunek i zamknąć formę jeśli prawdziwy i NIE zamykać jeśli fałszywy. Jest sobie kod pod przyciskiem formularza If butelka = "otwarta" then jest pięknie, można lać do szklanki (wykonuję procedurę), wszystko OK więc zamykam formularz Unload me Else kapsel stanowi przeszkodę, nie zamknę formularza dopóki...
To jest troszkę bardziej zagmatwane niż myślałeś. Odwołaj się do nich przez Controls formularza. [syntax=vb]UserForm1.Controls("Image1").... = LoadPicture("C:\WINDOWS\Help\Tours\htmlT... tu możesz korzystać ze stringów.
Dane do ComboBox2 wpisuje się najlepiej w procedurze ładowania formularza na przykład następująco[syntax=vbnet] With Me.ComboBox2.Items For Me.i = 2 To 55 .Add(i) Next End With[/syntax] Po wykonaniu tych instrukcji mam liczby od 2 do 55 w rozwijanej liście. Poeksperymentuj z danymi, które chcesz wpisać najpierw bez pętli. Nie ładuj ich w podprogramie....
Dzięki za odpowiedzi. "Aldrin" niestety opis sali nie będzie tylko informacją, więc nie mogę wstawić tego do labela, ale posunąłeś mi pomysł by rozwiązać to przy pomocy 2 pól ComboBox, dając możliwość wyboru danych - jeśli wiadomo jaki nr ma sala wybieramy poprzez pierwszy formant, a jeśli nie znamy numeru szukamy/wybieramy salę po opisie w drugim formancie....
UserForm1 Wartość/Szanse na powodzenie: W polu wartość wpisywana jest kwota - jak zrobić, żeby po wpisaniu liczby, automatycznie formatowałaby się ona 0000,00 ZL? W przypadku pola Szanse na powodzenie - liczba automatycznie formatowana do procentów. Komentarz: Czy można wprowadzić automatyczne zawijanie tekstu? UserForm3 Zakładka Inwestycje/Projekty...
A nie myślałeś żeby do tego zaprząc Accessa? Można by wtedy ładnie zapytaniami SQL wydobywać z niego dane które potrzebujesz :) No ale skoro masz już w Excelu, to można j/w ;P, albo - żeby było łatwo - to ja bym zdefiniował zmienne publiczne w module (Public przeglad_ile_rekordow as Integer, Public przeglad_aktualny_rekord as Integer etc.), policzył...
Cześć, chcę napisać makro, które ma kopiować wartości z textbox'ów (które są w UserFormie) do pierwszej wolnej komórki w kolumnie. Ma to wyglądać tak: użytkownik po wpisaniu wartości w textbox'ach naciska "OK" i te wartości mają się przekopiować w pierwszą wolną komórkę w kolumnie. Do tej pory zrobiłem coś takiego: [syntax=vbscript] Private Sub OK_Click()...
Sprawa może wydawać sie dośc trywialna, ale nie wiem jak to rozgryźć. Chodzi o zrobienie nietypowego formatowania numeracji. ROK/liczba Czyli np. 2012/1 --> sprawa numer 1 w 2012 roku 2012/2 --> sprawa numer 2 w 2012 roku ... 2012/167837328... 2013/1 itd. Numerowanie mam zrobione, działa fajnie, ale gdzie i jak nadać warunek, aby po zmianie roku. W...
... wartosc2 = Array("A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N") '14 wpisów Te wartości trzeba wprowadzać ręcznie ? Mam ich w bazie ponad 30 - numerów oraz nazw ... Przecież miał to być tylko przykład :D ... pewnie że nie trzeba ... :D Do przejrzenia zmiany w " ini ", " dopisz_do_bazy " oraz " usun_z_bazy " 828986 :D Dla wielu...
Nie wiem jaki jest sens używania własnego UserForma zawierającego te same właściwości co wbudowany w Excela Formularz ... https://obrazki.elektroda.pl/9755796900_...
Przykładowe rozwiązanie Dodajesz pole krok typu int. Tworzysz główną metodę, która będzie zajmowała się wyświetlaniem paneli (może też odczytywać wpisane wartości w kontrolkach itp). Będzie ona realizować wyświetlanie na podstawie aktualnej wartości kroku. Dodatkowo piszesz metodę dla przycisku >, który będzie zwiększał krok o jeden oraz dla przycisku...
No nie wiem... Ja bym umieścił Combo z samochodami w UserForm3 i byłoby wszystko pod ręką. Chyba, że masz zamiar rozbudować to w przyszłości. Po wybraniu Nr dowodu osobistego należy wyszukać Nr wiersza w arkuszu "SAMOCHODY" (nejprościej stosując metodę 'Find' z komunikatem, jesli nie znajdzie) i (jesli dwa formularze) przypisać do zmiennej globalnej....
Ostatnie pytanie.. jak będzie wyglądała procedura która ma za zadanie : po naciśnięciu Buttona zamknąć Formę a otworzyć plik excel'owsi w którym się znajdujemy ? Dokładniej chodzi mi o to, że.. po otwarciu excela otwiera mi sie automatycznie forma z moim programem.. i teraz, chce zrobic tak, ze jak ancisne button ktory u mnie sie nazywa "Zamknij" to...
Witam, dopiero zaczynam swoją przygodę z VBA. Potrzebuję podpiąć pod przycisk funkcjonalność, która będzie kopiowała dane z jednego skoroszytu i wklejała go do innego. Obecnie udało mi się stworzyć kawałek kodu, który to robi ale mam problem z formatowaniem. Private Sub cbImportModelu_Click() Workbooks.Open Filename:=tbLokalizacjaPliku (użytkownik wprowadza...
userform excel kontrolka userform userform makro
wydział elektryczny informatyka kondensator mniejszy zasilacz agregat prądotwórczy pompa wtryskowa
fabia czujnik biegu zdalne sterowanie silniczkami
Samoczynne zamykanie bramy Nice Smilo - przyczyny i rozwiązania Grzałka grillowa w piekarniku Mastercook Elegance
