spinbutton

[by_IsTaNBuL]

aşağıdaki kodlarla spinbttonları aktif hücrrelerde çalıştırıyorum. fakat bu problem oluyor. istenmeyen sonuclar cıkıyor baska hucrelerdekı verılerı bozmak gıbı. bu kodlar belırledıgım bı kolonda çalısamazmı. sadece benım belırledıgım bır kolonda calısacak baska bi kolonda ki aktif hücrede çalışmayacak. eğer yardımcı olursanız sevınırım.

sımdıden tesekkurler




Private Sub SpinButton1_SpinDown()

Activecell= Activecell - 1

End Sub

Private Sub SpinButton1_SpinUp()

Activecell = Activecell + 1

End Sub

 

[Necdet]

Merhaba,

Hem kolon hem satır denetimi yapabilirsiniz.

Aşağıdaki kodlar sadece 3-4-5 yani "C-D-E" sütunlarında hücre rakam ise çalışır.

Private Sub SpinButton1_SpinUp()
 
    If ActiveCell.Column < 3 Or ActiveCell.Column > 5 Then Exit Sub
    If IsNumeric(ActiveCell) Then ActiveCell = ActiveCell + 1
 
End Sub

 

[by_IsTaNBuL]

cok tesekkur ederım necdet bey