Excel Forum - Porady, Pomoc,  Excel Help, Excel FAQ Strona Główna
 FAQ  RegulaminRegulamin  Szukaj   Użytkownicy   Grupy   Rejestracja   Profil   Twoje wiadomości   Zaloguj 


Poprzedni temat «» Następny temat
ID tematu: 61806 Skopiuj do schowka formularz makro
Autor Wiadomość
RafiG41
Stały bywalec Excelforum


Posty: 396
Wysłany: 28-06-2018, 19:56   formularz makro

Witajcie,

W załączonym pliku chciałbym dalej budować bazę zleceń używając do tego formularza.
Po naciśnięciu przycisku DODAJ chciałbym, aby pojawiał się formularz, w którym można byłoby wpisać nazwę klienta, kod produktu, numer zlecenia, ile jest palet w zleceniu, ile jest sztuk na pełnych paletach oraz ile jest sztuk na końcowej palecie.
Te wszystkie dane żeby dodawały się na końcu bazy.
Chciałbym, żeby było konieczne uzupełnienie wszystkich pól po kolei od góry do dołu, tzn. żeby pojawiał się komunikat o uzupełnieniu brakujących danych gdy któreś z pól zostało wpisane w niewłaściwej kolejności.
Żeby można było dodać tylko wówczas gdy wszystkie pola zostały uzupełnione.
Żeby był komunikat gdy numer zlecenia zostanie wpisany inaczej niż 6-cyfrowy (bo numer zlecenia to zawsze 6 cyfr).
Żeby był komunikat gdy w polach ilość palet, ilość sztuk na palecie pełnej i końcowej zostanie wpisany tekst zamiast cyfry (dopuszczalne tylko wpisanie cyfr).

Z góry dziękuję za pomoc.

dodanie.xlsx
Pobierz Plik ściągnięto 27 raz(y) 12.96 KB

ID posta: 348415 Skopiuj do schowka
 
 
Tadek
Excel Expert


Pomógł: 1416 razy
Posty: 4625
Wysłany: 29-06-2018, 07:31   

Zobacz w załączniku.
Pozdrawiam Tadek

dodanie - Kopia.xlsm
Pobierz Plik ściągnięto 31 raz(y) 23.05 KB

ID posta: 348431 Skopiuj do schowka
 
 
RafiG41
Stały bywalec Excelforum


Posty: 396
Wysłany: 30-06-2018, 07:23   

Tadek dziękuję za propozycje, ale nie do końca o to chodziło.
Chyba ja nie dokładnie napisałem jak to powinno wyglądać.
Otóż nie chodzi o to, żeby na końcu dodawała się jedna linia z wszystkimi danymi, tylko, żeby dodało się tyle linii ile zostanie wpisanych palet, łącznie z końcówką.
Na przykład w formularzu wpiszę, że w zleceniu jest 5 palet po 100 szt i końcówka 90 szt. To chciałbym, aby po wpisaniu takich danych w formularz zostało dopisanych 4 wiersze z ilością 100 szt na palecie i 1 wiersz z ilością 90 szt na palecie. wszystkie pozycje pod sobą.
Czy jest możliwe takie coś do zrobienia?
Bardzo fajnie, że dodałeś przycisk ANULUJ w formularzu, a czy można byłoby go zamienić na przycisk WYCZYŚĆ, żeby po jego naciśnięciu to co zostało wpisane w formularz zostało wykasowane i zostały puste pola gotowe do wpisania kolejnego zlecenia?
Za każdą wypowiedź w tym temacie gwarantuje punkt POMÓGŁ gdy wątek zostanie zakończony.
ID posta: 348477 Skopiuj do schowka
 
 
Tadek
Excel Expert


Pomógł: 1416 razy
Posty: 4625
Wysłany: 30-06-2018, 08:05   

Zobacz w załączniku.

dodanie (3).xlsm
Pobierz Plik ściągnięto 25 raz(y) 25.17 KB

ID posta: 348479 Skopiuj do schowka
 
 
RafiG41
Stały bywalec Excelforum


Posty: 396
Wysłany: 30-06-2018, 12:02   

Super dokładnie o to chodziło.
Jeszcze tylko jakbym mógł prosić o to, żeby ilość sztuk na końcówce nie było polem obowiązkowym, tzn. że może być nie uzupełnione. Chodzi o zabezpieczenie sytuacji, w której palety końcówki nie będzie, a tylko będą w zleceniu pełne palety.
I jeszcze takie drobnostki:
Ograniczenie na numerze zlecenia, że musi być podanych 6 cyfr.
Nazwa klienta pisana tylko wielkimi literami.
Kod produktu mogą być zarówno litery jak i cyfry i znaki specjalne, ale gdy będą litery to tylko dużymi literami.
ID posta: 348482 Skopiuj do schowka
 
 
Tadek
Excel Expert


Pomógł: 1416 razy
Posty: 4625
Wysłany: 01-07-2018, 06:58   

Zobacz w załączniku.

dodanie (4).xlsm
Pobierz Plik ściągnięto 26 raz(y) 26.94 KB

ID posta: 348509 Skopiuj do schowka
 
 
RafiG41
Stały bywalec Excelforum


Posty: 396
Wysłany: 01-07-2018, 09:47   

