
16/11/2005, 13:06
|
| | Fecha de Ingreso: abril-2005
Mensajes: 39
Antigüedad: 20 años, 1 mes Puntos: 0 | |
Espero que te sirva estas instrucciones son las que yo utilizo:
Dim ExcelApp As Object
Dim ExcelWorkBook As Object
Set ExcelApp = CreateObject("excel.application")
ExcelApp.Visible = False
Set ExcelWorkBook = ExcelApp.Workbooks.Add
ExcelApp.Cells(F, C).Font.Color = vbBlue 'coloco el contenido en azul
ExcelApp.Cells(F, C).Interior.Color = &HC0FFC0 'coloco el interior de la celda en verde |