Witam, Potrzebuję pomocy dobrych ludzi bo do orła w VBA to mi trochę daleko. Usiłuję stworzyć moduł w ktorym wartosci zaznaczone w UserForm beda sie wprowadzaly do tabelki. W tej chwili to dziala rewelacyjnie, tylko jest jeden problem. Po zamknieciu UserForm i otworzeniu go ponownie (przy zalozeniu, ze uzytkownik zapomnial wprowadzic -w tym wypadku-kod...
OK. Nie napiszę gotowca i zachęcam do pisania samemu. Większa satysfakcja i coś się można nauczyć. Struktura jest taka, że są obiekty Application, Workbook, Sheet. W takiej hierarchii. W Excelu, edytorze VB użyj narzędzia ObjectBrowser. Wybierasz z listy gdzie jest "All libraries" Excel. Na liście Classes masz klasy obiektów z danej biblioteki. Wybierasz...
Module 1 i 2 chciałem teraz wykasować ale nie wiem jak. Delete nie działa, brak opcji usuń... Musisz kliknąć na każdy z tych modułów z osobna, prawym klikiem i będzie opcja Remove Module
Witam, napisałem sobie program, w którym jest kilka UserForm’ów. Kilka procedur jest wywoływanych przez różne kontrolki form. Wszystko działa bez zarzutu, tylko chciałbym się dowiedzieć, jak powinna wyglądać poprawna struktura takiego programu. U mnie to wygląda tak, że procedury znajdują się w modułach odpowiednich form (przez kontrolki których...
czy ktos moze pomoc rozwiazac problem? Najlepiej pomóż sobie sam :D Otwórz edytor VBA (najlepiej przy otwartej "matce" i kopii) i porównaj sobie kody modułów jednego i drugiego pliku, oraz kody UserForm-ów. Uzupełnić to możesz lekturą np https://www.cognity.pl/kurs-vba-procedur...
Super pewnie ale troszke nie wiem jak z tego skorzystać jak przekopiowuje do module to nie moge odpalic dacie jakas podpowiedz W swoim 'userform' musisz wywołać funkcje 'pastepicture' i w zależności od posiadanej wersji systemu będzie to win32 lub win64. (patrz co podał ci (at)adamas_nt chociaż on ładuje obraz do 'ramki')
Jak usuniesz formę z pamięci, to wszystkie zmienne przez nią "wyprodukowane" znikają również. Proponuję status przycisków umieścić w zmiennych w głównym module, ewentualnie w ukrytych komórkach arkusza , tam dotrwają do samego końca programu, a w komórkach arkusza to nawet się status zapisze
1. Co to takiego ta "Lista" ? Nie ma czegoś takiego w projekcie, więc jest błąd. 2. Jaki był zamiar przy wpisywaniu w module formatki (UserForm) instrukcji "Me.EnableEvents = True" ?
Dlaczego sprawdzać wszystkie w pętli? Przecież można przekazać argument (nazwę/indeks kontrolki) do procedury w module...
W kodzie arkusza to po prostu Public Function kod(znak As String) Jeśli chodzi o wynik: jest w zmiennej 'msg' - zmień zasięg (Public) i przypisz do Label'a...
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',...
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...
Mam plik excela , który jest otwarty całą dobę i chce aby o godz 6 ej wyświetlił sie userform. [syntax=vb] ' poniższe procedury umieść w Module, ' urucham startTimera i tyle. Sub startTimera() Application.OnTime TimeValue("06:00:00"), "otworzUserForm1" End Sub ' Sub otworzUserForm1() UserForm1.Show End Sub [/syntax] Pozdrawiam
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ę...
Nie do końca ogarniam twoje nazewnictwo Rozumiem że dla ciebie "makro" to jakaś procedura (Sub) ewentualnie zbiór procedur w Module natomiast "UserForm" to inaczej twoja formatka w której też mogą być zapisane procedury i funkcje ale ograniczone działaniem do tej formatki. Jeżeli Makro1 uruchamia UserForm a Marko2 uruchamia UserForm3 to pod przyciskiem...
Powyższe kody działają super - bardzo dziękuję - z jakich pozycji korzystałeś aby się nauczyć VBA ? Bardzo zależy mi na dobrej znajomości tego narzędzia. Dziś jak troszkę odetchnę dołoże jeszcze dwa moduły i zapewne pojawię się na forum z pytaniami. Po włączeniu arkusza Excel się minimalizuje, na ekranie zostaje tylko UserForm, ale jak kliknę w Excel...
... Jak naciśniemy w arkuszu Kosztorys pole B7 czyli to białe puste szybko dwa razy to otwiera się Listbox z wyborem danej pracy ... Wszystko działa ok ... No niezupełnie ... ' ListBox1_Click ' usuwa z komórki ' AB7 ' wartość liczbową i po zamknięciu okna nie można go już ponownie otworzyć bez wstawienia tam liczby. ... Potrzebne są tylko trzy zmiany....
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...
Wyjaśnie jeszcze raz w czym problem. Gdy uruchomię plik excel'a uruchomia się userform, w którym trzeba wypełnić pola. Po wypełnieniu pierwszego pola i przejścia do combobox'a, excel się zawiesza. Plik umieszczony na forum jest bez makr bo one nie tworzą problemu. Nie jestem informatykiem a grzebie w makrach dla samego siebie aby ułatwić pracę sobie...
Witam, Potrzebuję zapisać wartości wyświetlane z listboxie do odpowiedniego arkusza z tym, że muszą one być rozdzielone i zapisane jedna pod drugą. Na chwilę obecną mam coś takiego: (załącznik) Z userform wybieram z listy jednego z klientów, który wysłał zamówienie na swoje produkty. Wartości tego zamówienia chciałbym wpisać w arkusz "Moduł". W pozycji...
Tak jest to możliwe. [syntax=vbscript]'Moduł Arkusz1 Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Intersect(Target, Range("A3")) Is Nothing Then Call win_show End Sub 'Moduł standardowy Sub win_show() Load UserForm1 UserForm1.Show End Sub [/syntax]
Worksheet_SelectionChange(ByVal Target As Range) Ale tu widać że procedura reaguje na zmiany zaznaczenia w arkuszu, a tobie potrzebne są reakcje na otwarcie arkusza. 1. Pojawił się module1 z procedurą "g" - ile wiem w modułach piszemy procedury dla Arkuszy 2. W "ten skoroszyt"(Excel2010 procedury "private") odnoszą się do całego skoroszytu Za dużo chaosu...
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...
czyli myślę że należ tworzyć nowe okienka A ja myślę, że tak jak Ci radził marek003 wystarczy jeden UserForm, trzy InputBoxy i dwa przyciski. Po jednym Inpucie na każdą wprowadzaną wartość. Przyciski OK i Cancel. Wystarczy wtedy jedna funkcja do sprawdzenia poprawności danych uruchamiana pod OK i Twój "problem" znika. :D
Czy jest sens tworzenia 50 UserForm ?? Być może nie ma ale na moim poziomie rozumowania myślałem że w ten sposób sam sobie poradzę. Jak już zrobiłem pierwszą ocenę okazało się żeby to zrobić po swojemu to do grupy 3 osób musiałbym wykonać 450 UserFormów i tyle samo Modułów a osób do oceny jet ponad 50. Teraz faktycznie myślę, że być może da się jakoś...
1. Klawisze "blokowane" są w wyniku działania kodu procedury: cmbGra3 ' nie ma zogniskowania (focus), to w/w procedura nie działa, jeśli ma to ' Cancel = True ' blokuje możliwość opuszczenia ' Combobox '. 2. W procedurze zdarzeniowej ' Private Sub cmbGra3_Change ', kod: Private Sub cmbGra3_Change ' - gdy na pytanie: "Czy chcesz dodac nowa Gre" odpowiadasz...
Dzięki to znalazłem sam w sieci sęk w tym, że nie wiem jak z tego skorzystać :/ Dlatego proszę o pomoc tutaj jestem początkujący w VBA :) Put this in a module: Code: [syntax=vb]Private Const SWP_NOSIZE = &H1 Private Const SWP_NOMOVE = &H2 Private Const HWND_TOPMOST = -1 Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _ (ByVal lpClassName...
... 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 -...
Jeszcze nie zacząłem nauki w >VB6 ;) Tzn zaczynam od kilku ładnych lat i dlatego zainstalowany mam vb2005 express. Poniżej intuicyjna adaptacja z VB6 Excela. Wstawiłem Form, umieściłem textbox, label oraz button. Wstawiłem moduł, zerknąłem [url=http://social.msdn.microsoft.com/Fo...
Racja, w notatkach też musi być 1250 i nie krzaczy. Jeżeli chodzi o fotki to rewelacja, teza dodaje fotkę i bez problemu plik VCF otwiera się w Outlook i Smartfonie, nic nie krzaczy i jest fotka :) . Dzięki bardzo. Dodaję poprawiony załącznik, może ktoś będzie chciał kiedyś skorzystać :) Oczywiście makro można rozbudować o dodatkowe pozycje typu: prywatny,...
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...
Witam Jestem początkujący w VBA i proszę o wyrozumiałość;) Proszę o podpowiedź w następującej sprawie. Napisałem kod, za pomocą którego kopiuję dane z komórek do nowego arkusza i tworzy się etykieta do wydruku w formacie A4. Dane z A1 to nazwa etykiety, a dane H1:L1 to spis zawartości. Następnie A2 oraz H2:L2; A3 H3:L3 itd. i tak kilka tysięcy razy....
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....
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ł...
userform textbox userform excel kontrolka userform
volvo silnika czujnik wstrząsu zamontowany odbiornik radiowy lampa
somfy ir2153s philips gamma vwz6z3
Najlepszy darmowy program do konwersji WMV na MP4 na Windows 11 – HandBrake, VLC, FFmpeg Volkswagen Passat B5 1.9 TDI kombi – buczenie po wymianie końcówki drążka kierowniczego