Příspěvky uživatele


< návrat zpět

Strana:  1 ... « předchozí  16 17 18 19 20 21 22 23 24   další » ... 35

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 5 )

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 7

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 5

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 1 , 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" 5

dakujem chlapci 5 5 5


Strana:  1 ... « předchozí  16 17 18 19 20 21 22 23 24   další » ... 35

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

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.

On-line nástroje