PrivateSub TextBox3_Enter() If IsNumeric(TextBox1.Value) And IsNumeric(TextBox2.Value) Then
TextBox3.Value = CDbl(TextBox1.Value) * CDbl(TextBox2.Value) Else
TextBox3.Value = "" EndIf EndSub
Oczywiście zdarzeniem wywołującym obliczenia może być wyjście z Textbox1 i 2
Pozdrawiam
napisał: alicelee postów: 57
umieszczony: 5 lutego 2007 22:06
OK. no to dobra.
Mam 3 textboxy. Do 1 (B13 w excelu) i 2 (C13) wpisuje liczby. Trafiaja one do excela. W 3 textboxie ma sie pojawic wartosc C13*B13. W jaki sposob to zapisac??? Pomozcie... :(
napisał: alicelee postów: 57
umieszczony: 5 lutego 2007 21:28
Bo w sumie tak jak mowisz ze nie bardzo pomysl, to jak inaczzej moge to policzyc? :/ pewnie jakos na if-ach ale tego to ja jeszcze nie umiem :/
aha i napisz mi jeszcze jak z tego zrobic taki plik, ze jak po odpaleniu go to od razu mi sie uruchomią te userformy wszystkie po kolei a nie najpierw arkusze w excelu, potem alt+F11 i doiero F5.
Bo to chyba trzeba modul dodac i tam cos wpisac co nie?
U mnie pierwsze okeinko nazywa sie frm_start.
napisał: alicelee postów: 57
umieszczony: 5 lutego 2007 21:09
No właśnie. Po przejściu przez komórki, wpisuje już tylko wartości a usuwa formuły. nie wiesz jak zablokować formuły w excelu? Blokowanie komórki nic nie daje.
napisał: Trebor postów: 1209
umieszczony: 5 lutego 2007 19:41
Zdaje się że po przejściu fokusa przez Textbox i tak formuły zostaną wymazane i zamienione na wartości. Droga wydaje się niewłaściwa.
Pozdrawiam
napisał: alicelee postów: 57
umieszczony: 5 lutego 2007 18:39
Działa :D:D:D dzieki :D jestes wielki hehe
tylko ze do pewnego momentu ale to juz raczej wina gdzieś w arkuszu chyba tkwi
w pierwszym rzędzie jest wszędzie odwolanie do komorek B13:G13 w arkuszu
Przy czym np. gdy po uruchomieniu wpisuje dane do tekxtboxow 1 i 2 to jak przechodze tabem to pojawia mi sie wartosc, poniewaz mam tam formule:
=JEŻELI(LUB(C13=0;B13=0);"";C13*B13)
wciskam znowu tab i i przechodze dalej i wpisuje dalej dane do E13 i F13, ale po nacisnieciu tab i przejsciu do G13 program sie zwiesza i musze zakonczyc proces excel :/
W G13 mam taka procedure wpisana
Hej
Prawoklik na userfomie i wybierz Tab Order.
Reszta chyba jasne.
Pozdrawiam
napisał: alicelee postów: 57
umieszczony: 5 lutego 2007 17:45
Witam!
Mam utworzone na userformie 72 textboxy. po uruchomieniu musze kolejno rzędami (poziomo) wpisywac dane do komorek (textboxów). Ale tabulatorem przechodzi sie tylko pionowo, a musi przechodzic poziomo. Wiecie jak to zrobic? Myslalam, ze to idzie od najmnijeszej do najwiekszej wiec zmienilam na: