No ja mám na notebooku tiež nastavený zip. Ak je tam rar, tak to musím rozbaľovať total comanderom a to sa mi vždy nechce. Takže občas odpovedám bez toho, aby som otvoril prílohu. No niekedy je rozdiel medzi napísaným a súborom dosť významný.
eLCHa napsal/a:
@marjankaj
Škoda že není "reverzní funkce" k HODNOTA.NA.TEXT - tedy já o ni nevím a proto se ptám - nic jsem nenašel.
Něco jako HODNOTA, ale s parametrem, v jakém formátu je text, takže nějak
=HODNOTA("20-pro-2012") česká verzia
=VALUE("20-dec-2012") anglická verzia
Text medzi apostrofmi sa nekonvertuje, teda treba to zabezpečiť inak. Makrom, alebo nejako zložito funkciou REPLACE(Nahradit) alebo SUBSTITUTE.
A zazipoval si ten súbor?
=IF(B1<>"";A1;"")
česky
=KDYŽ(B1<>"";A1;"")
Ako si to skopíroval? Odkiaľ?
Neviem, či som to dobre pochopil. Skús toto.
Sub Makro1()
Dim oblast As Range
Set oblast = Range(Selection, Selection.Offset(0, 8))
Range(oblast, oblast.End(xlDown)).Copy oblast.Offset(1, 0)
With Selection
Range(.Offset(0, 0), .Offset(0, 2)).ClearContents
Range(.Offset(0, 4), .Offset(0, 8)).ClearContents
End With
Set oblast = Nothing
End Sub
A tu je súbor. S prepínačmi.
Robil som to v open office, tam MROUND fungovalo.
Tak potom trochu inak.
=COUNTIF(ZAOKROUHLIT(R1C1:R3C1*2;1)/2;0,15)
A maticovo. CTRL+SHIFT+ENTER
Ako to zaokrúhľuješ?
=COUNTIF(MROUND(A1:A3;0,05);0,15)
Maticovo
Sheets(1).Visible=xlSheetVeryHidden
Sheets(1).Visible=xlSheetVisible
Sheets(1).Visible=xlSheetHidden
Tak to napíšem tretíkrát.
Prilož súbor.
Zadaniu nerozumiem ani ja. Dokonca ani keď AL napísal riešenie.
A myslím,že zadávateľovi to veľmi nepomôže.
No hin se hukáže.
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
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.