border
VB 6
 
 
/
  1 links from elsewhere to this Post. Click to view. #1 (permalink)  
Antiguo 13-09-2006, 13:45:10
Gran Participación en el Foro
 
Registrado: ago 2006
Posts: 123
Créditos: 3.884
data_uy Valoración +2
Predeterminado PINTAR CELDAS EXCEL

TENGO POR EJEMPLO UNA PLANILLA DE ALUMNOS Y QUIERO QUE LOS ALUMNOS CON NOTA 4 ME PINTE LAS CELDAS
DE UN COLOR ROJO POR EJEMPLO SI ES > 6 AZUL.

ALGUNA IDEA, MUCHAS GRACIAS

Esteban
Digg this Post!Add Post to del.icio.usBookmark Post in TechnoratiFurl this Post!
Responder Con Cita
  #2 (permalink)  
Antiguo 13-09-2006, 14:01:49
Avatar de Alella
Moderador
 
Registrado: mar 2004
Ubicación: BARCELONA - ESPAÑA
Posts: 1.486
Créditos: 29.765
Alella Valoración +2
Predeterminado

Hola, que tal.

Prueba lo siguiente:

Código:
Sub Macro1()
'
' Macro1 Macro
' Macro grabada el 13/09/2006 por Administrador
'

'
    Columns("A:A").Select
    Selection.FormatConditions.Delete
    Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
        Formula1:="4"
    Selection.FormatConditions(1).Interior.ColorIndex = 3
    Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, _
        Formula1:="5"
    Selection.FormatConditions(2).Interior.ColorIndex = 32
End Sub
Ya nos contarás.
__________________
Un saludo.

Alfredo
Barcelona-España
_________________
Visual Basic
Videos Programacion
Foro Programacion
Tutoriales Programacion
Normas del Foro
Digg this Post!Add Post to del.icio.usBookmark Post in TechnoratiFurl this Post!
Responder Con Cita
  #3 (permalink)  
Antiguo 09-03-2010, 15:56:38
Buena Participación en el Foro
 
Registrado: mar 2010
Posts: 31
Créditos: 1.286
guembe Aun no valorado
Question Re: PINTAR CELDAS EXCEL

Como hago para ver si la casilla seleccionada esta coloreada de un color determinado? y si lo estas escribir un texto en la celda a8.

Sheets("sheet1").Range("a20").SelectIf Selection.Interior.ColorIndex = RGB(255, 255, 255) Then
Range("a8").FormulaR1C1 = "bbb"
End If

Repecto a la paleta de colores ¿como se que numeros corresponden a cada color?

Gracias
Digg this Post!Add Post to del.icio.usBookmark Post in TechnoratiFurl this Post!
Responder Con Cita
  #4 (permalink)  
Antiguo 11-03-2010, 11:02:51
Buena Participación en el Foro
 
Registrado: mar 2010
Posts: 31
Créditos: 1.286
guembe Aun no valorado
Thumbs up Re: PINTAR CELDAS EXCEL

Ya encontre la solucion, aqui os meto en codigo correcto

If Selection.Interior.ColorIndex = 35 Then

Encuanto a lo de la paleta de colores esta en la ayuda de VB
Saludos
Digg this Post!Add Post to del.icio.usBookmark Post in TechnoratiFurl this Post!
Responder Con Cita
Respuesta


Herramientas

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Trackbacks are habilitado
Pingbacks are habilitado
Refbacks are habilitado

LinkBacks (?)
LinkBack to this Thread: http://www.foro.vb-mundo.com/f39/pintar-celdas-excel-7905/
Escrito Por For Type Fecha
VBA (Excel, Word, Outlook, Access) [Archivo] - Pgina 3 - VB-MUNDO - Programacion Visual This thread Refback 23-04-2012 17:32:52

Temas Similares
Tema Autor Foro Respuestas Último Mensaje
Pintar celdas por rangos Nadador VBA (Excel, Word, Outlook, Access) 3 07-02-2007 01:57:20
agregar datos de en celdas de excel guadalupe30 Visual Basic .NET 7 19-05-2006 19:06:12
Celdas excel Tarcos VBA (Excel, Word, Outlook, Access) 1 17-09-2004 00:00:00
ocultar celdas en excel maituki_ VBA (Excel, Word, Outlook, Access) 1 17-09-2004 00:00:00
Excel celdas Tarcos Visual Basic 6.00 1 17-09-2004 00:00:00


La franja horaria es GMT. Ahora son las 10:32:22.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2014, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO 3.1.0
vBCredits v1.4 Copyright ©2007 - 2008, PixelFX Studios


right
Inactive Reminders By Icora Web Design