Temat: Zdarzenie przy zmianie wartosci w konkretnej komorce

Witam. Uzywajac Zdarzenia Worksheet_Change potrafie wywolac jakies zdarzenie przy kazdej zmianie wartosci w konkretnej komorce(wartosc te zmieniam recznie w tej komorce). Ale ja chcialbym zeby wartosc w komorce zmieniac posrednio, poniewaz w komorce potrzebuje odpowiednia formule. Probowalem uzyc zdarzenia Worksheet_Calculate ale nic nie zdzialalem. Prosze o konkretne przyklady kodu vba.
Oskar Shon

Oskar Shon Dodatki do Office
www.VBATools.pl

Temat: Zdarzenie przy zmianie wartosci w konkretnej komorce

Robert, generalnie to nie przyłożyłeś się za bardzo do opisu problemu z jakim się zmagasz. Trochę masło maślane. Może lepiej będzie jak podlinkujesz przykład w którym jest zawarta jego istota. Dodatkowo w drugim arkuszu daj przykład po reakcji jaką się spodziewasz uzyskać. W tedy będzie można ocenić czy zdarzenie do zdarzenia ma jakiś głębszy sens.

Temat: Zdarzenie przy zmianie wartosci w konkretnej komorce

Dziekuje za proby pomocy. Na pewno nastepnym razem bardziej przyloze sie do opisania problemu.
Udalo mi sie rozwiazac moj problem. To kod ktory wygenerowalem jako zdarzenie arkusza. Moze komus sie przyda:

Private Sub Worksheet_Calculate()
If Range("Q30") <> 3 Then
ActiveSheet.Shapes.Range(Array("Down Arrow 1")).Visible = msoFalse
ElseIf Range("Q30") = 3 Then
ActiveSheet.Shapes.Range(Array("Down Arrow 1")).Visible = msoTrue
End If
End Sub

Kod ten sprawia ze gdy komorka Q3 przyjmuje wartosc rozna od 3 wtedy ksztalt "Down Arrow 1" jest niewidoczny, a gdy Q3 przyjmuje wartosc = 3 wtedy ksztalt "Down Arrow 1" jest widoczny. Niestety nie moglem tego efektu osiagnac uzywajac WorkSheet_Change poniewaz wartosc komorki Q3 jest zalezna od innych komorek(zawiera formule). Jesli ktos ma inne rozwiazanie tego problemu prosze o sugestie.

Następna dyskusja:

sumowanie wartosci powyzej np8




Wyślij zaproszenie do