c) Inicializa o Excel de dentro do programa:
oXL = CreateObject("Excel.Application") ‘ Abre o Excel. oXL.Visible = True ‘ Torna-o visível para o usuário.d) Cria um conjunto de planilhas (workbook):
oWB = oXL.Workbooks.Add ‘ Adiciona um conjunto de planilhas. oSheet = oWB.ActiveSheet ‘ Torna-o ativo, referenciando o objeto oSheet à primeira planilha.e) Adiciona texto nas 4 primeiras células da planilha:
oSheet.Cells(1, 1).Value = "Nome:" oSheet.Cells(1, 2).Value = "Idade:" oSheet.Cells(1, 3).Value = "Endereço:" oSheet.Cells(1, 4).Value = "Telefone:"f) Formata as células A1 a D1 como negrito e faz o alinhamento do texto ser centralizado:
With oSheet.Range("A1", "D1") ‘ Para as células A1 a D1… .Font.Bold = True ‘ Coloca o texto em negrito. .VerticalAlignment = Excel.XlVAlign.xlVAlignCenter ‘ Alinha o texto no centro. End With