ABRIL ARQUIDO DO EXCEL PELO VB
Pessoal creio esta ser fácil
Gero um arquivo em Excel no C:\Arquivo.xls
Como faço o VB abrir este arquivo no Excel?
Agradeço desde já.
Gero um arquivo em Excel no C:\Arquivo.xls
Como faço o VB abrir este arquivo no Excel?
Agradeço desde já.
Dim oExcel As Object, oPlan As Object
Set oExcel = CreateObject("Excel.Application")
oExcel.Workbooks.Open "C:\Arquivo.xls" 'Abre arquivo
Set oPlan = oExcel.ActiveWorkbook.Sheets(1) 'Seleciona qual planilha
Para selecionar uma célula use:
oPlan.Cells(Linha, Coluna)
Espero ter ajudado.
Set oExcel = CreateObject("Excel.Application")
oExcel.Workbooks.Open "C:\Arquivo.xls" 'Abre arquivo
Set oPlan = oExcel.ActiveWorkbook.Sheets(1) 'Seleciona qual planilha
Para selecionar uma célula use:
oPlan.Cells(Linha, Coluna)
Espero ter ajudado.
Amigo Frau lhe agradeço muito, mas não funcionou não... De qualquer forma obrigado.
Private Sub teste()
Dim myExcel As Excel.Application
Set myExcel = New Application
myExcel.Workbooks.Open "CAMINHO DE SEU ARQUIVO"
myExcel.Visible = True
End Sub
Dim myExcel As Excel.Application
Set myExcel = New Application
myExcel.Workbooks.Open "CAMINHO DE SEU ARQUIVO"
myExcel.Visible = True
End Sub
Tópico encerrado , respostas não são mais permitidas