DominoArea.org [Archive]

Ça m'a étonné de ne voir ça nulle part

en mettant ça dans le Exiting d'un champ, ça équivaut à un RefreshHideFormulas, mais sans le bouton.

Code : Tout sélectionner

Sub Exiting(Source As Field)
   Dim workspace As New NotesUIWorkspace
   Dim uidoc As NotesUIDocument
   Set uidoc = workspace.CurrentDocument
   Call uidoc.RefreshHideFormulas
End Sub

Petit "Mais"

ça marche bien Sauf !

si on click sur un bouton de la barre d'action, dans ce cas on ne passe pas par le Exiting, car le curseur ne sort pas du champ.