DominoArea.org [Archive]

Voila le pb. Un masque, un champ TexteRiche, une action : Dim uiw As New notesUiWorkspace Dim uid As notesUiDocument Set uid = uiw.CurrentDocument Dim TR1 As New notesRichTextItem(uid.Document,"TR1") Dim TR As New notesRichTextItem(uid.Document,"TR") Dim nTR As notesRichTextNavigator Set ntr = TR.createNavigator Call TR.AppendText("BONJOUR LES PETITS LOUPS") If ntr.findfirstString ("LES") Then Call TR.BeginInsert(ntr) Call TR.AppendRTItem(TR1) Call TR.EndInsert End If Conclusion : Method is not available sur le AppendRTItem Cela fonctionne avec un appendText mais pas avec le appendRTItem J´ai regardé sur le forum IBM, bcp de monde a le même pb mais personne n´a de solutions. Vous êtes ma dernière chance