Visual Basic - AYUDA SOBRE EXCEL DESDE VISUAL!!!

Life is soft - evento anual de software empresarial
 
Vista:

AYUDA SOBRE EXCEL DESDE VISUAL!!!

Publicado por Hernan (42 intervenciones) el 20/02/2004 13:37:10
Hola como andan?? quisiera que alguien me diga como puedo hacer para darle formato a una columna de excel desde visual. Los mas importantes para mi son fecha, numerico, currency o moneda, texto, y hora. Muchas Gracias de antemano!!!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:AYUDA SOBRE EXCEL DESDE VISUAL!!!

Publicado por Cecilia Colalongo (3116 intervenciones) el 20/02/2004 14:18:38
Si estás utilizando automation, lo puedes saber grabando una macro en Excel con el formato que necesitas y luego copiando el código en tu programa, por ejemplo para los formatos que nombras:

Dim objExcel As Excel.Application

Set objExcel = New Excel.Application

With objExcel
.Workbooks.Add
.Range("A1").Select
.Selection.NumberFormat = "d-mmm-yyyy"
.Range("A2").Select
.Selection.NumberFormat = "0.00"
.Range("A3").Select
.Selection.NumberFormat = "$ #,##0.00"
.Range("A4").Select
.Selection.NumberFormat = "@"
.Range("A5").Select
.Selection.NumberFormat = "h:mm:ss"
End With
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

MUCHAS GRACIAS

Publicado por Hernan (42 intervenciones) el 20/02/2004 14:29:44
Gracias cecilia por tu ayuda, despues te cuento como me fue. Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Otra Vez yo

Publicado por Hernan (42 intervenciones) el 20/02/2004 14:35:01
Hola Ceci como andas? me dirias por favor como alinear las celdas??? please. Muchas Gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Otra Vez yo

Publicado por Cecilia Colalongo (3116 intervenciones) el 20/02/2004 14:40:29
Como te mencioné anteriormente, grabando una macro y copiando el código obtenés lo que buscas, para ese caso:

With objExcel
.Range("A1").Select
With .Selection
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.AddIndent = False
.ShrinkToFit = False
.MergeCells = False
End With
End With
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Gracias

Publicado por Hernan (2 intervenciones) el 20/02/2004 14:47:28
Muchisimas Gracias Cecilia, me ayudaste mucho.
Hernan
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar