o możliwości wprowadzania danych jednocześnie przez wielu sprzedawców Do jednego pliku? Excel ma moznosc skoroszytu udostępnionego . https://support.office.com/pl-pl/article... Z reguły jest na dysku sieciowym.
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...
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 :/ ...
Proponuję użyć formularza UserForm i tam umieścić te InputBoxy i ComboBox.
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.
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...
...fundusze to kolumna w raporcie określająca konta księgowe, głupia nazwa w sumie, mogłem napisać konta :-) No to teraz trochę więcej wiadomo o co chodzi ? Tak się składa, że z formularzami zetknąłem się pierwszy raz jak opracowywałem sobie w Excelu v. 4.0 aplikację do fakturowania i księgowania uproszczonego (KPiR) całej gospodarki materiałowej :D...
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...
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.
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"))...
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)
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...
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...
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) & "...
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]...
Nazwa formularza w procedurze "Idz"?
Jakiś diabełek szepce mi do ucha, że można osiągnąć oczekiwany cel znacznie prościej niż to opisujesz ;) Wrzuć plik z przykładem (co najmniej trzy takie formularze, włączając główny). "xlsm" spakuj (zip, rar) przed załączeniem. Przecież sprawdzić, które są otwarte możesz przez: 'For each ufrm in UserForms' Przekazać indeks/wartość combobox'a w takiej...
Może(w jednym programie ). Nie może w tym samym UserForm kilka UserForm_Initialize lub UserForm_Activate etc.
jak go przesunąć lub zmienić wygląd etc. PPM nie działa Karta "Deweloper" > Tryb projektowania P.S. Jest to przycisk AciveX, wywołujący UserForm ;)
A mógłbyś mi trochę podpowiedzieć w którym miejscu mam umieścić dany kod? W Module czy w kodzie z UserForm - akcja po naciśnięciu przycisku? Sorry za takie "głupie' pytania ale jestem totalnie zielony. Modules-> Formularz: [syntax=vbscript]Sub Zapisywanie() ActiveWorkbook.Save 'Metoda Save zapisuje obiekt, nasz kod powoduje zapisanie zmian w aktywnym...
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...
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...
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...
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:
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"...
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,...
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...
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...
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...
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ć ?
Są różne pakiety office - access jest chyba tylko w pakiecie Profesional. Budowa formularza w accessie jest znacznie łatwiejsza, ale ... sposób tworzenia formularza w excelu jest bardzo podobny - wystarczy przenieść opracowany układ kontrolek do UserForm i wymusić przez VBA wprowadzanie wpisanych (w formularzu) danych do określonej tabeli.
... 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...
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ś...
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.
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.
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]
Czekamy w takim razie na plik. Jednak uparcie sugeruję przygotowanie danych w arkuszu przed otwarciem formularza. Można to zautomatyzować Np przy inicjacji formularza...
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...
Działa. W Userform_Initialize miałam przypisanie :) Baaaaardzo dziękuję :)
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...
"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.
Jaki kod zastosować, aby z chwilą zamknięcia formularzaX , UserForm1 był aktywny Nie załączasz ani pliku, ani używanego kodu i teraz wszyscy, którzy mają Ci pomóc :?: mają się domyślać jaki kod stosujesz i w którym miejscu trzeba go modyfikować :cunning: Ogólnie to pewnie w kodzie zamykającym formularzX musisz zamieścić polecenie aktywacji UserForm1...
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.
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...
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.
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.
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,...
... 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 -...
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...
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.
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 :)
Tag aktywnego formularza potrzebuje do innych celów. Odpada. Ale ja w zasadzie nie zamykam UserForm, tylko ukrywam (Hide). Wtedy mogę .Tag wykorzystać, prawda? Jestem samoukiem, więc możliwe, że to kala sztukę programowania. Ale w końcu piszę program wyłącznie dla siebie. Chodzi mi najwyżej po głowie darmowe udostępnienie kodu chętnym, dlatego nie chciał...
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....
[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 =...
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")....
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?
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...
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, 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.
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...
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...
... 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...
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ą....
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...
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...
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]...
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]
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...
Combobox bedzię w formularzu. A formularz pokazuje się po otwarciu excela.
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łę.
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.
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_...
Witam Zwracam się do Forumowiczów z prośbą o pomoc w kodzie. Stworzyłam UserForm do wyszukiwania klientów ze zwracanie wartości wyszukiwania do labeli. O ile w przypadku wyszukiwania po numerze nie było problemu o tyle w momencie pojawienia się konieczności wyszukiwania po textboxie już tak. Wyszukiwanie miałoby się odbywać według schematu: w textbox1...
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.
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ń...
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...
[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...
1. Do czego są właściwie potrzebne zakładki "28dni/21dni/14dni ..." itd., czy tylko i wyłącznie do pobierania z nich danych dla pola listy 'ListBox1' ? Jeśli tak, to są niepotrzebne, można to zrobić inaczej. 2. Nieporządek w formatkach - a przynajmniej w 'UserForm1' - nałożone na siebie dwa przyciski opisane jako "28 dni", jeden o nazwie 'CommandButton1',...
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
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.
Wielka prośba o pomoc ,gdyż jestem początkującym adeptem VBA Excel . Robię programik w VBA pobierający dane do arkusza poprzez userform przy użyciu textboxów .Po naciśnięciu commandbutton1click na formularzu dane mam pobrać z komórek ,które wcześniej przesłałem do arkusza akcelerometr poleceniem Range("D3") = TextBox1.Value. Wykonuję podprocedurę obliczjącą...
... 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?
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...
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...
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....
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...
Do zdjęci jest określona pełna sciezka: DOSTAWCA = Workbooks("Reklamacje 2015.xlsm").Sheets("TE... NUMEREK = UserForm1.TextBox1.Text sciezka = "\\sts0004\QS-test\REKLAMACJE\Zarza... Reklamacjami\Reklamacje do dostawcow 2015\" & DOSTAWCA & "\LR15" & NUMEREK...
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...
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ł...
Witam Jestem początkujący jeżeli chodzi o VBA ale jakoś na swoje potrzeby coś klecę, dzięki między innymi temu forum. Przeszukiwałem je w poszukiwaniu tego co mnie interesuje ale nie znalazłem albo mi umknęło. O co mi chodzi? Mam zrobionych 50 UserForm'ów które są wyświetlane za pomocą CommandButton'ów z arkusza A1-1. W UserForm'ach wyświetlane są zdjęcia...
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 znowu mam kłopot - mam na UserForm TextBox, z którego po naciśnięciu klawisza Wstaw dane z TextBox'a wstawiają mi się do Arkusza w wyznaczoną komórkę kodem: [syntax=vb] Private Sub Wstaw_Click() Range("A222").FormulaR1C1 = TextBox18.Text End Sub [/syntax] Problem pojawia się, gdy w TextBox przechodzę Enterem do kolejnej linii, bo po przeniesieniu...
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...
Dzień Dobry Jestem bardzo początkującym użytkownikiem i nie mogę poradzić sobie z problemem, zrobiłem arkusz w którym rejestruję wjazdy samochodów do firmy, wszystko ładnie działa tylko jeszcze te samochody wyjeżdżają i chciałbym odnaleźć wcześniej dodany wpis o wjeździe auta na zakład i po np godzinie odnaleźć ten wpis i jak będzie wyjeżdżał to zrobić...
Nie ma za co. Mam tylko nadzieję, że nie pisałeś sześć razy LB.SetFocus (to tak trochę nieprofesjonalnie :D ) a zastosowałeś pętelkę w stylu: Dodane: A żeby jeszcze bardziej namieszać Ci w głowie to te sześć linijek zamieniłbym na trzy: [syntax=vb] For Each oListBox In Controls If TypeOf oListBox Is MSForms.ListBox Then oListBox.Value = element(Right(oListBox.Name,...
... 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...
Jeśli chodzi o nagłówki. VBA jest "ślepy" jeśli przypisujesz listę inaczej niż przez RowSource... Po mojemu rozwiązanie z labelem jest wystarczające (i pewniejsze). Wyłącz nagłówki, dla labela ustaw Height=10 i Top=62 i będzie ładnie. Czyli pierwszy pomysł najlepszy. Ok Rozbudowałam formularz dodając ikonę z kalendarzem i Checkbox-y z dniami tygodnia....
No, to po kliknięciu przyciski Utwórz formularz: ctrl.ListIndex < 1 , bo w wierszu zerowym comboboxów masz napis wybierz wartość, który też nie powinien być brany pod uwagę...
javascript formularze formularze access formularze google
zawieszenie corsa korad ka3005 wentylator programator amica kuchenka
łucznik naprężacz sprinter podłączenie webasto
Różnice między układami TOP223P a TOP223PN Claas Celtis 446 - brak wskazań prędkości, diagnostyka i naprawa