Con visible no ,non funziona.
Ho trovato (dopo vari tentativi) un codice che mi risolve il problema:
Public Function GetValoreGeppo(ByVal sValore as Variant) As String
       If IsNull(sValore) Then
GetValoreGeppo = "" 
Else
       If CStr(sValore) <> "" And IsNumeric(sValore) Then
            If CInt(sValore) >= 20 Then
                  GetValoreGeppo = CStr(sValore)
            Else
                  GetValoreGeppo = ""
End if
      Else
            GetValoreGeppo = CStr(sValore) 
End If
End If
End Function
Nel report rendo  no visible la casella interessata e ne sovrappongo un'altra con proprietà:
=getvaloreGEPPO(testo...Value).
Grazie per la risposta e buona giornata
Silene