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