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: Naučit formuláře se zadáváním dat
Uzamčeno - nelze přidávat nové příspěvky.
MS Excel
Téma: Naučit formuláře se zadáváním dat 
Zaslal/a jablkonova.zuza 26.3.2012 9:43
Dobrý den,
s makrama už to je dobrý, to jsem tu částečně odkoukal a něco vygůglil, ale prosím o pomoc jak udělat vstupní tabulku, (v přiloženém souboru je jako formulář) která se mi zobrazí po kliknutí na tlačítko - kam uživatelé zadají hodnoty a ty se vloží do jiného listu.
A potom ještě jak do toho zapojit ten kód co tam mám připravený pro tisk, aby se to udělalo najednou
Děkuji moc za pomoc a přeji hezký den
Je to pro Excel2007
Radek Hlavatý
Příloha: 
7782_vstupy.rar (16kB, staženo 42x)
7782_vstupy.rar (16kB, staženo 42x) Uzamčeno - nelze přidávat nové příspěvky.Děkuji, děkuji moc.
To je ono, studuji to a nevím jakou formou se tam do těch buněk dostávají ta čísla (???)
Přenesl jsem to do jiného sešitu a tam to nefunguje.
Děkuji moc za nakopnutí jak dál.
Děkujicitovat
To je ono, studuji to a nevím jakou formou se tam do těch buněk dostávají ta čísla (???)
Přenesl jsem to do jiného sešitu a tam to nefunguje.
Děkuji moc za nakopnutí jak dál.
Děkujicitovat
Každý z těch Textboxů má ve vlastnostech (Properties) ve štítku (Tag) adresu buňky do níž se hodnota z něj má zapsat.
Smyčka For Each Control In Me.Controls
If Left(Control.Name, 7) = "TextBox" Then Sheets("Tabulka").Range(Control.Tag) = Control.Text
Next
při stisknutí tlačítka projede všechny prvky formuláře a u těch jejichž název začíná TextBox koukne do tagu a pak do buňky listu "Tabulka" do dané buňky (dle toho tagu) zapíše hodnotu daného Textboxu.
M@citovat
Smyčka For Each Control In Me.Controls
If Left(Control.Name, 7) = "TextBox" Then Sheets("Tabulka").Range(Control.Tag) = Control.Text
Next
při stisknutí tlačítka projede všechny prvky formuláře a u těch jejichž název začíná TextBox koukne do tagu a pak do buňky listu "Tabulka" do dané buňky (dle toho tagu) zapíše hodnotu daného Textboxu.
M@citovat
Ještě jedna prosba.
Jak by se nejlépe udělalo to, když budu potřebovat zapisovat hodnoty ještě do několika takových tabulek, které budou mít odlišný počet řádků.
Je lepší (ale asi na správu a úpravy v kódu krkolomnější a sebe vražednější) udělat několik formulářů se spoustou popisků a nebo jde do štítku (Tag) napsat adresu buňky podle nějakého kritéria?
Děkuji moc za pomoc
Z.citovat
Jak by se nejlépe udělalo to, když budu potřebovat zapisovat hodnoty ještě do několika takových tabulek, které budou mít odlišný počet řádků.
Je lepší (ale asi na správu a úpravy v kódu krkolomnější a sebe vražednější) udělat několik formulářů se spoustou popisků a nebo jde do štítku (Tag) napsat adresu buňky podle nějakého kritéria?
Děkuji moc za pomoc
Z.citovat
Pokud předem víš kam, tak to lze, akorát už trochu složitěji pomocí select case, třeba podle tagu, když tag = něco, tak zapiš hodnotu daného textboxu do listu n1 a buňky xy1, listu n2 a buňky xy2 ...
Bude-li to vždy stejné tak by do těch další tabulek šel dát odkaz na buňku této jediné vyplňované tabulky, ale to už záleží na každém jak to použije :-)
M@citovat
Bude-li to vždy stejné tak by do těch další tabulek šel dát odkaz na buňku této jediné vyplňované tabulky, ale to už záleží na každém jak to použije :-)
M@citovat
Děkuji. Zatím postačí ta druhá možnost přes odkaz. Člověk vždy hledá nějaké složité řešení, když to jde tak primitivně.citovat
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