Příspěvky uživatele


< návrat zpět

Strana:  1 ... « předchozí  145 146 147 148 149 150 151 152 153   další » ... 156

Aj bielu farbu považuješ za farbu? 4

Trochu som to upravil.
Ale ak to chceš použiť priamo v liste, tak prečo nepoužiješ funkciu =ZLEVA(A1;2)? Alebo anglicky =LEFT(A1;2)

Function smazat_nesmazat(Retezec As String)as string
Dim x as string
if len(Retezec)=3 then x=left(retezec,2) else x=retezec
End If
smazat_nesmazat=x
End Function

Ale stačí ti to aj takto
Function smazat_nesmazat(Retezec As String)as string
smazat_nesmazat=left(retezec,2)
End Function

Sub AktualizaceCasu()
UserForm1.Label5.Caption = Format(tCas * 24 * 3600, "#")
NextTick = Now + TimeValue("00:00:01")
tCas = tCas + TimeValue("00:00:01")
Application.OnTime NextTick, "AktualizaceCasu"
End Sub

Možno aj takto.

Celkom nerozumiem otázke. Veď v neprestupnom roku ti dátum 29.2. vynecháva.

Stačí?

súbor

Do stlpca B5 daj vzorec =DATE(YEAR(B4);MONTH(B4)+1;DAY(B4))
A skopíruj až po B15
A do AD5 vzorec =IF(MONTH(AC5+1)=3;"";AC5+1))

Veď si to predsa chcel pre celé stĺpce G a J 4

Potřeboval bych radu, jak to upravit, aby to fungovalo pro pro všechny řádky v sloupci.

A čo takto?

=IF(AND(A2>100000;A2<800000);CHOOSE(MOD(A2/100000;9);"malé";$F$3;$G$3;$H$3;$I$3;$J$3;$K$3;$L$3;"velké";"ešte väčšie");"")

Sheets("Harok1").Cells(Radek, 8)= Cells.(Radek, 5)*Cells.(Radek, 7)

sumif(A1:A20;">0")
sumif(A1:A20;"<0")

Asi takto sa to tvorí. Ako píše aj pavlus.
Hyperbolický paraboloid.

IF((A1+A2+A3)<20;"nízke hodnoty";IF((A1+A2+A3)>31;"vysoké hodnoty";"stredné hodnoty"))


Strana:  1 ... « předchozí  145 146 147 148 149 150 151 152 153   další » ... 156

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