Forum Coders' city Strona Główna Coders' city
Nasza pasja to programowanie!
 

 PomocPomoc   SzukajSzukaj   UżytkownicyUżytkownicy   GrupyGrupy  RejestracjaRejestracja 
Archiwum starego forum + teoria    RSS & Panel/SideBar
 ProfilProfil   Zaloguj się, by sprawdzić wiadomościZaloguj się, by sprawdzić wiadomości   ZalogujZaloguj 

Potrzebuję szybkiej odpowiedzi na moje pytanie... Zasady

[Excel] Jak zastosować tutaj pętle For albo jakąś inną.

Idź do strony Poprzedni  1, 2

 
Odpowiedz do tematu    Forum Coders' city Strona Główna -> Oprogramowanie biurowe
Zobacz poprzedni temat :: Zobacz następny temat  
Autor Wiadomość
czarodziejczarek



Dołączył: 19 Kwi 2017
Posty: 6

PostWysłany: Pią Kwi 21, 2017 6:48 pm  OP    Temat postu: Odpowiedz z cytatem Pisownia

Nie łącze by było wyraźnie, znalazłem takie coś na jakimś niemieckim forum...

Kod:
okno1 = Application.InputBox("Początek usuwanego terminu (  dzień ). Wpisz liczbę porządkową." & vbCrLf  & "Z przedziału od 1 do " & d & ".", "Rejestrator pokoi 2017.", 1, , , , , 1)

okno2 = Application.InputBox("Koniec usuwanego terminu ( dzień ). Wpisz liczbę porządkową." & vbCrLf & "Z przedziału od 1 do " & e & ".", "Rejestrator pokoi 2017.", 1, , , , , 1)
(Do kodu stosuj znaczniki code[] - Samolot)

Opis:
https://books.google.de/books?id=5GhiwgFDdHYC&pg=PT197&lpg=PT197&dq=Application.Inputbox+vba+opis&source=bl&ots=IrG5ODJZgj&sig=MMYommXb_3O_7p9U4pp4dsmj5x8&hl=pl&sa=X&ved=0ahUKEwi1hrHci7bTAhUEEpoKHVDqAhQQ6AEIXjAJ#v=onepage&q=Application.Inputbox%20vba%20opis&f=false

Liczba 1 odpowiada za cyfry :-)

https://books.google.de/books?id=q8x5DQAAQBAJ&pg=PA110&lpg=PA110&dq=Application.Inputbox+vba+opis&source=bl&ots=eQekw5hcEU&sig=rOgsTYndKx3OZZ2rxQ2Sik5M8YI&hl=pl&sa=X&ved=0ahUKEwi1hrHci7bTAhUEEpoKHVDqAhQQ6AEITzAG#v=onepage&q=Application.Inputbox%20vba%20opis&f=false


Strona 196 ;-) DE
Strona 111 ;-) USA

Pozdrawiam
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość
samolot



Dołączył: 26 Sty 2006
Posty: 8076
Skąd: Toruń

PostWysłany: Pią Kwi 21, 2017 7:53 pm      Temat postu: Odpowiedz z cytatem Pisownia

czarodziejczarek napisał:
...czy istnieje możliwość zablokowania w "OKNIE INPUTBOX" wprowadzania tekstu to znaczy, że wprowadzamy tylko i WYŁĄCZNIE cyfry.
Tak.

czarodziejczarek napisał:
znalazłem takie coś na jakimś niemieckim forum...
Kod:
okno1 = Application.InputBox("Początek usuwanego terminu ( dzień ). Wpisz liczbę porządkową." & vbCrLf & "Z przedziału od 1 do " & d & ".", "Rejestrator pokoi 2017.", 1, , , , , 1)
okno2 = Application.InputBox("Koniec usuwanego terminu ( dzień ). Wpisz liczbę porządkową." & vbCrLf & "Z przedziału od 1 do " & e & ".", "Rejestrator pokoi 2017

Ten kod namawia użytkownika do wprowadzenia prawidłowych danych, co nie oznacza, że użytkownik zawsze tak zrobi.
Dlatego dalej w kodzie należy najpierw te dane poddać walidacji i dopiero dalej użyć do dalszego przetwarzania.

_________________
Nie zadawaj bezcelowych pytań / Windows 8.1 / Windows 10 / VB2008 / VB 2010 / VB 2012 / Pisz poprawnie
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość Wyślij email
Wyświetl posty z ostatnich:   
Odpowiedz do tematu    Forum Coders' city Strona Główna -> Oprogramowanie biurowe Wszystkie czasy w strefie CET (Europa)
Idź do strony Poprzedni  1, 2
Strona 2 z 2

 
Skocz do:  
Możesz pisać nowe tematy
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
Możesz dodawać załączniki na tym forum
Możesz pobierać pliki z tego forum




Debug: strone wygenerowano w 0.08971 sekund, zapytan = 11
contact

| Darmowe programy i porady Jelcyna | Tansze zakupy w Helionie | MS Office Blog |