Re: Verifier la presence d'un mot dans tous les champs

Dans le message <ttvlae$lka$2@shakotay.alphanet.ch>, j'ai écrit le 4 mars 2023 à 15 h 41 :

C'est pas bien du tout donc faut traiter "" à part.

En utilisant ton astuce et en traitant "" à part, et en repartant
de la liste donnée par Olivier sans modification :

=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=
global decimalSeparator
set decimalSeparator to character 2 of (1 / 2 as string)

set numList to {"0", "+1.5", "1e+99", "-19E-7", "1.7e003", ".3", "1.2.3", "", "1E3.4", "--1", "e+99", ".", "+1e"}
set invalid_list to {}

repeat with k in numList
  if (k as string) = "" then set invalid_list to invalid_list & ""
  try
    set conv_num to replace(k as string)
    set conv_num to conv_num as number
  on error
    set invalid_list to invalid_list & k
  end try
end repeat
set text item delimiters to return & tab
display alert "Les éléments invalides sont :" & return & tab & (invalid_list as string)

on replace(str)
  set text item delimiters to "."
  set list1 to every text item of str
  set text item delimiters to decimalSeparator
  set newStr to ("" & list1) as text
  set text item delimiters to ""
  return newStr
end replace
=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=

NB J'ai évité la commande « tr » pour rester en AppleScript "pur".
--
🇺🇦 Michel Vauquois - <http://michelvauquois.fr> 🇺🇦
Un psychotique, c'est quelqu'un qui croit dur comme fer que 2 et 2 font 5, et
qui en est pleinement satisfait. Un névrosé, c'est quelqu'un qui sait
pertinemment que 2 et 2 font 4, et ça le rend malade ! (Pierre Desproges)