RE:Por favor ayuda con EXEL desde VB
Option Explicit
Private Sub cmdEnviarExcel_Click()
'Si te es posible, usa variables locales
'Declaraciones Generales
'Para usar este tipo de declaracion, tienes que hacer
'como ya sabras, una referencia previa, a Excel
'pero si lo haces a travez del objeto, no necesitas hacerlo
' Public AppExcel As Excel.Application
' Public Libro As Excel.Workbook
' Public Hoja As Excel.Worksheet
'Usamos el acceso con variables objeto, de esta forma
'hay que tener mucho cuidado con el codigo, pero me parece
'mas transparente y mas limpia que hacer la referencia a Excel
'si bien esto consume un poco más de recursos
Dim objExcel As Object
Dim co1 As Integer
'Estas constantes son las usadas por Excel
Const xlCenter As Integer = -4108
Const xlSolid As Integer = 1
'Creo una instancia de Excel
'de esta forma tengo que agregar una hoja
'Set objExcel = CreateObject("excel.application")
'De esta otra forma la creo directamente
Set objExcel = CreateObject("Excel.Sheet")
'Encabezado
With objExcel.ActiveSheet
.Cells(1, 1).Value = "LEGAJO"
.Cells(1, 2).Value = "APELLIDO Y NOMBRE"
.Cells(1, 3).Value = "GRUPO"
.Cells(1, 4).Value = "DESCRIPCION"
.Cells(1, 5).Value = "TURNO"
.Cells(1, 6).Value = "HS"
.Cells(1, 7).Value = "FECHA"
.Cells(1, 8).Value = "SUPERVISOR"
.Rows("1:1").RowHeight = 20.25
With .Range("A1:H1")
.Font.Bold = True
%