Code to replace # with Blank

Here is the code to replace # with Blank

Sub SAPBEXonRefresh(queryID As String, resultArea As Range)

If queryID = “SAPBEXq0001” Then

resultArea.Select

‘Remove ‘#’

Selection.Cells.Replace What:=”#”, Replacement:=””, LookAt:=xlWhole, _ SearchOrder:=xlByRows, MatchCase:=False, MatchByte:=True

‘Remove ‘Not assigned’

Selection.Cells.Replace What:=”Not assigned”, Replacement:=””, LookAt:=xlWhole, _ SearchOrder:=xlByRows, MatchCase:=False, MatchByte:=True

End If

‘ Set focus back to top of results

resultArea(1, 1).Select

End Sub