[ mbane @ 21.02.2012. 02:38 ] @
Molaba za pomoc

U polju (recimo A1) imam upisanu formulu koja izracunava neku vrednost. Zeleci da tu vrednost nekada po potrebi promenim bez obzira na formulu (to mi je ujedno i ulazna vrednosta za neku drugu formulu u drugom polju) napravio sam command button koji otvara User Form sa Text Box-m gde se vidi to polje A1. Promenom tog broja u Text Box-i menjam vrednost u polju A1 ali....formula koja je bila u tom polju se gubi - izbrise.

Zahtev bi bio da se formula u A1 ponovo aktivira kada je vrednost u Text Box-i nula ili je nema uopste. Neznam da li je to moguce.

Unapred hvala
[ 3okc @ 21.02.2012. 07:06 ] @
Dobrodošao na forum.

Jedno rešenje bi se sastojalo da odrediš neku drugu ćeliju sa kojom bi manipulisao preko UserForm. Onda još samo da postojeću formulu izmeniš tako da postane svesna ove nove ćelije i da izračunatu vrednost ispisuje samo kada je tamo 0 (inače, kopira njenu vrednost).

Drugo rešenje je da unutar VBA procedure, gde menjaš A1, ispituješ kako je izmenjena pa ako je obrisana ili je 0 postaviš vrednost na tu neku formulu.

Code:
Private Sub TextBox1_Change()
[a1] = TextBox1.Text
If TextBox1.Text = "" Or TextBox1.Text = "0" Then [a1] = "=N(""Moja formula"")"
End Sub
[ mbane @ 21.02.2012. 22:34 ] @
Mislim da bi opcija broj dva vise odgovarala jer u opciji 1 necu biti u mogucnosti da vidim vrednost polja A1 u Text Box-i u UserForm.
Ja sam tek poceo da ucim VBA pa bih vam bio zahvalan ako bi ste mi objasnili na koji nacin i gde da upisem VBA code.
Samo da napomenem da formula koja se nalazi u polu A1 nije napisana u VBA-u nego je to klasicna excel formula (ima ih vise - primera radi =D1*D2 ili =((D4*D5)*D6-D7)/D8

Unapred Hvala
[ Ivek33 @ 22.02.2012. 08:29 ] @
Citat:
mbane: Ja sam tek poceo da ucim VBA pa bih vam bio zahvalan ako bi ste mi objasnili na koji nacin i gde da upisem VBA code.
Vjerojatno ima još tekstova o VBA na netu, pogledaj može li ti pomoći ovaj tutorijal na više stranica

VBA code postavljaš u VBE za Excel preko ALT+F11

- VBA u Excelu za početnike