< návrat zpět

MS Excel

Téma: funkce objem rss

Zaslal/a keksik 20.5.2010 11:43

Ahoj, potřebuju poradit
mám vytvořenou vlastní fci, která mi vypočítá objem kvádru. A nevím si rady, jak k tomu mám připojit msgbox, který by mi ukázal vyledek...vždycky když jsem msgbox udělala, zobrazil se okamžitě po zadání hodnot a ještě se zacyklil. Chtěla bych,aby se zobrazil po tom, co zmáčknu ok po zadání hodnot.
PS : doufám, že to chápete 7
předem díky

Zaslat odpověď >
Koci(20.5.2010 12:36)citovat#001697
avatar
Ahoj,
nevídím v tom asi žádný problém, pravodpodobně budeš mít výpočetní makro přiřazené špatné události. Bud to přiřadit jinam, nebo makro "výpočet" a "msgbox" rozdělit na dvě makra. Potom vytvořit veřejnou proměnou, kam uložíš objem a na zavolání makra MsgBox by se to zobrazilo. Ideální by ale bylo přiložit příklad, at je to vidět a můžu konkrétně poradit 4
keksik(20.5.2010 12:44)citovat#001699
avatar
zatím jsem vytvořila tohle, ale teď nevím jak to nějak propojit...
Příloha: rar1699_projekt.rar (11kB, staženo 60x)
Koci(20.5.2010 12:52)citovat#001700
avatar
Ty jo, nějak mi to nic neotevírá.. Když dám rozbalit, tak mi to rozbalí jenom prádznou složku... Také používám Excel 2003, pač mě ty 2007 nějak nezaujali, tak prosím o uložení do staršího formátu, pokud už jedeš na 2007 6
keksik(20.5.2010 13:56)citovat#001701
avatar
a jo...já už sem zvyklá na 2007 tak mě to nenapadlo, takže teď už by to mělo jít 2 doufám 7
Příloha: rar1701_projekt2003.rar (9kB, staženo 54x)
Koci(20.5.2010 14:38)citovat#001704
avatar
Já se hrozně omlouvám, ale vůbec nic tam prostě není. Sice tam nějakej soubor je, ale když ho rozbalím je čistý jako sníh 3 Dneska končím, ale juknu na to zítra až budu zase v práci, pokud se ti povede sem dodat funkční zip nebo to umístit někam na FTP s linkem 3
icon Poki(20.5.2010 15:34)citovat#001706
Poki
Ja ten soubor otevrel, ale moc nechapu, ceho vlasnte chcete dosahnout?
Mate vlastni funkci, ktera spocita objem, to je OK; proč ale potom jeste chcete makro, ktere udela to same?
keksik(20.5.2010 15:43)citovat#001707
avatar
Ja pravě nevím jak to udelat, tak tam mam v podstate dvakrat to same.
Potrebovala bych, abych spustila tu fci tam zadala délku strany a po te co tu délku strany potvrdím ok, tak aby se zobrazil msgbox s vypočteným obsahem, pak na msg boxu zmacknout ok a hodnota se zapise do bunky....
icon Poki(20.5.2010 15:48)citovat#001709
Poki
Funkce vraci vypocet sama o sobe.
Pro Vas ucel bych tedy pouzil nasledujici makro

Sub objemy()
Dim objem_krychle As Double, A As Double

A = InputBox("Zadejte stranu A:", "objem krychle")

objem_krychle = A ^ 3

zprava = msgbox("objem krychle je " & objem_krychle, vbOKCancel, "Objem krychle")

Select Case zprava
Case vbOK
Range("a1") = objem_krychle

Case vbCancel
Exit Sub

End Select
End Sub
keksik(20.5.2010 16:03)citovat#001711
avatar
tak tohle by šlo 2 moc moc děkuju za makro i Kocimu za jeho čas 2

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

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.

On-line nástroje