-2
type 'Microsoft.Office.Interop.Excel.Application'
. Are you Missing an Assembly Reference?
FileCopy("\\Thulller\Sistema\ModeloAbertaFechada.xls", "\\Thulller\Sistema\Financeiro\" + txtNomeDoc.Text + ".xls")
Dim xlApp As Excel.Application
Dim xlWorkBook As Excel.Workbook
Dim xlWorkSheet As Excel.Worksheet
xlApp = New Excel.Application
xlWorkBook = xlApp.Workbooks.Open("\\Thulller\Sistema\Financeiro\" + txtNomeDoc.Text + ".xls")
xlWorkSheet = xlWorkBook.Worksheets("Plan1")
William welcome to stackoverflow in English , make a Tour and translate your question so that it can be analyzed.
– Marco Souza
William do what Marconcílio said, otherwise it will be negative several times and this is not good!
– jmfrolim