You can do this with formulas and a helper column using:

=IF(B1=A1,"",B1)

Then copy down, highlight all formulas, copy, paste special values.

Or easier, you can just run a macro:

Sub Delete_ColB()
Dim i As Integer
For i = 1 To Cells.SpecialCells(xlCellTypeLastCell).Row
If Cells(i, 2) = Cells(i, 1) Then Cells(i, 2) = ""
Next
End Sub

"TonyD" wrote:

I want to copy date from one worksheet into another with copy past special as
a "value" from two columns. However if the department is the same in cell B1
as A1 I want B1 to be blank. Is there any one of doing this?