FORMATOS

hola a todos !!

vuelvo a molestarlos con un par de consultas:

• la primera:

tengo el siguiente código (p/ mi aplicación en access):

With appExcel.Sheets(hoja).Range(appExcel.Sheets(hoja).Cells(1, 1), appExcel.Sheets(hoja).Cells(1, columna))
With .Font
.Bold = True
.Name = "Arial"
.Size = 10
.Color = RGB(255, 255, 255)
End With

.Interior.Color = RGB(0, 0, 0)
.HorizontalAlignment = Center
.VerticalAlignmnet = xlCenter
.EntireRow.RowHeight = 20

pero al ejecutar la sentencia : .HorizontalAlignment = Center se detiene la ejecución y me sale el mensaje :" se ha producido el erro '1004' en tiempo de ejecución: Imposible asignar la propiedad HorizontalAlignment de la clase Range" \ a que puede deberse este error ??\ que propiedad es la que controla los encabezados de fila y columna y lineas de división para ocultarlas ?

• como hago para borrar un archivo del disco ?\ se que la sintaxis es: objeto.DeleteFile especArchivo; imagino que especArchivo se refiere a la ruta y nombre del archivo a borrar, pero no entiendo a que se refiere con la opción object... alguien me lo podría explicar, por favor ?

de antemano, muchas gracias y disculpas por el abuso... prometo no molestar mas..

por hoy.
;)


dorian+

fernando:

gracias por respodnerme tan pronto !

fue un error de tipeo el código correcto es:

With appExcel.Sheets(hoja).Range(appExcel.Sheets(hoja).Cells(1, 1), appExcel.Sheets(hoja).Cells(1, columna))
With .Font
.Bold = True
.Name = "Arial"
.Size = 10
.Color = RGB(255, 255, 255)
End With

.Interior.Color = RGB(0, 0, 0)
.HorizontalAlignment = xlCenter
.VerticalAlignmnet = xlCenter
.EntireRow.RowHeight = 20

y cuando la ejecuto me da el mensaje que te indicaba (":" se ha producido el erro '1004' en tiempo de ejecución: Imposible asignar la propiedad HorizontalAlignment de la clase Range")

que propiedad es la que controla los encabezados de fila y columna y lineas de división para ocultarlas ?


gracias una vez mas !!

un saludo\ dorian+

fernando:

he tratado de ejecutar la sentecncia que me aconsejaste para borrar archivos ("kill"), pero no me funciona :(((

Kill ("c:\Mis Documentos\CRSucBA_" & IdCreadorArchivo & ".xls")

me dice que el archivo no existe, pero justo antes de esa instrucción puse un MsgBox para ver si le llegaban bien los parametros y comprobé que si

que puede estar mal ??

gracias por tu ayuda