Issue 125441 - validity options enhancement : formula,Text only
Summary: validity options enhancement : formula,Text only
Alias: None
Product: Calc
Classification: Application
Component: programming (show other issues)
Version: 4.2.0-dev
Hardware: All All
: P3 Minor (vote)
Target Milestone: ---
Assignee: AOO issues mailing list
QA Contact:
Depends on:
Reported: 2014-08-15 06:54 UTC by papayes
Modified: 2014-08-15 07:27 UTC (History)
0 users

See Also:
Issue Type: DEFECT
Latest Confirmation in: ---
Developer Difficulty: ---

Excel Option Personnalisé (63.91 KB, image/png)
2014-08-15 06:54 UTC, papayes
no flags Details

Note You need to log in before you can comment on or make changes to this issue.
Description papayes 2014-08-15 06:54:08 UTC
Created attachment 83839 [details]
Excel Option Personnalisé

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
  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
end if

if not texteSeul  then
  MsgBox("Les chiffres sont interdits", 16, "Erreur de frappe")
end if
verif = texteSeul
End Function"
Comment 1 papayes 2014-08-15 07:27:07 UTC
Can be seen as a complement to the old issue :