Hi
Thanks a lot Mic !
Using Print Statements I have found a solution for the ReplyToAll-Problem.
Postopen(---)
Me.m_noteUIMemo.Gotofield("Body")
Me.m_noteUIMemo.Inserttext(strSignature)
'The following line was no more executed because of the GotoField Statement!
Me.m_noteUIMemo.reload()
End Postopen
So Solution was:
Postopen(---)
Me.m_noteUIMemo.reload()
Me.m_noteUIMemo.Gotofield("Body")
Me.m_noteUIMemo.Inserttext(strSignature)
Me.m_noteUIMemo.reload()
End Postopen
See what surprises the Agent will bring