www.clarioneros.com

El rincón de los desarrolladores
Fecha actual Dom Nov 19, 2017 2:21 pm

Todos los horarios son UTC




Nuevo tema Responder al tema  [ 6 mensajes ] 
Autor Mensaje
NotaPublicado: Vie Ago 11, 2017 11:53 pm 
Desconectado

Registrado: Mié Abr 16, 2014 8:23 pm
Mensajes: 32
Ubicación: Buenos Aires - Argentina
Buenas tardes a todos.
Alguien sabe si se puede y como pintar (color de relleno) las celdas en Excel utilizando este template ?
Cualquier pista o explicacion de como poder lograrlo sera muy bien recibida.
Desde ya muchas graciass a todos.

Carlos Weidl


Última edición por CWeidl el Jue Sep 14, 2017 7:54 pm, editado 1 vez en total

Arriba
 Perfil Email  
 
NotaPublicado: Mar Ago 22, 2017 11:25 pm 
Desconectado

Registrado: Mié Abr 16, 2014 8:23 pm
Mensajes: 32
Ubicación: Buenos Aires - Argentina
Bueno, por las dudas que alguien necesite algo parecido, en mi caso cuando exporto tengo 3 estados posibles, de acuerdo a ese estado debia ponerle un color de fondo a toda la linea que identificara a simple vista su status.
Aclaro que no es lo que necesito, sigo investigando, pero por lo menos voy piloteandola de la siguiente forma :

IF HIS:DERIVACION = 'ARCHIVO'
MSExcel1.Select(LOC:LetraF) ! En la Celda con el Valor de LOC:LetraF
MSExcel1.SetWrapText(TRUE)
MSExcel1.SetColumnWidth(100)
MSExcel1.Assign('ARCHIVO') ! Coloco el Campo
!
MSExcel1.AutoFormat(CLIP('A'& CLIP(LOC:AuxNro)&':'&'G'& CLIP(LOC:AuxNro)),xlRangeAutoFormatColor2)
!
ELSE
MSExcel1.Select(LOC:LetraF) ! En la Celda con el Valor de LOC:LetraF
MSExcel1.SetWrapText(TRUE)
MSExcel1.SetColumnWidth(100)
MSExcel1.Assign('DERIVADO') ! Coloco el Campo
!
MSExcel1.AutoFormat(CLIP('A'& CLIP(LOC:AuxNro)&':'&'G'& CLIP(LOC:AuxNro)),xlRangeAutoFormatColor1)
END

Este codigo le da un formato predefinido.
No logre darle el color que yo quiero, pero por ahora a mi sirve.
Si logro encontrar la forma lo publicare por aca por si alguien lo necesita
Saludos a todos

Carlos weidl


Arriba
 Perfil Email  
 
NotaPublicado: Jue Sep 14, 2017 7:58 pm 
Desconectado

Registrado: Mié Abr 16, 2014 8:23 pm
Mensajes: 32
Ubicación: Buenos Aires - Argentina
Para el que lo necesite. La instruccion es Interior.ColorIndex

Ej. :

MSExcel1.SetProperty('Range("' & LOC:Linea1 & '").Interior.ColorIndex','4') ! Pintar el fondo de la celda

Les dejo adjunto img con los valores posibles.
Espero sirva el aporte
Saludos

Carlos Weidl


No tiene los permisos requeridos para ver los archivos adjuntos a este mensaje.


Arriba
 Perfil Email  
 
NotaPublicado: Dom Oct 01, 2017 11:37 am 
Desconectado
Avatar de Usuario

Registrado: Sab Feb 27, 2016 6:30 am
Mensajes: 3
Pregunta. ¿Cómo saber el color de fondo de una celda desde una tabla de excel? ¿Cómo usar el GetProperty()...? ¿o será de otra manera?


Arriba
 Perfil Email  
 
NotaPublicado: Lun Oct 09, 2017 9:40 am 
Desconectado
Avatar de Usuario

Registrado: Sab Feb 27, 2016 6:30 am
Mensajes: 3
Encontré yo mismo la respuesta Linea1 = MSExcel1.GetProperty('ActiveCell.Interior.ColorIndex')


Arriba
 Perfil Email  
 
NotaPublicado: Lun Oct 09, 2017 9:42 am 
Desconectado
Avatar de Usuario

Registrado: Sab Feb 27, 2016 6:30 am
Mensajes: 3
y MSExcel1.GetProperty('ActiveCell.Interior.Color') te dá el codigo RGB(255,255,255)


Arriba
 Perfil Email  
 
Mostrar mensajes previos:  Ordenar por  
Nuevo tema Responder al tema  [ 6 mensajes ] 

Todos los horarios son UTC


¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 1 invitado


No puede abrir nuevos temas en este Foro
No puede responder a temas en este Foro
No puede editar sus mensajes en este Foro
No puede borrar sus mensajes en este Foro
No puede enviar adjuntos en este Foro

Saltar a:  
cron
Powered by phpBB® Forum Software © phpBB Group
Traducción al español por Huan Manwë para phpbb-es.com