excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Váš průvodce programem Microsoft Excel a programováním maker ve VBA
< návrat zpět
Téma: vzorec při formátu buňky "text" (nebo
Uzamčeno - nelze přidávat nové příspěvky.
MS Excel
Téma: vzorec při formátu buňky "text" (nebo 
Zaslal/a zEjnik 1.3.2013 14:53
Ahoj,
mám problém při zadávání vzorce, potřebuji na sebe navázat dva vzorečky. V buňce J33 se mi počítá cena na základě 3 buněk, jedna z nich je buňka G33, ale do této buňky bych potřeboval dát vzorec který by dopočítával hodnotu na základě jiného pole, tato buňka G33 obsahuje číslo a tak mám její formát nastavený na "text". Ale ve formátu buňky "text" nefungují vzorce a pokud dám formát buňky na obecný tak navázaný vzorec z buňky J33 přestane počítat. (Mimochodem jedná se o tyto vzorce http://wall.cz/index.php?m=topic&id=9935)
Jak toto řešit, popřípadě jak obejít?
Děkuji za ochotu a čas.
Uzamčeno - nelze přidávat nové příspěvky.
Strana: « předchozí 1
2
12019_sesit.zip
Obávam sa, že toto cez overenie dát neporiešiš, pokiaľ niekto príde na spôsob, ako sa to dá urobiť cez overenie dát, rád sa priučím.
Napadajú ma 2 možnosti:
1. ošetriť to cez podmienené formátovanie
2. Pokiaľ "nutne" potrebuješ "chybovú" hlášku, môžeš použiť udalostné makro, do kódového okna Listu1 nakopíruj kód:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target = [g6] And [h6] = "0" Then MsgBox "POZOR, CHYBA!"
End Sub
Predpokladám, že budeš meniť hodnotu v bunke G6. Pokiaľ to má fungovať i na prípadnú zmenu iných buniek, tak budeš musieť tú podmienku nahradiť niečím v tvare:
If Not Intersect(Target, Union([g6], [d6], [d7], [d8])) Is Nothing And [h6] = "0" Then MsgBox "POZOR, CHYBA!"
Osobne by som si vystačil s podmieneným formátovaním, vymýšľate zložité riešenia na ktoré nemáte
citovat
Napadajú ma 2 možnosti:
1. ošetriť to cez podmienené formátovanie
2. Pokiaľ "nutne" potrebuješ "chybovú" hlášku, môžeš použiť udalostné makro, do kódového okna Listu1 nakopíruj kód:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target = [g6] And [h6] = "0" Then MsgBox "POZOR, CHYBA!"
End Sub
Predpokladám, že budeš meniť hodnotu v bunke G6. Pokiaľ to má fungovať i na prípadnú zmenu iných buniek, tak budeš musieť tú podmienku nahradiť niečím v tvare:
If Not Intersect(Target, Union([g6], [d6], [d7], [d8])) Is Nothing And [h6] = "0" Then MsgBox "POZOR, CHYBA!"
Osobne by som si vystačil s podmieneným formátovaním, vymýšľate zložité riešenia na ktoré nemáte
citovatTak som nakoniec prišiel na to, ako sa dá cez overenie dát. Je potrebné postaviť sa na bunku G6 a v overení dát nastaviť:
Na záložke Nastavení, v roletovom menu Povoliť vyhrať Vlastní. Do okna vzorec napísať: =H6<>"0"
Na záložke Chybové hlášení prípadne zmeniť Styl na varování (umožní hodnotu v bunke G4, ktorá spôsobuje chybu, ponechať).citovat
Na záložke Nastavení, v roletovom menu Povoliť vyhrať Vlastní. Do okna vzorec napísať: =H6<>"0"
Na záložke Chybové hlášení prípadne zmeniť Styl na varování (umožní hodnotu v bunke G4, ktorá spôsobuje chybu, ponechať).citovat
Strana: « předchozí 1
2
Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
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.
RSS nejnovější články