Makrolu dosyada geri al tuşu

[kadirdiloglu]

Merhaba,

Excelde aşağıdaki gibi bir makrom var. Bu makroyu aktif ettiğim zaman boş bir hücreye veri girip hemen sonrasında işlemi geri almak istediğimde geri almıyor. Geri al sekmesi aktif değil... Ancak aynı sayfada dolu bir hücredeki veriyi değiştirip tekrar geri alabiliyorum.Neden boş hücrede girilen veriyi geri almıyor olabilir?

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
On Error Resume Next
If Application.CutCopyMode = xlCopy Then Exit Sub
If Application.CutCopyMode = xlCut Then Exit Sub
Call RenkSil
[Z1] = 1
Range(Cells(ActiveCell.Row, 1), Cells(ActiveCell.Row, 20)).FormatConditions.Add Type:=xlExpression, Formula1:="=$Z$1=1"
Range(Cells(ActiveCell.Row, 1), Cells(ActiveCell.Row, 20)).FormatConditions(1).Interior.ColorIndex = 6
Range(Cells(ActiveCell.Row, 1), Cells(ActiveCell.Row, 20)).FormatConditions(1).Font.Bold = True
Range(Cells(ActiveCell.Row, 1), Cells(ActiveCell.Row, 20)).FormatConditions(1).Font.ColorIndex = 3
End Sub
Sub RenkSil()
On Error Resume Next
Cells.FormatConditions.Delete
End Sub

 

[kadirdiloglu]

Yardımcı olabilecek yok mu?