Excel: Doplněk pro vypsání částky slovy

[Path]

Add-In: Částka (číslo) vypsané slovy pro MS Excel.

Popis: Doplněk pro MS Excel 2003/2007, který umožňuje vypsat částku slovy. Vhodné pro objednávky, cenové nabídky, faktury aj.

Poznámka: Tenhle mini skript jsem psal už několikrát, ale vždy jsem si ho šikovně smazal. Tady dávám k dispozici mou poslední verzi, která určitě funguje.

Stažení pro MS Excel 2007:

Slovy_2007.zip

Stažení pro MS Excel 2003:

Slovy_2003.zip

Jak se instalují dopňky se každý dočte v nápovědě Excelu. V každém případě doporučuji umístit soubor Slovy.xla (Excel 2003) nebo Slovy.xlam (Excel 2007) do složky, kde zůstane trvale uložen, např.: C:\Program Files\Microsoft Office\Office12\1029 pro Office 2007 nebo C:\Program Files\Microsoft Office\OFFICE11\Library pro Office 2003.

Instalace doplňku pro Excel 2003: Nástroje > Doplňky > Procházet..., pak vybrat soubor Slovy.xla

Instalace doplňku pro Excel 2007: Tlačítko office > Možnosti aplikace Excel > Doplňky > Tlačítko přejít... > Procházet..., pak vybrat soubor Slovy.xlam

Náhled:

[Mirek]

dobrý den, chtěl jsem se zeptat, zda to jde nastavit aby to ukazovalo i zápornou hodnotu (-) ?

[Path]

Nemám teď po ruce zdrojový kód (nevím kam jsem ho zašantročil), ale dalo by se to dočasně ošetřit například tímto vzorcem:

Code: Vybrat vše

=KDYŽ(A1<0;"minus " & CastkaSlovy(ABS(A1);1;1;1);CastkaSlovy(A1;1;1;1))

Se zápornými hodnotami jsem původně nepočítal

[Anonymous]

Děkuji funguje to