Součet tučných čísel v Excelu
Zdravím, prosím o pomoc s excelem. Mám dlouhý sloupec plný čísel, z nichž některá jsou tučně zvýrazněna a ty potřebuji sečíst. Existuje na to nějaká funkce? Zkoušel jsem to přes "sumu" ručně naklikat, ale má to omezený rozsah.
Odpovědi
Diskuze
Function Tucne(a As String) As Double
B = 0
sl = a
For i = 1 To 2000
aa = sl & i
If Range(aa).Font.Bold Then
B = B + Range(aa).Value
End If
Next i
Tucne = B
End Function
Do listu si někam napíšeš =Tucne("I") a po entru bude v buňce součet všech tučných čísel v buňkách I1 až I2000. Sloupec je zadávaný ve funkci, první až poslední sečítávaná buňka je v příkazu For i = ......., kde si je můžeš upravit podle svých potřeb. Když úspěšně vložíš do listu funkci (do modulu), objeví se ti funkce Tucne mezi vlastními funkcemi a po výběru tě vyzve k zadání písmena sloupce. Určitě by se to dalo i zdokonalit, pokud by to bylo potřeba.
Pokud nevíš, jak funkci vložit do sešitu, napíšu to to podrobněji. Funkce se automaticky nepřepočítává, vypočte se při vložení do buňky. Pokud bys ji chtělo spustit opakovaně v téže buňce, po výběru buňky postav kurzor za funkci v řádku vzorců. Po entru se vypočítá znova.