[syntax=vb] Dim i as Integer For i = 3 to 36 OLEObjects("cmd" & i).Enabled = True Next i[/syntax] Kolekcją dla obiektów ActiveX jest OLEObjects, a nie jak to ma miejsce w UserForm - Controls. Co właśnie znalazłem, a czego nie wiedziałem. ;) Może się komuś przyda taka wiedza. ;) Edit: Tak to jest, jak się nie kopiuje, tylko pisze. ;)Zrobiłem literówkę...
W arkuszu 2 komórki latwiej nie są scalone, ale tylko szeroki, łatwiej zarządzać nimi. Ocena to średnia ważona każdego parametru z jego wagą Z kazdego parametru wybierame tylko 1 wartosc. Z czego ta 'średnia ważona '. Napisz przyklad, jak liczyc ta 'średnia'
plik nigdzie się nie zapisuje :/ To jest w pomocy... No, trzeba zapisać :) najlepiej z wybranym typem pliku (filtr w ListBox okna dialogowego) [syntax=vb]Dim fd As FileDialog nazwaPliku = "NOWY PLIK" & ".doc" Set fd = Application.FileDialog(msoFileDialogSave... With fd .InitialFileName = "c:\" & nazwaPliku .AllowMultiSelect = False .If .Show Then ThisDocument.SaveAs...
(at)adamas_nt Ad.1 Zrobiłam coś na zasadzie filtrowania, ale nie działa mi. Próbowałam również takim sposobem : https://www.youtube.com/watch?v=BxH-oivZ... Ad2. Ścieżkę zapisu napisałąm, ale pytanie czy da się Userform zapisać jako pdf czy trzeba dane do tych pytań zczytywać z arkusza???
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...
Próbowałem od nowa stworzyć aplikację i dalej ta sama sytuacja. Może jak mówi adamas_nt zastosować funkcję TimeSerial :?: Ale jak to zapisać :?: Pomóżcie, mam na poniedziałek oddać już tą aplikację :!:
Jak już piszemy o różnych rozwiązaniach, to zaproponuję takie: Witam, mam pytanie. Jak zrobić i gdzie zapisać kod aby działał w momencie gdy w pliku stworzymy drugą zakładkę i pomalujemy zakres na żółto. Żeby wtedy userform się odpalał.
Chciał bym oprogramować tak TextBox'a w moim UserForm aby zapisywał po kliknięciu Buttona zapisz. Dane w odpowiedniej komórce w arkuszu. *.xls To co w końcu chcesz? Nie chcesz mieć ścieżki wpisanej na stałe, a jednocześnie nie chcesz wybierać pliku docelowego. Więc jak? Domyślam się, że chcesz zapisać z textbox do arkusza w tym samym pliku, tak?
Witam, Na polu UserForm mam pole zdjęcia i pod spodem dwa przyciski. Chciał bym pod jeden przycisk podpiąć możliwość wyboru zdjęcia z "Mój Komputer" i drugim przyciskiem zapisać wybrane zdjęcie w odpowiedniej komórce w arkuszu.
Witam, Pracuję od dłuższego czasu nad makrem i niestety napotkałem kilka znaczących problemów, których pomimo szukania nie mogę zlikwidować. Makro działa w następujący sposób: 1. Po kliknięciu ikony pojawia się UserForm, który posiada różne opcje do wprowadzenia pewnych wartości do arkusza. 2. Wybieram przycisk "RUN", który odpala makro- makro ma za...
Błąd nie wiem dlaczego ci wyskakuje bo u mnie jak mam tak jak ci podałem to ciała dobrze. A jeśli chodzi o zamknięcie excela to jeśli zamykasz jakimś przyciskiem to musisz dać przy nim : [syntax=vb] ActiveWorkbook.Save 'Jeśli chcesz przed zamknięciem zapisać skoroszyt Windows("szachy1.xlsm").Close [/syntax] A jeśli chodzi ci też o to żeby nikt nie wyszedł...
Witam Jesli chodzi o vba i makra jestem mocno początkujący ale zastanawia mnie to czy istnieje kod który będzie powtarzał czynność w kolejnych arkuszach o innych nazwach. Chodzi o to,że mam trzy arkusze dane wejsciowe , zmiany, dane po zmianach. I chciałbym aby ten ostatni arkusz był nowym wyjściowym dla kolejnych 2 (zmiany 2 i dane po zmianach 2) itd....
Witam, Stoję prze kolejnym problemem, a mianowicie zastanawiam się czy za pomocą kodu makra możliwe jest stworzenie UserForm, który będzie zawierał Checkboxy? Cała sprawa wygląda tak, że mam pliki z różną ilością arkuszy. Codziennie w ramach tych plików potrzebuję wyciąć poszczególne arkusze (za każdym razem inne), zapisać je pod konkretną nazwą i wykorzystuje...
Czy jest sens tworzenia 50 UserForm ?? Dodano po 25 mam powiedzmy 9 osób do oceny w jednej tabelce Ocena zdjęcia osób lub osoby ocenić Zdjęcie? kod jest jaki jest Napisz, co powinno się zdarzyć? OptionButton - ControlSource - F1 Ponadto jest ToggleButton
Witam, Napisałem sobie programik, w którym zrobiłem UserForma do wprowadzania danych do arkusza. Po uruchomieniu go na komputerze w pracy ten właśnie UserForm nie działa. Kiedy chcę zapisać wprowadzone w nim dane pojawia się błąd: http://obrazki.elektroda.pl/2480258900_1... [syntax=vbscript]Private Sub Anuluj_Click() Unload Me End Sub...
w kolumnie D mogą być zarówno nazwiska jako Text jak i wartości numeryczne Jakim sposobem nazwiska mogą być numerami? jeżeli jest nazwisko może być kilka identycznych nazwisk - stworzenie przycisku next, który szukał by następnego klienta o tym samym nazwisku i ponownie dane do labeli Kod którym zakodowałam szukanie po Id H poniżej. Proponuję przerobić...
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....
Witam, proszę o pomoc - tworzę makro, które wrzuca na userform dane tekstowe (są to etykiety cenowe) z arkusza. Czy istnieje polecenie, które zapisuje formatkę jako plik .jpg bądź jakikolwiek inny obrazek? Póki co drukuję jedną po drugiej, a chciałbym, by zapisywały mi się one na dysku. z góry dziękuję za pomoc
Witam! Mam problem tego typu. Postanowiłem dodać parę opcji do załączonego pliku i zadanie mnie przerosło. W początkowej formie, arkusz służył do wprowadzania numerów paczek zeskanowanych skanerem z listu przewozowego. Założenia arkusza: 1. Po kliknięciu w przycisk: Wprowadzanie nr przesyłek, w wyświetlonym UserForm domyślne kursor znajduje się w polu:...
Dzień dobry, mam utworzony excel z userformem. Skoroszyt działa w ten sposób, że podczas włączenia pliku w pierwszej kolejności pojawia się User Form. Użytkownik loguje się. Po zalogowaniu uruchamia się makro, które zmienia poszczególne zakładki z veryhidden na visible. Użytkownik wprowadza dane w odkryte zakładki, zapisuje plik i później wchodzi tak...
Witam Pliki musisz pakować rar/zip itp. Co do ładowania danych do comboboxa odpowiedzialna jest część j.n musisz dopisać z jakiej zakładki są pobierane dane czyli [syntax=vbnet]Private Sub UserForm_Initialize() Dim i As Long i = 2 'bez nagłówka 'zapisanie do tablicy Do While Sheets("Articles").Cells(i, 1) <> "" AddItem Sheets("Articles").Cells(i,...
Niestety nie mogę zobaczyć pliku, nie mogę go nawet pobrać z internetu - admin zablokował. No to teoretycznie: Tak sobie myślę skąd makro ma wiedzieć z którego pliku pobrać dane? Sprawdź czy jest to jawnie określone w RowSource. Nazwany Range też może nie mieć właściwego (pełnego) adresu i próbuje brać z ThisWorkbook. Wyświetl sobie co tam dokładnie...
Kontynuując, pola tekstowe należałoby "uporządkować numerycznie" zaś jedną etykietę (data) nazewniczo, np. tak: [syntax=txt]lab_dzis => 'Etykieta z wyświetlaną "dzisiejszą datą" TextBox1 => 'Nazwisko TextBox2 => 'Ulica TextBox3 => 'Kod pocztowy TextBox4 => 'Miejscowość TextBox5 => 'PESEL TextBox6 => 'NIP TextBox7 => 'Telefon TextBox8 => 'Pocztel TextBox9...
Dzieki kurko :) Jestes wielka! Zaraz sprawdze. Tez pracuje na 2007, ale to forum nie przyjmuje plikow xlsm, wiec musialam zapisac na xls.
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...
Wiem o co ci chodzi chcesz żebym obraz na chwile zapisał na dysku. Załadował do image box i a potem usnął
Czy jest jakiś prostszy sposób na to, żeby wprowadzając dane do bazy można było bezpośrednio porównać te dane z UserForma z danymi arkusza do którego te dane są zapisywane, a jeżeli jest to jak to zapisać?. Zawsze mogłem liczyć na pomoc od Pana adamas_net. I przyznam, że dużo mi pomógł w moich meandrach z VBA.
[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 =...
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]
Ostatnio zacząłem bawić się vba w excelu i niestety chwilowo utknąłem ;) mam dwa problemy: 1) Mam userforma w którego wpisywane są dane i po zatwierdzeniu przyciskiem "zapisz" wszystko trafia do odpowiedniego akrusza w excelu. ww. userform wywoływany jest przez przycisk na w innym arkuszu (commandButton) Private Sub cmbDodajDefekt_Click() DodajDefekt.Show...
Jeżeli masz zainstalowanego Adobe Readera, to po prostu zarejestruj makro w Excel-u, dodając na ekran nowy object : http://obrazki.elektroda.pl/9498049200_1... I zobacz co się zapisze. Potem możesz modyfikować ustawienia. Poszukaj w Google takiej frazy : "adobe pdf reader activex control vba".
Cześć mam taki problem. W moim userformie mam dwa textboxy które miały by pokazywać daty. z tym ze: textbox5 pokazuje dzisiejszą datę ( i to działa) textbox6 miałby pokazywać datę w zależności od wartości z innego textboxa..(w którym pokazuje się wartość dzięki funkcji vlookup. (interesuje mnie głównie opcja zmiany daty o rok albo 2) dodam że samo dodawanie...
Panowie, poradzcie coś. Spędziłem przy tym pliku już dziesiąt godzin i nic, gdyby data była w pierwszej kolumnie skorzystał bym z rozwiązania adams_nt, ale niestety data jest w dziesiątej kolumnie i nie wazne jak zapiszę kod to albo wyszukiwanie przestaje mi działać, albo dalej pokazuje datę amerykańską. Dzięki za zrozumienie i wszelką pomoc Pozdrawiam
Mam teraz kod : Dodano po 10 Bo pole Image1 to muszę programować tylko pod kątem właściwości wyświetlanego obrazka? Dodano po 19 MAAAAAM !!!! Dodano po 6 A jak zrobić żebym mógł zmienić już wybrany obrazek przed zapisaniem całego UserForm. Już mam trzeba doadać : "AllowMultiSelect = True" Aby przeskalować obraz do wymiaru pola Image trzeba zmienić ustawienia...
Witam, mam problem nie z podglądem obrazka w arkuszu po wywołaniu UserForm, a raczej z brakiem wyświetlania pustego okienka, jak nie ma obrazka. Już tłumaczę - po wywołaniu UserForm podświetlając dane wiersze z arkusza 1 w ListBoxie z prawej strony w Image1 wyświetla mi się podgląd obrazka z widokiem danego elementu. Wszystko gra, jeżeli istnieje opis...
Pozwolę sobie podrążyć temat, licząc na jakieś uwagi. Po pierwsze doczytałem, że parametr vbModeless działa od wersji VB6 więc w starszej wersji Excela raczej nie powinien działać. Po drugie gdy przeczytałem odpowiedź kolegi czeles -ia natychmiast ją wypróbowałem i zadziałało tak jak chciałem, stąd moja radość. Ale po chwili coś się stało z moim plikiem...
Cześć koledzy, Mam do Was ogromną prośbę, mianowicie chciałbym wejść odrobinę w świat Userformów, do tej pory wykonywałem najprostsze, gdzie umieszczałem przyciski start, zapisz etc. Teraz chciałbym pójść o krok dalej, ale totalnie się zagubiłem. Mianowicie tworzę makro, które na podstawie listy funduszy w listoboxie będzie usuwać dane z raportu. Mianowicie,...
Temat ciekawy, więc dołączam. Sprawę blokady zapisu szablonu można rozwiązać następująco Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) If SaveAsUI = False Then Cancel = True End Sub Uwaga: Po wklejeniu tego kodu nie można już zapisać pliku, działa tylko zapisz jako i tak trzeba będzie zapisać szablon. W związku...
A w jakim to języku. Gdyż "userform1" to nie wiele mi mówi ?
Witam, Zrobiłem stany magazynowe oraz historię ich zmian. Mój problem polega na tym, że jak zrobię jakieś pobranie towaru to w historii zmian wszystko ładnie się wyświetla ale tylko ostatnia zmiana. Moje pytanie brzmi jak zrobić by w historii zmian pojawiały się wszystkie wpisy zmian wers pod wersem? A o to mój kod: [syntax=vb]Private Sub CmbAktualizujdane_Click()...
Załączam tutaj plik. Jeżeli nie zadziała to proszę otworzyć i zapisać z obsługą makr i pomóc w rozwiązaniu. Dziękuję
czy nikt się naprawdę nie orientuje w temacie No dobra, ociupinkę. Do drukowania etykiet zwykle wykorzystuje się gotowe szablony. Bywa, że udostępnia je producent drukarki. Najczęściej, niestety, dotyczą Word'a, Writ'a, itp. Czyli ogólnie pliku typu *.doc. Swego czasu Dymo dołączał prościutki programik na CD, ale to kilka lat temu. Te kilka lat temu...
Mam taki problem z UserForm3: Jest przycisk Otwórz plik -> otwiera plik Następnie lista arkuszy z tego pliku w ListBox1 -> użytkownik wybiera ręcznie które arkusze chce przeliczać (może wybrać kilka) Następnie W userform1 jest stworzony listbox1, do którego wrzucam normalną pętlą poszczególne arkusze z otworzonego pliku Następnie W głównym makrze pobieram...
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...
Czesc, Niestety przyszlo mi dzialac w pracy przy pomocy OneDrive, nie kalsycznego serwera gdzie kazdy moze po prostu wejsc do folderu.... i pojawil sie problem z transferem plikow. Mianowice, potrzebuje stworzyc makro, ktore bedzie dosyc prostym UserFormem, w ktorym pozostali wypelnia podstawowe dane oraz za pomoca przycisku ''browse'' wskaza mi plik...
Dzień dobry, Przygotowałem, a raczej zaadaptowałem na podstawie opisanych przykładów kod pod swój arkusz excela. Mam 2 problemy: 1. Potrzebuję w arkuszu "material cost" z którego pobierane są dane dopisywać pozycje - w związku z tym potrzebuję aby combo odświeżało sobie dane przy otwarciu (lub jakiś trigger do odświerzania po wpisaniu nowych danych)...
... 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....
Excel. Jest właściwość MatchEntry ale to nie rozwiązuje problemu. Owszem mogę wprowadzić dowolny tekst ale chciałbym zachować równocześnie możliwość rozpoznawania czy tekst jest nowy czy istniejący na liście. Przy ustawieniu MatchEntry na None kązdy tekst, niezależnie czy istnieje na liście czy nie ma ListIndex = -1. Także chciałbym móc korzystać z...
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...
No i to cały kod: Private Sub ComboBox1_Change() End Sub Private Sub UserForm_Initialize() lista1 = Array("Oferta", "Zamówienie", "Specyfikacja", "Pismo", "Protokół", "Reklamacja") ComboBox1.List = lista1 lista2 = Array("mail", "osobiście", "faks", "DHL") ComboBox2.List = lista2 lista3 = Array("Daniel", "Łukasz C.", "Łukasz M.", "Sławek", "Wiesiek")...
userform makro makro userform wywołanie userform
samsung zdjąć simlocka ciśnienia naczyniu przeponowym termet wyłączenie alarmu satel
Instrukcja Elnix eL7, eL11, eL13, eLWI1 – montaż, programowanie, PDF BMW X3 E83 2.0i 150KM LPG – głośna praca wtryskiwaczy gazu, zawory, diagnostyka, serwis
