Re: Formatovani udaju v Excelu

From: Tomás Vymetal (vymetalt@snt.cz)
Date: 25. 08. 2003, 10:21 CEST


proc slozite kdyz to jde jednoduse ;))
normálne vlozit do sloupecku pod sebe a udelat rovnice treba na jinej list,
kde první slupecek bude =a1, druhej =a2, tretí =a3. Kdyz se to pak protáhne
na sto rádku, druhej rádek bude mít automaticky hodoty b1,b2 a b3. Kdyz to
pak vsechno oznacíte a dáte kamkoliv pravým vlozit jinak/hodnoty, tak to je,
vse co potrebujete.

Imho, neví nekdo, jak udelat z textový nul císelné. Kdysi jsme delali
sílenou statistickou tabulku a bunky byly nastavený na text, kdyz se do nich
zadaly nuly a posléze celá tabulka (bunky) zmenila na císelné hodnoty, císla
si excell prelouskal, ale nuly se jako císla nedají pouzít. Tehdy jsem
pouzil neco podobného jako výse, ale verím, ze excell má v sobe neco na
opravu, jen to najít.

T.V.




----- Original Message -----
From: "MilanK" <milan@kev.sk>
To: <servis-internet@nawebu.cz>
Sent: Thursday, August 21, 2003 9:06 AM
Subject: Re: Formatovani udaju v Excelu


> >> mozem nieco zosmolit za par minut :-)
> > Bud tak laskav. Diky.
>
> Je to vtakovina, spichnuta fakt za par minut :-)
> Alex sa mozno bude rehotat :-)
> Ale funguje to, skusal som...
> Dufam ze vies co s tym, alebo sa este ozvi.
>
> Milan K.
> milan@kev.sk
>
> --cut--
> Sub Tried_cennik()
> ' 21.8.2003, autor Milan Kevély
> Dim P
> Range("A1").Select
> ZNOVA:
>     ActiveCell.Offset(1, 0).Range("A1").Select
>     Selection.Cut
>     ActiveCell.Offset(-1, 1).Range("A1").Select
>     ActiveSheet.Paste
>     ActiveCell.Offset(2, -1).Range("A1").Select
>     Selection.Cut
>     ActiveCell.Offset(-2, 2).Range("A1").Select
>     ActiveSheet.Paste
>     ActiveCell.Offset(3, -2).Range("A1").Select
> If ActiveCell <> "" Then GoTo ZNOVA
> Range("A1").Select
> DOLE:
> P = 0
>     ActiveCell.Offset(1, 0).Range("A1").Select
> MAZ:
>     If ActiveCell = "" Then Selection.EntireRow.Delete
> P = P + 1
>     If ActiveCell <> "" Then GoTo DOLE
>     If P < 4 Then GoTo MAZ
> Range("A1").Select
> End Sub
> --/cut--
>
>
>
> ===================================================== reklama =====
> Audit webhostingovych sluzeb - wAudit: http://www.lupa.cz/waudit/
> Vyberte si nejkvalitnejsi webhosting on-line.
> ===================================================================
>
> --
> -- Konference: SERVIS ------ Pravidla: http://pravidla.kab.cz/ --
> -- Archiv, instrukce pro odhlaseni: http://internet.nawebu.cz/ --
> -- Konference Internet Info, s.r.o. ----- http://www.iinfo.cz/ --
>



This archive was generated by hypermail 2.1.3 : 25. 08. 2003, 10:21 CEST