Cambio propiedades segun fecha en celda con texto

25/10/2005 - 13:40 por MyVi | Informe spam
Buenas. Tengo un problema que no sé resolver. A ver si alguno sabría
ayudarme.

En una columna introduzco NOTAS de texto. Estas notas son con texto y
nº's en general. Cada dia que incorporo más texto dentro de la celda,
escribo el nº de la fecha, y a continuación el texto que sea.

El caso es que necesito crear una macro (codigo vaya)que, tras
ejecutarlo (bien sea boton, o la macro en si.. esto da igual) me revise
la columna (celda a celda) y en aquellas celdas que encuentre la fecha
que yo le indique (se lo indico o en otro campo o me lo solicita y se
lo introduzco en ese momento) que me cambie el color de dicha celda.

Si en la celda 1 de la columna X, encuentro el texto (la fecha) Fecha:
20-10-05, el color de la misma celda pasará a ser Z y asi que me
revise celda a celda en la columna concreta.

Yo tengo idea de hacerlo si la celda tiene un contenido fijo, pero no
asi que busque entre el contenido y que si encuentra la cadena de texto
TAL pues que lo haga.

Gracias

Vic
 

Leer las respuestas

#1 Héctor Miguel
25/10/2005 - 21:19 | Informe spam
hola, Vic !

En una columna introduzco NOTAS de texto...
Cada dia que incorporo mas texto dentro de la celda, escribo el nº de la fecha, y a continuacion el texto...
... necesito... una macro que... revise... (celda a celda) y en aquellas celdas que encuentre la fecha que yo le indique
(se lo indico o en otro campo o me lo solicita y se lo introduzco en ese momento) que me cambie el color de dicha celda.
Si en la celda 1 de la columna X, encuentro el texto (la fecha) Fecha: 20-10-05, el color de la misma celda pasara a ser Z [...]



'hablando' de encontrar 'ciertas' cadenas de texto dentro de 'ciertas' celdas [no creo que sea necesario buscar en toda la columna] -?-
podrias utilizar 'pseudo'-instrucciones +/- como las siguientes... [suponiendo que tienes seleccionado 'el rango apropiado']...
Dim Celda As Range
For Each Celda In Selection
If InStr(Celda, "20-10-05") > 0 Then
' pon aqui las instrucciones para el 'color Z' segun la 'determinada condicion' :))
End If
Next

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Preguntas similares