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.
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 :/ ...
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.
Proponuję użyć formularza UserForm i tam umieścić te InputBoxy i ComboBox.
Może(w jednym programie ). Nie może w tym samym UserForm kilka UserForm_Initialize lub UserForm_Activate etc.
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...
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.
Teraz każdy, kto chciałby pomóc, należy utworzyć UserForm zawierający nazwy elementów, które mogą nie pokrywać się z Twoimy... Możemy grzecznie zapytać "Pokaż formularza, nie w zdjęcie tylko w pliku"?
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...
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"))...
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"...
Nazwa formularza w procedurze "Idz"?
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...
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 ;)
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.
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...
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...
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...
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) & "...
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...
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.
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,...
... 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...
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.
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...
Czekamy w takim razie na plik. Jednak uparcie sugeruję przygotowanie danych w arkuszu przed otwarciem formularza. Można to zautomatyzować Np przy inicjacji formularza...
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ś...
Ok, później ogarnę i wrzucę. A tak na szybko to może być otwarty tylko jeden formularz do którego wprowadzam dane.
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ć ?
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...
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...
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...
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...
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.
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, 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...
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.
"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.
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_...
... 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 -...
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...
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...
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 :)
[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 =...
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ą...
... 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...
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...
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łę.
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]
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ą....
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,...
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...
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ł...
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.
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.
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"...
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ą...
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, 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...
Najpierw musisz zadeklarować zmienną typu 'object' Np przy załadowaniu formularza. W VBA wygląda to mniej więcej tak: Private Sub UserForm_Initialize() Dim objExcel As Object Set objExcel = GetObject("c:\katalog1\prob... End Sub W linku, który Ci podałem pisze jak to zrobić w VB. W nawiasie podajesz ścieżkę i nazwę...
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
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....
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...
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)
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...
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...
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...
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]...
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...
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.
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....
[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...
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?
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...
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.
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...
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ł...
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...
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...
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ń...
... 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 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]...
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...
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()...
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...
... 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 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...
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....
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_...
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...
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ć...
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...
userform excel kontrolka userform wywołanie userform
odłączenie telefon unitra fonica gramofon terminator zabezpieczenie
Pilot do alarmu Skorpion 2003 - problemy i rozwiązania Obsługiwane formaty wideo przez Blaupunkt BN32H1032EEB