спасибо огромное за отклик, но переносит из ячеек, а хотелось бы из формы

как вариант коенечно же не исключаю, но хочется с формы

неужели не возможно с формы VBA excel вывести данные (сформировать договор) в ворде ?

в коде формы предусматриваете работу с вордом.  
у меня в одном из проектов это осуществлялось так:  
 
   Set wrd = CreateObject("Word.Application")  
   If wrd Is Nothing Then  
       MsgBox "Не могу открыть приложение word", vbCritical, "ОШИБКА"  
       End  
   End If  
'    wrd.Visible = True  
   Set wrd_doc = wrd.documents.Open(Replace(ThisWorkbook.FullName, ThisWorkbook.Name, docname), False, True)  
   If wrd_doc Is Nothing Then  
       MsgBox "Не могу открыть файл " & docname & Chr(13) & "он должен быть в той же папке, что и база", vbCritical, "ОШИБКА"  
       End  
   End If  
   On Error GoTo 0  
     
   For Each x In wrd_doc.bookmarks  
       x.Range.Select  
       wrd.Selection.typetext Text:=Cells(crow, Val(Mid(Names(x.Name).RefersTo, 2, 99))).Text  
   Next  
 
данные тут брались не из формы, а из ячеек, но это не суть важно..  
вместо =cells(..) можно написать =textbox1.text и т.д

Извините за глупый вопрос, а на что нажать, чтобы данные из exel в word перенести