Planilha excel

Question

Existe alguma forma de gerar uma planilha excel através do VBA sem que necessária tenha que ter o excel instalado na máquina. Talvez instanciando algum objeto dentro da macro.

Código para criação da planilha em excel

 

Dim oXLApp As Object, wb As Object

    Set oXLApp = CreateObject("Excel.Application")

    '~~> Hide Excel
    oXLApp.Visible = False

    '~~> Open files
    Set wb = oXLApp.Workbooks.Add
    Set ws = wb.WorkSheets.Add

    ws.Range("B10") = "Edvaldo VITOR GOMES"
    ws.range("B10").Font.Bold = True
    ws.Range("C10") = "VITOR GOMES"
    ws.Columns("A:F").EntireColumn.AutoFit
    wb.SaveAs "C:\TESTE.xlsx"
    wb.close

    Dim email As Object

    Set email = NewMail

    email.ContentType = "text/html"

    email.IsHtml = True
    email.SendTo = "edvaldo.gomes@benner.com.br"
    email.Subject = "teste"
    email.AddAttachedFile("c:\teste.xlsx")

    email.Text.Add("segue anexo teste")

    email.Send

    Set email = Nothing
    Set oXLApp = Nothing
    Set wb = Nothing
    Set ws = Nothing

Comments

Márcio, tem algum exemplo, como instanciar e criar a planilha através da macro?

Answer 1

Desde a versão 14.0 nós liberamos junto com o Runner a DocumentFormat.OpenXml.dll. Utilizando essa biblioteca poderá criar documentos sem a necessidade do Office instalado. http://msdn.microsoft.com/en-us/library/office/hh180830(v=office.14).aspx