Visual Basic - andreafuhr

ESTOY DESESPERADA!!!!!!
Necesito pasar los datos de unos controles de formulario a Word + el contenido de un RichTextbox.textRTF (con formato incluido).
Estoy desesperada!!!! no se como hacerlo.
He intentado pasarlo a excel y funciona pero no me respeta el formato del texto contenido en el richTextBox......

Word reconoce el formato RTF en forma directa:

StringToFile RichTextBox.textRTF,"C:\MiArchivo.rtf"

Public Function StringToFile(StringText As String, FileName As String) As Long
Dim hlngFile As Long
hlngFile = FreeFile
Open FileName For Binary Access Write As hlngFile
Put hlngFile, , StringText
Close hlngFile
StringToFile = FileLen(FileName)
End Function

Luego lo puedes abrir directamente con Word.

Mil millones de gracias CECILIA!!!! Pero....mi problema pasa porque antes de pasar el contenido del richTextBox debo pasar el contenido de unos textBox....
Si intento concatenar..chau!!! perdi todo el formato del richTextBox.... se me ocurrio generar tantos richTextBox como cajas de texto tiene el formulario para ir pasando de a uno al documento.... pero siempre me deja el contenido del ultimo richTextBox!!!!

Pasa primero el RichTextBox principal a Word y luego trabaja sobre el documento con lo que tengas que insertar o contatenar.