• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

Příspěvky uživatele

vyskusaj, zatial som tam nedaval ziadne osetrujuce (blbuvzdorne) veci tak keby daco tak pis

Application.Screenupdating = False , na zaciatok pozadovaneho kodu

dlasia moznost ak chces v slucke pouzit viacbunkovu oblast:

Range(Cells(riadok_zaciatku, stlpec_zaciatku), Cells(riadok_konca, stlpec_konca))

Private Sub CommandButton1_Click()
Cells(7, 6).Value = ComboBox1.Value
Cells(7, 8).Value = ComboBox2.Value
Cells(7, 10).Value = TextBox1.Value
End Sub

nieco pre inspiraciu, mozo z toho aj nieco pouzijes
(funguje iba EDIT, ostatne som nestihol dorobit a uz to nieje priorita,tak uz asi ani nedokoncim, ale ten edit je premakany, myslim )

ked uz toto zvladas tak by pre Teba nemal byt problem sa presmerovat na list ZADOST ( Sheets(2).Select ak je to druhy list pripadne mozes pouzit Sheets("ŽADOST").Select) dalej ides tak isto (Cells ......), potom sa vsak nezabudni vratit spet na list 1 (ak potrebujes, alebo by som vsetky veci zapisal na list 1 a nasledne sa prepol na list2 a zapisal veci ktore chces).
2. vecsinu som sa naucil tu na fore, nieco pomoze aj help ak si uz v niecom programoval aspon zaklady

v pripade otazok pis, radi pomozeme


Private Sub CommandButton1_Click()
Sheets(1).Select 'zvoli list 1
riadok = ActiveSheet.UsedRange.Rows.Count + 1 'najde prazdny riadok
'Cells (riadok, stlpec) - bunka kde prva premenna oznacoje riadok a druha stlpec kde sa dana bunka nachadza Cells(1,1) - bunka A1

Cells(riadok, 1).Value = TextBox16.Value ' UNI do bunky(riadok, 1) - druhy riadok je to A2 , zapise hodnotu Textboxu16
Cells(riadok, 2).Value = TextBox1.Value
Cells(riadok, 4).Value = TextBox3.Value
Cells(riadok, 5).Value = TextBox4.Value
Cells(riadok, 6).Value = TextBox25.Value
Cells(riadok, 7).Value = TextBox5.Value
Cells(riadok, 8).Value = TextBox6.Value
Cells(riadok, 9).Value = TextBox7.Value
Cells(riadok, 10).Value = TextBox8.Value
Cells(riadok, 11).Value = TextBox9.Value
Cells(riadok, 12).Value = TextBox10.Value
Cells(riadok, 13).Value = TextBox11.Value
Cells(riadok, 14).Value = TextBox12.Value
Cells(riadok, 15).Value = TextBox13.Value
Cells(riadok, 16).Value = TextBox15.Value
Cells(riadok, 17).Value = TextBox14.Value
Cells(riadok, 18).Value = TextBox17.Value
Cells(riadok, 19).Value = TextBox18.Value
Cells(riadok, 20).Value = TextBox24.Value
Cells(riadok, 21).Value = TextBox19.Value
Cells(riadok, 22).Value = TextBox21.Value
Cells(riadok, 23).Value = TextBox23.Value
Cells(riadok, 24).Value = TextBox20.Value

Sheets("Žadost").Select 'zvoli list Žadost
Cells(4, 3).Value = TextBox1.Value
'...............................................

skus

keby si dal tu na forum malu ukazku (aj ked vymyslene data, potrebujeme len format) tak uz to mas davno spravene

tie cisla su rozne alebo sa vyskytuju rovnake v tabulke? islo by to porovnanim rovnakeho cisla v jednej a druhej tabulke?

skrytie stlpcov:
ozacis stlpce (hore jak mas nazvy stlpcov A, B C ...) bud suvysle (na zaciatocnom stlpci ktory chces schovat stlacis a drzis LMB - lave tlacitko mysi a tahas az na posledny stlpec ktory chces skryt) alebo vyberies ktore chces (vyberies prvy nasledne stlacis a drzis Ctrl a postupnym klikanim LMB na pozadovane stlpce oznacis dalsie), vstko pustis a na jeden z vybranych nazvov stlpcov kliknes pravym tlacitkom, rozbaly sa zoznam v ktorom das Skryt alebo Hide
skrytie riadkov:
tak ako stlpce len vyberas riadky

moze byt ?

excel mi uz ide

ano myslel som to presne tak ako to spravil M+

momentalne mi nefunguje excel ale tak Ti nedam prilohu ale je to jednoduche

spravis tabulku kde bude obsah rozbalovacieho okna a hodnota pevne priradena k jednotlivym polozkam

dalej das SVYHLEDAT (momentalne neviem v anj - vlookup asi) viazane na vybranu polozku v rozbalovacom zozname.

nic?

no myslim ze ked zacnes a narazis na nejaky problem tak tu Ti urcite pomozeme, ale len tak povedat ze "urob to takto" asi nepojde, neviem ci ti niekto pomoze viac ako ja touto radou , ja osobne som zacal z nicoho, s tym ze excel som neznasal a nikdy predtym som v nom nerobil, a chlapci tu na fore zo mna spravily "profika"

dakujem chlapci

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse