Manipular word desde VB.net 馃搫

Click en tools -> Extension Manager

En el area de busqueda  colocamos nuget y despues click en download y reiniciamos vstudio


Click en nuevo proyecto


Seleccionamos .Net Framework 3.5 despues vb froms, colocamos el nombre del proyecto y click en ok



Click en guardar todo y save

Seleccionar tools -> Nuget Package Manager -> Manage Nuget Package for solution


Buscamos Microsoft.Office.Interop.Word y click en download


Codigo:
Imports Microsoft.Office.Interop.Word 'control de office
Imports Microsoft.Office.Interop

Public Class Form1
    Dim Documento As Word.Document

    Private Sub abrir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles abrir.Click
        Dim MSWord As New Word.Application
        Documento = MSWord.Documents.Open(path.Text)
        MSWord.Visible = True
    End Sub

    Private Sub buscar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles buscar.Click
        'BUSCAMOS EL TEXTO
        Documento.ActiveWindow.Selection.Find.Text = txtBuscar.Text
        Documento.ActiveWindow.Selection.Find.Forward = True
        Documento.ActiveWindow.Selection.Find.MatchCase = False
        'SI SI SE ENCONTRO EL TEXTO
        If Documento.ActiveWindow.Selection.Find.Execute() Then
            'NOS MOVEMO S UNA LINEA ADELANTE
            Documento.ActiveWindow.Selection.MoveRight(Unit:=WdUnits.wdCharacter, Count:=1)
            'ESCRIBIMOS
            Documento.ActiveWindow.Selection.TypeText(Text:="<--Aqui estas :)")
        End If
    End Sub
End Class

Formulario:

Proyecto visual studio
Word del ejemplo




Comentarios

Facebook Like

Entri Populer

hackear wifi con kali linux 馃摗

Instalar Netbeans 10 en Windows 10

Instalar netbeans 10 en ubuntu 18.04