cok fazla makro

[balpi]

ben yeni başladımda arkadaslar bir hücreye birden fazla makroyu nasıl atayacam.mesela a1>0 ise makro1, a1=0 ise makro2 a1>0 ise makro3 gibi bir şey yapabilirmiyim.

 

[Kemal Demir]

Aşagıdaki makro1 ilk makro adı
makro2 calısacak olan makro adı
makro3 calısacak olan makro adı

Sub bak()
if Range("a1").value > 0 then
Call makro1
End if
if Range("a1").value = 0 then
Call makro2
End if
if Range("a1").value < 0 then
Call makro3
End if
End Sub

Umarım istediğinizi doğru anlamasımdır.

 

[Kemal Demir]

iki defa yollamısım.

 

[Seyit Tiken]

Örnek kodu kendinize uyarlayınız.

Private Sub Worksheet_Change(ByVal Target As Range)
If [a1] = 1 Then makro1
If [a1] = 2 Then makro2
End Sub

 

[balpi]

sağolun arkadaslar