Hi,
I found a macro (created by ky095n) in one forum that I tweaked so I can use it to transfer data from one sheet to another sheet (named: Closed) then delete that data in main sheet.
My problem is that I want the transferred data as values (no formulas).
Also, right now the code works fine if I type the text "Closed" but if the text is a result of a formula, the code doesn't work.
I am new in excel.
Hope I was able to explain my problem.
Thanks in advance.
Option Explicit
Dim LastRow As Range
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Text = "Closed" Then
Target.EntireRow.Copy Sheets("Closed").Range("a20").End(xlUp).Offset(1, 0)
Target.EntireRow.Delete
Application.CutCopyMode = False
End If
End Sub
Bookmarks