Dim word As New Word.Application