Zkusil jsem to, podivejte se v priloze...
Příloha: 
3728_ppapv.zip (12kB, staženo 11x)
citovat3728_ppapv.zip (12kB, staženo 11x)
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: automaticke doplneni
MS Excel
Téma: automaticke doplneni 
Zaslal/a 11.1.2011 8:21
Dobra den,
chtel jsem se zeptat zda jde vytvorit pomoci VBA toto:
mam formular ktery ma jeden textbox do neho zapisi hodnotu bud PP nebo PV a po odeslani vytvorim v liste novy radek s touto hodnotou bunce A. Potreboval bych, ale aby se zaroven automaticky doplnilo poradove cislo V bunce B podle typu bunky A. tzn PP001, dalsi PP002, PV001, PV002 atd. Proste spocitat vzdy kolik je PP nebo PV a doplnit ciselnou radu. Pisi to asi trochu zmatene, ale snad to nekdo pochopi.
Diky
(11.1.2011 21:55)#003729
Diky to je ono, ale jeste otazku co kdyz misto PV a PP bych chtel pouzit PV/11/ a PP/11/, kde prenastavim pocet tech znaku pro vyhledavani.
moc dikycitovat
moc dikycitovat
skoda, zes to nenapsal rovnou...
Nejprve se musi upravit naplneni comboboxu (makro UKAZ).
No a potom je potreba v procedure 'Private Sub cmbOZN_Change()
' predelat Left(Cells(i, 2), 2) na Left(Cells(i, 2), 6) a Format(Right(Cells(i, 2), Len(Cells(i, 2)) - 2) + 1, "000") na Format(Right(Cells(i, 2), Len(Cells(i, 2)) - 6) + 1, "000")
snad jsem na nic nezapomnel.
Priste, prosim, zadej dotaz co nejpresneji...
citovat
Nejprve se musi upravit naplneni comboboxu (makro UKAZ).
No a potom je potreba v procedure 'Private Sub cmbOZN_Change()
' predelat Left(Cells(i, 2), 2) na Left(Cells(i, 2), 6) a Format(Right(Cells(i, 2), Len(Cells(i, 2)) - 2) + 1, "000") na Format(Right(Cells(i, 2), Len(Cells(i, 2)) - 6) + 1, "000")
snad jsem na nic nezapomnel.
Priste, prosim, zadej dotaz co nejpresneji...
citovat(11.1.2011 23:14)#003731
Diky moc, to je ono.
Jeste jedna otazka, da se osetrit, ze kdyz mam na uplnem zacatku prazdne radky, aby se dalo zapsat cislo 001, ted to nelze, az kdyz doplnim prvni radek cislem 001 pak uz je vse ok a dale se uz radky pricitaji jak maji. Neni to ale az tak dulezite. Jinak jeste jednou velke diky.citovat
Jeste jedna otazka, da se osetrit, ze kdyz mam na uplnem zacatku prazdne radky, aby se dalo zapsat cislo 001, ted to nelze, az kdyz doplnim prvni radek cislem 001 pak uz je vse ok a dale se uz radky pricitaji jak maji. Neni to ale az tak dulezite. Jinak jeste jednou velke diky.citovat
slo by to, ale kdyz to neni tak dulezite, tak bych to nechal byt, protoze uz by to bylo slozitejsi...no, teda zase ne tak uplne slozite, ale kdyz to neni pripad na kazdy den, tak proc to delat, ze? 
(musela by se rozsirit podminka pri prochazeni stavajicich zapisu...kdyby to bylo zivotne dulezite, tak to pujde )citovat
(musela by se rozsirit podminka pri prochazeni stavajicich zapisu...kdyby to bylo zivotne dulezite, tak to pujde )citovatUž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