Sıfır yazdır

[yteizme]

G sütunu sıfır olanca F sütununa (yani yanına) sıfır yazsın..ve bunu çalışma kitabındaki bütün sayfalara yapsın.

Teşekkürler..

 

[Necdet]

Merhaba,

Aşağıdaki kodları ThisWorkbook'un kod bölümüne kopyalayıp dener misiniz?

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Column = 7 And Target = 0 Then Target.Offset(0, -1) = 0
End Sub

 

[yteizme]

çalıştıramadım..

 

[Necdet]

Merhaba,

Örnek dosyayı inceleyiniz. G sütunu Sıfır olduğunda F sütununa da Sıfır değeri yazdırır.

 

[yteizme]

Bu işlemi nasıl tetikliyoruz ??Enable macros dediğimizde macro çalışmıyor veya alt+f8 yaptığımızda bir macro gözükmüyor.

Anladığım otamatikman çalışması gerekiyor macronun ama bir işlem göremiyorum çalışma kitaplarımda .

Emeğinize sağlık..

 

[Necdet]

Merhaba,

Makro Güvenlik Düzeyini ortaya getirmeniz gerekir. Ki makrolar çalışabilsin.

Araçlar (Tools)
Makro (Macro)
Güvenlik (Security)
Orta (Medium)

 

[yteizme]

malesef olmuyor.Teşekkürler.