
If Cells(numeroRighe, numeroColonne).Value = #VALORE! Then
Cells(numeroRighe, numeroColonne).ClearContents |
If IsError(Cells(numeroRighe, numeroColonne).Value) Then
Cells(numeroRighe, numeroColonne).ClearContents
' oppure
If Cells (numeroRighe, numeroColonne).Value = CVErr(xlErrValue) Then
Cells(numeroRighe, numeroColonne).ClearContents |
If IsError(Selection) Then Selection.ClearContents |
