Created attachment 83839 [details]
Excel Option Personnalisé

Hello
Calc: menu: data > Validity >
1 Excel 2013 offers a "Custom" option which calls for a formula. (see attachment). Perhaps an enhancement for Calc?
2. But still not a "Text Only".
Can we expect this option to replace this Bernard Marcelly macro?
"Option Explicit

Function verif(v) As Boolean
Dim texteSeul As Boolean
Dim n As Long

texteSeul = True
if IsNumeric(v) then
  texteSeul = False ' le texte est un nombre
else
  for n = Asc("0") to Asc("9")
    if InStr(1, v, chr(n), 0) > 0  then
      texteSeul = False ' au moins un chiffre dans le texte
    end if
  next
end if

if not texteSeul  then
  MsgBox("Les chiffres sont interdits", 16, "Erreur de frappe")
end if
verif = texteSeul
End Function"