Tadek, wszystko dokładnie tak jak sobie to wymyśliłem.
Bardzo dziękuję za pomoc.
A dałoby radę jeszcze zrobić tak, żeby po dodaniu danych zaznaczona była ostatnia dodana komórka?
Chodzi o to, żeby użytkownik widział, że to co chciał, że zostało dodane bez konieczności zjeżdżania na sam dół bazy danych, która z czasem będzie bardzo długa.
Wkrótce będę dalej rozwijał ten wątek pod innymi tematami budowy nowych formularzy.
Jeszcze raz dziekuję
ID posta: 348511 Skopiuj do schowka
 
 
Tadek
Excel Expert


Pomógł: 1416 razy
Posty: 4625
Wysłany: 01-07-2018, 14:40   

Na końcu makra, przed End With wstaw:
Kod:
        .Cells(ost + ile, 1).Select
ID posta: 348515 Skopiuj do schowka
 
 
RafiG41
Stały bywalec Excelforum


Posty: 396
Wysłany: 01-07-2018, 15:43   

Wszystko działa tak jak powinno.
Dziękuję
ID posta: 348518 Skopiuj do schowka
 
 
RafiG41
Stały bywalec Excelforum


Posty: 396
Wysłany: 01-07-2018, 20:18   

Jeszcze taka jedna myśl mi przyszła do głowy, żeby po dodaniu danych z formularza każda z nowo dodanych palet otrzymała status NOWA.
Nie chcę tego pola w formularzu, tylko w bazie danych taka dodatkowa informacja jak w załączniku.

REJESTR.xlsm
Pobierz Plik ściągnięto 16 raz(y) 28.22 KB

ID posta: 348522 Skopiuj do schowka
 
 
Tadek
Excel Expert


Pomógł: 1416 razy
Posty: 4625
Wysłany: 02-07-2018, 06:44   

Zobacz w załączniku.

REJESTR (2).xlsm
Pobierz Plik ściągnięto 26 raz(y) 26.32 KB

ID posta: 348531 Skopiuj do schowka
 
 
RafiG41
Stały bywalec Excelforum


Posty: 396
Wysłany: 03-07-2018, 19:40   

Już na pewno ostatnia zmiana w formularzu.
Chodzi o dodanie nowych pól:
- Wyrób (dopuszczalne tylko 6 cyfr)
- Rodzaj produktu (wybór z listy rozwijanej, do której dane są w zakładce "pomoc")
- Po maszynie (wybór z listy rozwijanej, do której dane są w zakładce "pomoc")

rejestr_2.xlsm
Pobierz Plik ściągnięto 16 raz(y) 28.8 KB

ID posta: 348646 Skopiuj do schowka
 
 
Tadek
Excel Expert


Pomógł: 1416 razy
Posty: 4625
Wysłany: 04-07-2018, 07:45   

Cytat:
Już na pewno ostatnia zmiana w formularzu
Wątpię :mrgreen:
Te dodatki zmieniły układ w tabeli, więc naruszyły makra.
Jeśli dodajesz kolumny rób to na końcu tabeli.

rejestr_3.xlsm
Pobierz Plik ściągnięto 24 raz(y) 29.64 KB

ID posta: 348675 Skopiuj do schowka
 
 
RafiG41
Stały bywalec Excelforum


Posty: 396
Wysłany: 05-07-2018, 19:11   

Tadek, pewnie masz racje że wątpisz.....

Mam dwie małe uwagi do ostatniego pliku:
- ilość na końcowej palecie wchodzi też w numer wyrobu - a nie powinna
- na numerze wyrobu czy mógłbyś zrobić taką sama blokadę jak na numerze zlecenia i taki sam komunikat gdy jest źle wpisany?

Wkrótce napiszę nowy wątek z kolejnym formularzem do tego pliku :)
Ilość POMÓGŁ u mnie nieograniczona
ID posta: 348784 Skopiuj do schowka
 
 
Tadek
Excel Expert


Pomógł: 1416 razy
Posty: 4625
Wysłany: 06-07-2018, 06:43   

Dla blokady numeru wyrobu dodaj do makr coś takiego:
Kod:
Private Sub TextBox6_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Application.EnableEvents = False
If Len(TextBox6) < 6 Then
MsgBox "Nr wyrobu musi być liczbą 6-cyfrową!", vbCritical, "BŁĄD"
TextBox6 = ""
End If
Application.EnableEvents = True
End Sub

a tego:
Cytat:
- ilość na końcowej palecie wchodzi też w numer wyrobu - a nie powinna
nie rozumiem.
Pokaż na przykładzie o co chodzi (wstaw dane z palca).
ID posta: 348794 Skopiuj do schowka
 
 
Wyświetl posty z ostatnich:   
Odpowiedz do tematu
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Nie możesz załączać plików na tym forum
Możesz ściągać załączniki na tym forum
Dodaj temat do Ulubionych
Wersja do druku

Skocz do:  

Powered by phpBB modified by Przemo © 2003 phpBB Group
Theme xandgreen created by spleen& Programosy modified v0.3 by warna
Opieka techniczna www.marketingNET.pl

Archiwum

Strona używa plików cookies.

Kliknij tutaj, żeby dowiedzieć się jaki jest cel używania cookies oraz jak zmienić ustawienia cookie w przeglądarce.
Korzystając ze strony użytkownik wyraża zgodę na używanie plików cookies, zgodnie z bieżącymi ustawieniami przeglądarki.
Sprawdź, w jaki sposób przetwarzamy dane osobowe