The error is in this row: ActiveCell.Value = IfNa(D6, "Delete"). Use instead: Set IsThisNA = Sheets("items-1").Range("D6") If Application.
確定! 回上一頁