Šlo by to jednoduchým vyhodnocením zda jsou čísla posledních řádků ve všech modrých sloupcích stejná.
Příloha: 
21807_povinne_pole_priklad.zip (17kB, staženo 39x)
citovat21807_povinne_pole_priklad.zip (17kB, staženo 39x)
excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Váš průvodce programem Microsoft Excel a programováním maker ve VBA
< návrat zpět
Téma: Vyplnenie povinných polí
Ale aj ak to nie je vyplnené, tak to uloží.
citovat
No ide to aj bez uloženia.
Zatiaľ som našiel riešenie, že neuloží žiadne zmeny a zatvorí zošit bez uloženia. To asi nebude veľmi praktické.citovat
Presne. To je ono.citovat
MS Excel
Téma: Vyplnenie povinných polí 
Zaslal/a mae 7.10.2014 12:17
Ahojte
potreboval bz som poradit.
Mam xls file (priloha) kde je niekolko stlpcov a niektore z nich su povinne polia (pri ich nevyplneni excel nedovoli ulozit subor).
Tento jednoduchy kod:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Cellcontents = ActiveSheet.Range("B5").Value
If Cellcontents = "" Then
Cancel = True
MsgBox "Company Name is empty . Unable to Save!", vbOKOnly, "Check Cells"
Exit Sub
End If
End Sub
..robi to co by som potreboval s tym rozdielom ze ja potrebujem nahradit odkaz na fixnu bunku B5 odkazom na pohyblivu bunku v stlpci B podla toho ktory riadok je posledny vyplneny (Posledny vyplneny riadok moze pocitat podla stlpca B) a potrebujem vyplnit vsetky povinne stlpce nielen stlpec B.
Dakujem pekne za kazdu radu. 
Příloha: 21806_povinne_pole_priklad.zip (8kB, staženo 46x)
21806_povinne_pole_priklad.zip (8kB, staženo 46x)stejné, jen rozšiřené msg
Příloha: 21813_povinne_pole_priklad2.zip (18kB, staženo 37x)
citovat21813_povinne_pole_priklad2.zip (18kB, staženo 37x)Opičák napsal/a:
stejné, jen rozšiřené msgPříloha: 21813_povinne_pole_priklad2.zip
Ale aj ak to nie je vyplnené, tak to uloží.
citovatDakujem za radu Opicak, viacmenej to funguje pre posledny riadok ale je pravda co pise marjankaj ze ak vymazes dake data z povinnych poli napr v predposlednom riadku tak uz ta to pusti ulozit 
citovat
citovatmae napsal/a:
Dakujem za radu Opicak, viacmenej to funguje pre posledny riadok ale je pravda co pise marjankaj ze ak vymazes dake data z povinnych poli napr v predposlednom riadku tak uz ta to pusti ulozit
No ide to aj bez uloženia.
Zatiaľ som našiel riešenie, že neuloží žiadne zmeny a zatvorí zošit bez uloženia. To asi nebude veľmi praktické.citovat
mosquito791 napsal/a:
a co takhle
viz přílohaPříloha: 21825_povinne-pole.zip
Presne. To je ono.citovat
@ Mosquito, dobre riesenie ale ma to jednu malu chybicku - stale sa to da obist a ulozit ak sa nevyplni alebo vymaze stlpec datum podla ktoreho tool pocita.
@ Opicak, toto riesenie by bolo lepsie ak by clovek vyplnal vzdy len jeden riadok (lebo v poslednom riadku ho nepusti ulozit subor ak nema vyplnene uplne vsetky povinne stlpce vratane stlpca datum). Ak vsak vyplni naraz 2 riadky a v tom prvom vynecha co chce tak to tool uz pusti ulozit!
Otazka:
Nedalo by sa to nejako skombinovat aby sa naozaj podarilo zabranit nevyplneniu uplne vsetkych povinnych poli pre kazdy riadok sheetu?
Otazka2:
Ak by som mal obdobnu tabulku na viacerych sheetoch, dal by sa dorobit cyklus pre viacero sheetov? (napr. vyplnil by som 3 sheety nekompletne a tool by ma upozornil na kazdu jednu zle vyplnenu bunku v kadzom jednom sheete)
Dakujem.citovat
@ Opicak, toto riesenie by bolo lepsie ak by clovek vyplnal vzdy len jeden riadok (lebo v poslednom riadku ho nepusti ulozit subor ak nema vyplnene uplne vsetky povinne stlpce vratane stlpca datum). Ak vsak vyplni naraz 2 riadky a v tom prvom vynecha co chce tak to tool uz pusti ulozit!
Otazka:
Nedalo by sa to nejako skombinovat aby sa naozaj podarilo zabranit nevyplneniu uplne vsetkych povinnych poli pre kazdy riadok sheetu?
Otazka2:
Ak by som mal obdobnu tabulku na viacerych sheetoch, dal by sa dorobit cyklus pre viacero sheetov? (napr. vyplnil by som 3 sheety nekompletne a tool by ma upozornil na kazdu jednu zle vyplnenu bunku v kadzom jednom sheete)
Dakujem.citovat
Trochu sem přepsal kód od Mosquita, snad bude vyhovovat.
Příloha: 21886_povinne-pole.zip (13kB, staženo 41x)
citovat21886_povinne-pole.zip (13kB, staženo 41x)Upravil jsem řádek s "r_max" (vba), aby poslední řádek hledal v celém listu a ne ve sloupci "B".
Tohle by snad melo stačit.
Pokud ne, tak bych navrhoval upravit makro tak, aby se při otevírání zamkly již vyplněné buňky(řádky).
Tím by se předešlo nechtěnému mazaní již uložených dat.
Cyklovat by to šlo taky, ale je otázka či v těch ostatních listech budou povinné sloupce stejné.
Tohle by snad melo stačit.
Pokud ne, tak bych navrhoval upravit makro tak, aby se při otevírání zamkly již vyplněné buňky(řádky).
Tím by se předešlo nechtěnému mazaní již uložených dat.
Cyklovat by to šlo taky, ale je otázka či v těch ostatních listech budou povinné sloupce stejné.
Příloha: 21889_povinne-pole.zip (12kB, staženo 40x)
citovat21889_povinne-pole.zip (12kB, staženo 40x)Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Helios iNuvio
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.
RSS nejnovější články