Stránka 1 z 2
Excel: Pomoc s vytvořením formuláře
Napsal: 18 dub 2010 14:41
od mates1000
Ahojky lidičky prosím mám prozbu potřebuju pomoc.
Dělám si datábazi zákazníků a potřeboval bych udělat nějaké vyskakovací okno do kterého bych mnou zvolené hodnoty zapsal a ony by se automaticky přiřadili do svých pozic psílám v tabulce. Vůbec si stím nevím rady s exelem moc neumím píchněte mi díky.
Kdyby to šlo udělat jako je to v souboru formulář akorát hodnoty jinačí i s tlačítkem formulář díky ještě jednou
// Změna názvu tématu. Původní název "vyskakovací tabulka" svou nulovou informační hodnotou porušoval pravidla tohoto fóra
// mike007
Re: Vyskakovací tabulka
Napsal: 18 dub 2010 16:19
od navstevnik
Pokud, jak pises, s excelem moc neumis, tak pichnout stim je udelat to.
Mozna ze pro tvou potrebu vystaci po mirne uprave tabulky (slucovaci pole) zabudovana funkcionalita Formular (Data>Formular), vice najdes v napovede k Excelu (podle verze Excelu - tema): Přidání záznamu do seznamu pomocí datového formuláře
Re: Vyskakovací tabulka
Napsal: 18 dub 2010 18:31
od mates1000
Tak to je ono co potřebuje jen aby mi vyskočila sama při otevření dokumentu
Re: Vyskakovací tabulka
Napsal: 19 dub 2010 09:39
od navstevnik
1. Datovy formular je vazan na konkretni list, takze nutno resit udalostni procedurou pri aktivaci listu, nelze pri otevreni dokumentu (byl by navazan na posledni aktivni list pred uzavrenim nebo by bylo nutno pri otevreni dokumentu stanovit, ktery list bude altivni)
2. Pro datovy formular seznam nemuze obsahovat ruzna sloucena pole, ktera jsou pouzita v priloze, ale musi obsahovat pouze hlavickovy radek bez sloucenych bunek.
Re: Excel: Pomoc s vytvořením formuláře
Napsal: 19 dub 2010 18:34
od mates1000
No už jsem se dopídíl vak ve visual basic si navrhnout ten konkrétní formulář jen ještě udělat aby se ostatní věci zařadili tak jak mají s tím taky asi nepomůžeš stačí jen navíst jak to udělat nebo kde najdu odkaz jak přiřadit konkrítní funkce. jinak dík
Re: Excel: Pomoc s vytvořením formuláře
Napsal: 19 dub 2010 18:58
od navstevnik
Re: Excel: Pomoc s vytvořením formuláře
Napsal: 22 dub 2010 21:26
od mates1000
ahojky mám prozbu potřebuju dosadit hodnoty z texboxu přes tlačítka do buně tak aby po každé při vložení se odřádkovalo dík
Re: Excel: Pomoc s vytvořením formuláře
Napsal: 22 dub 2010 22:11
od navstevnik
Predpokladejme, ze ukladani je spusteno tlacitkem CommandButton1 na uzivatelskem formulari.
V modulu UserForm vloz proceduru CommandButton1_Click.
A nyni v procedure je potreba nalezt prvni volnou bunku v bloku ukladanych dat na listuxx, sloupec A:A, hlavicka je v
A2, napr.:
Kód: Vybrat vše
' prvni volna bunka ve sloupci pocinaje A1, v A2 je hlavicka sloupce
Dim LCll As Range
Set LCll = Worksheets("listxx").Cells(1, "A").End(xlDown).Offset(1, 0)
MsgBox LCll.Address
a ulozit obsah z textboxu, obsah textboxu je retezec, pokud je potreba pro dalsi vypocty cislo, nutno konvertovat (fce CInt,CLng,...) :
Kód: Vybrat vše
LCll.Value=TextBox1.Value
LCll.Offset(0,1).Value=CLng(TextBox2.Value)
...
Vynulovat TextBoxy:
Re: Excel: Pomoc s vytvořením formuláře
Napsal: 22 dub 2010 22:57
od mates1000
Takže jestli to chápu dpbře mělo by to vypadat asi takhle:
potřebuju dosadit do buňky a1 na listu 1
Private Sub CommandButton1_Click()
' prvni volna bunka ve sloupci pocinaje A1, v A2 je hlavicka sloupce
Dim LCll As Range
Set LCll = Worksheets("listxx").Cells(1, "A").End(xlDown).Offset(1, 0)
MsgBox LCll.Address
End Sub
Private Sub TextBox1_Change()
End Sub
Re: Excel: Pomoc s vytvořením formuláře
Napsal: 23 dub 2010 09:36
od navstevnik
Nejdrive uvadis: "dosadit hodnoty z texboxu přes tlačítka do buně tak aby po každé při vložení se odřádkovalo", nyni uvazujes o pouziti udalostni procedury Sub TextBox1_Change(). Bylo by vhodne ujasnit si, co, kdy a jak ma byt vykonano.
Je nutni si uvedomit, ze udalostni procedura Sub TextBox1_Change() reaguje na kazdou zmenu byt jedineho znaku vcetne resetu obsahu v textboxu, takze neni vhodna pro zamysleny ucel zapisovat obsah textboxu do bloku bunek.
To co jsem uvedl v predchozi odpovedi, patri do jedne jedine procedury vykonane po stisku prislusneho tlacitka - Sub CommandButton1_Click() na uzivatelskem formulari: nalezt prvni volnou bunku v bloku cilovych dat, prenest obsah textboxu do bunky/ek (vcetne pripadne konverze retezce na pozadovany typ) a vyprazdneni obsahu textboxu a pripadne dalsi potrebne operace.
Re: Excel: Pomoc s vytvořením formuláře
Napsal: 23 dub 2010 15:25
od mates1000
Nene špatně jsem to napsal potřebuji z formuláře disadit údaje z texboxu přes CommandButton1do mnou zadávaných buněk
takže mám 5 texboxu s určitým názvem např. Jméno příjmení, telefon a tak. Stejné náyvy jsou v tabulce pod buňkou B6,C6,D6 a tak dále potřebuji když stisknu CommandButton1aby se to projevilo v konkrétní řádce a posléze se hned odřádkovalo připojuji soubor pro test
Re: Excel: Pomoc s vytvořením formuláře
Napsal: 23 dub 2010 18:06
od navstevnik
Z toho, cos napsal, nejsem dvakrat chytry.
Obsah textboxu je potreba po stisku tlacitka "Vlozit" na formulari ukladat postupne pocinaje radkem 6 (B6,C6,...) nebo do radku 4 a pak dal co?
Co znamena odradkovat - co se ma vykonat?
Zkus prosim jasne a jednoduse popsat, co pozadujes, protoze zatim mam dojem, ze ja o voze a ty o koze.
PS.: k cemu ma slouzit tlacitko1 na listu?
Jaky ma mit smysl procedura Workbook_Open vlozena do standardniho modulu2?
Sloucene bunky v radku 5 budou prinaset problemy pri identifikaci prvniho volneho radku pro ulozeni dat (pokud je toto cilem), bude zadouci zrusit sloucene radky nebo hlavickovy radek vlozit do radku 6.
Tabulka bude mit rozsah pouze do radku 21? v bunce C26 je funkce.
Pro vytvoreni databaze zakazniku je vhodne nevytvaret mesicni seznamy, ale jedinou dtatbazi a mesicni prehledy vytvaret treba aut. fitrem .