pliac. mano 2003 exelyje dropdown'as pilkas, neaktyvus. todel naudojau comboboxa. "Linas Petkevičius" <linas@NONOlekiam.lt> wrote in message news:m1h7f2$i5n$1@trimpas.omnitel.net... > DropDown'as ne shht objektas hierarhijoj. Naudok DropDown1_Change() > > "art_home" wrote in message news:m1h695$hf8$1@trimpas.omnitel.net... > > Kodel i B4 rankom ivedus pav.'4' msgbox'as atsiranda, o kuomet B4 reikšmę > pakeicia combobox'as (į 4) nieko nevyksta ? ir ar įmanoma, kad msgbox'as > suveikinėtų nuo comboboxo ? > ačiū. > > macro: > Private Sub Worksheet_Change(ByVal Target As Range) > If Target.Address = "$B$4" Then > If Target.Value > 3 Then MsgBox "Daugiau uz 3" > End If > End Sub >