• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

Příspěvky uživatele

Dobrý den,

firma se rozhodla, že začneme používat microsoft 365 online a tak mě nyní čeká postupné převádění všech excel tabulek.

Narazil sem však na problém, že excel pro web nepodporuje makra a tak bych potřeboval vědět, jestli někoho napadá řešení výpočtů z přiloženého souboru bez maker.

Teď jednoduše zadám hodnoty do zvýrazněných sloupců a automaticky se mi dosadí vypočítané hodnoty do sloupců vpravo.

Private Sub CommandButton1_Click()
Range("E3:E10").Value = Evaluate("=E3:E10-C3:C10")
Range("E3:E10").Value = Evaluate("=E3:E10+D3:D10")
Range("F3:F10").Value = Evaluate("=F3:F10-(D3:D10/G3:G10)")
End Sub

Děkuji za případnou pomoc

Děkuji, teď už to funguje, jak má. :)

Ano, to je přesně ono, díky! :)

A dalo by se to udělat i pro celý sloupec?
Odtud mi poradili následující vzorec:
Range("F3:F214").Value = Evaluate("=F3:F214+D3:D214")
Tak jak by se dalo udělat, aby vzorec odpovídal podobě F3:F214 = F3:F214 - (D3:D214 * I3:I214)

Velice Vám děkuji.

Dobrý den,

potřeboval bych poradit s následujícím problémem.

Používám v tabulce následující vzorec:
Range("K3").Value = Range("K3").Value - Range("D3").Value
Potřeboval bych poradit, jak použít složitější vzorce, selským rozumem jsem na to bohužel nepřišel.

Teď se mi do buňky K3 zapíše výsledek vzorce K3 - D3, ale potřeboval bych, aby výsledek byl například (K3 * H3) - D3.

Děkuji za pomoc a přeji hezký den.
S pozdravem
Smilek

V jedné části používám přičítání, jinde zase odečítání. Koukám, že jsem napsal přičítat a do kódu poslal odečítání. :D

Ještě se tam teď snažím vytvořit nějakou historii zaznamenaných údajů, takže je možné, že se ještě ozvu s prosbou o radu. :D

Děkuji, už to funguje přesně, jak potřebuji. :)

Dobrý den,

je mi jasné, že řešení bude jistě jednoduché, ale jsem začátečník, tak buďte prosím shovívavý. :) Potřebuji poradit ohledně následujícího kódu:
Private Sub CommandButton1_Click()
Range("F3").Value = Range("F3").Value - Range("C3").Value
Range("F4").Value = Range("F4").Value - Range("C4").Value
Range("F5").Value = Range("F5").Value - Range("C5").Value
End SubJe to kód, který jednoduše vezme zapsanou hodnotu v jedné buňce a přičte ji k obsahu buňky druhé, při stisku tlačítka.

Problém je, že jako hňup vypisuji každou buňku zvlášť, protože zápis Range("F3:F214") mi na to nefunguje.

Prosím Vás tedy o radu. Jen doplním, že používám excel z řady office 365.

Velice Vám děkuji.

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse