GoldenLine
Zaloguj się

konto usunięte

Temat: Sprawdzenie 40 kontrolek w formularzu pod kątem wypełnienia

Witam,

bujam się z problem już jakiś czas i nie potrafię go przeskoczyć. Mam w formularzu 40 kontrolek. Chciałbym złapać moment gdy WSZYSTKIE na raz są puste (niewypełnione) i wtedy zaprogramować sobie jakieś działanie - nie wiem komunikat i daną procedurę.

Problem w tym, że wszędzie tam gdzie szukam - rozwiązanie jest takie, że procedura daje komunikat gdy chociaż jedna jest pusta co w moim wypadku (wypełnione 99% formularza) wywala całość. Nie wiem jak złapać kontrolki text_box1 do 40 jeśli wszystkie są puste.

Macie jakiś na to pomysł?
Link do wypowiedziLink
Sławomir Broda

Sławomir Broda VBA, Excel, Access,
SAP i wszystko
związane z
automatyzac...

Temat: Sprawdzenie 40 kontrolek w formularzu pod kątem wypełnienia

Marcin K.:
Witam,

bujam się z problem już jakiś czas i nie potrafię go przeskoczyć. Mam w formularzu 40 kontrolek. Chciałbym złapać moment gdy WSZYSTKIE na raz są puste (niewypełnione) i wtedy zaprogramować sobie jakieś działanie - nie wiem komunikat i daną procedurę.

Problem w tym, że wszędzie tam gdzie szukam - rozwiązanie jest takie, że procedura daje komunikat gdy chociaż jedna jest pusta co w moim wypadku (wypełnione 99% formularza) wywala całość. Nie wiem jak złapać kontrolki text_box1 do 40 jeśli wszystkie są puste.

Macie jakiś na to pomysł?
W metodzie change dla każdego textbox pentalka biegająca po wszystkich textboxach i sprawdzająca stan.
Link do wypowiedziLink
Oskar Shon

Oskar Shon Dodatki do Office
www.VBATools.pl

Temat: Sprawdzenie 40 kontrolek w formularzu pod kątem wypełnienia

jakoś tak:
Dim i%, ile%

For i = 1 To 40 

 if len( Me.Controls("TextBox" & i).Text)>0 then ile = ile+1 

Next i

msgbox "Wypełnionych textboxów jest: " & ile
Ten post został edytowany przez Autora dnia 22.07.16 o godzinie 15:44
Link do wypowiedziLink
« Wróć do tematów
Odpowiedz

Podobne tematy


Następna dyskusja:

czy jest mozliwosc odwolani...




Wyślij zaproszenie do
Anuluj