Koşula göre diğer hücreyi boş bırakmak

[dogu34]

Merhaba
Sayfa1 de N sütunundaki hücrelerde değer varsa K sütunundaki o hücreler boş olacak.
K ve N sütunlarında kullandığım formüller var yukardaki işlemi vba ile nasıl yapabilirim.Yardımcı olursanız sevinirim.Teşekkürler

 

[hüseyintok]

merhaba deneyin bakalım.

Sub bosbirak()
Dim ws As Worksheet
Dim lastRow As Long
Dim i As Long
Set ws = ThisWorkbook.Sheets("Sayfa1")
lastRow = ws.Cells(ws.Rows.Count, "N").End(xlUp).Row
For i = 1 To lastRow
If ws.Cells(i, "N").Value <> "" Then
ws.Cells(i, "K").ClearContents
End If
Next i
End Sub

 

[dogu34]

sub or function not defined hatası verdi next i olan bölümde

 

[hüseyintok]

sub or function not defined hatası verdi next i olan bölümde

dosyanızı enabled workbook.xlsm formatında kayıt edip çalıştırın

 

[dogu34]

dosyanızı enabled workbook.xlsm formatında kayıt edip çalıştırın

Xlsm formatında ama enabled kısmını anlayamadım hocam