Cumplidas e Incumplidas

Hola de Nuevo, creo que no se aprecia bien la tabla que anote:
Por ejemplo, tengo en C2 Agrupación George Papanicolaou de Caborca, I.A.P.
en D2 Cumplio
la hoja se llama Resultado. se podria por ejemplo que en otra hoja que se
llama Incumplidas al momento de
de que la celda D2 se ponga Pte se vaya para alla y se cambia a Cumplio se
quite o se elimine de la hoja incumplida,
en la hoja incumplida no tengo un formato predeterminado, solamente quiero
que me envie ese toda la instiutcion si no cumplio osea Pte
espero me haya explicado mejor ya que en la ateterior no se entiende..

saludos

Jesús Peralta
el_ultimo_profeta"alt+64"hotmail.com
Hermosillo, Sonora. Mexico
"Jesús Peralta" escribió en el mensaje
news:

Que tal Mestros y Amigos del Foro, saludos ante todo,..
Me podrian apoyar la mano con esto, tengo en la hoja llamada Resultados
esta tabla, como podria llevarme las Pte a otra hoja que se llama
Incumplidas,
y Cumplio a otra hoja que se llama Cumplidas, no se si por medio de macro
o alguna Formula llame las las que Cumplio y Pte y asi, conforme vayan
Cumpliendo se vayana Cumplidas y las Pendientes a Incumplidas o si hay una
manera mejor de llevar este control, ya que son 150 instituciones las que
se le meten informacion y las leyendas Cumplio y Pte me aparecen en base a
otro archivo que se va llenando.
saludos y gracias de antemano


A B C D E F G
1 Region Poblacion Resultados Primer Trimestre 2007 Resultados
Segundo Trimestre 2007 Resultados Tercer Trimestre 2007 Resultados Cuarto
Trimestre 2007
2 Caborca Agrupación George Papanicolaou de Caborca, I.A.P. Cumplio
Pte Pte Pte
3 Caborca Casa Hogar Pbro. Luis María Valencia,A.C. Cumplio Pte Pte
Pte
4 Caborca Centro de Integración para Drogadictos y Alcohólicos, A.C.
Caborca Cumplio Pte Pte Pte
5 Caborca Fundación Educativa y Cultural Don Bosco de Caborca, A.C.
Pte Pte Pte Pte
6 Caborca Familias con Propósitos en México, A.C. Cumplio Pte Pte
Pte
7 Caborca Agrupación George Papanicolaou Puerto Peñasco, I.A.P.
Cumplio Pte Pte Pte
8 Caborca Casa Hogar "Esperanza para los Niños", I.A.P. Cumplio Pte
Pte Pte
9 Caborca Centro de Integración para Drogadictos y Alcohólicos, A.C.
Puerto Peñasco Cumplio Pte Pte Pte
10 Caborca Club de Leones de Caborca APIRC, A.C. Pte Pte Pte Pte
11 Caborca Club de Leones de Caborca, A.C. Cumplio Pte Pte Pte


Jesús Peralta
el_ultimo_profeta"alt+64"hotmail.com
Hermosillo, Sonora. Mexico

hola, Jesús !

... tengo en la hoja llamada Resultados esta tabla
como podria llevarme las Pte a otra hoja que se llama Incumplidas
y Cumplio a otra hoja que se llama Cumplidas
no se si por medio de macro o alguna Formula llame las las que Cumplio y Pte
y asi, conforme vayan Cumpliendo se vayana Cumplidas y las Pendientes a Incumplidas
o si hay una manera mejor de llevar este control ya que son 150 instituciones las que se le meten informacion
y las leyendas Cumplio y Pte me aparecen en base a otro archivo que se va llenando...

las *tablas* [sobre todo con titulos largos] nunca han *pasado bien* en los lectores de noticias :-((

1) [aparentemente] tienes *inidcadores* de cumplidas o pendientes en las columnas D, E, F y G [entonces]...
como se deberia *controlar* sobre cual de las columnas [E:G] se debe mover a una sola hoja [incumplidas o pendientes] ???

2) [probablemente] te convendria manejar filtros avanzados por codigo y mandar a hojas distintas las in/cumplidas -?-
solo define bien si necesitaras una sola hoja [segun cual columna como base] o varias [p.e. una por cada trimestre] ?-

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

A B C D E F G
1 Region Poblacion Resultados Primer Trimestre 2007 Resultados Segundo Trimestre 2007 Resultados Tercer Trimestre 2007 Resultados Cuarto Trimestre 2007
2 Caborca Agrupación George Papanicolaou de Caborca, I.A.P. Cumplio Pte Pte Pte
3 Caborca Casa Hogar Pbro. Luis María Valencia,A.C. Cumplio Pte Pte Pte
4 Caborca Centro de Integración para Drogadictos y Alcohólicos, A.C. Caborca Cumplio Pte Pte Pte
5 Caborca Fundación Educativa y Cultural Don Bosco de Caborca, A.C. Pte Pte Pte Pte
6 Caborca Familias con Propósitos en México, A.C. Cumplio Pte Pte Pte
7 Caborca Agrupación George Papanicolaou Puerto Peñasco, I.A.P. Cumplio Pte Pte Pte
8 Caborca Casa Hogar "Esperanza para los Niños", I.A.P. Cumplio Pte Pte Pte
9 Caborca Centro de Integración para Drogadictos y Alcohólicos, A.C. Puerto Peñasco Cumplio Pte Pte Pte
10 Caborca Club de Leones de Caborca APIRC, A.C. Pte Pte Pte Pte
11 Caborca Club de Leones de Caborca, A.C. Cumplio Pte Pte Pte

hola Jesus,

acabo de leer tu ultimo mensaje, y aunque habia pensado en algo parecido de momento te pongo este codigo, que aunque no
lo hace automaticamente, si que cada vez que ejecutes el codigo te actualizara los listados.

me he permitido hacer una ampliacion de tu propuesta, pero si no te gusta podemos omitirla con facilidad. Se trataria de
poner otras 4 hojas en el libro, una por trimestre, en fin te comento los requisitos y pruebala con copias:

1º) hojas:

.- "Resultados" => contiene la lista original donde escribirias cuando te paguen o no. En las columnas de la D a la G
deberia poner en todas 'Pdt' hasta que lo cambies por 'Cumplio'. Es decir no deberian estar vacias ni ser 0. Si no
quieres que se vea el Pte de los trimestres futuros se podria mirar algun truquillo para ocultarlos. Tambien asegurate
de que tanto 'Pte' como 'Cumplio' no llevan espacios ni delante ni detras.

.- "Cumplidas" e "Incumplidas" => se cargaran con todos los registros que cumplan las condiciones hasta el trimestre
actual (en el momento de ejecutar la macro). Es decir, en Cumplidas todos los que hayan 'cumplido todos los trimestres
incluido el en curso y en incumplidas todas las que tengan al menos un trimestre pendiente tambien hasta el 'actual'

NOTA: por cierto en la macro se da por hecho que no puede haber un Pte anterior a un Cumplio, es decir, que, suponiendo
que hablamos de recibos o similar, no se podria tener pagado el 2º trimestre sin haber pagado antes el 1º, si no es asi
comentas

.- "Pte_1", "Pte_2", "Pte_3" y "Pte_4" que serian las cuatro hojas en las que se desglosarian trimestre a trimestre los
Ptes . Puedes cambiar el nombre por los que quieras, siempre y cuando sean iguales excepto que acaben en 1, 2, 3 y 4 y
cambiando en la constante HojaTrimestre "Pte_" por la parte igual de tu nombre, es decir todo menos el ultimo nº.

2ª) da por hecho que la lista esta como la expones (de la A a la G), que los titulos estan en la fila 1 y los datos
empiezan en la 2.

3ª) solo se toman en consideracion los Ptes/Cumplio hasta el trimestre 'actual', incluido. Si lo ejecutas en enero, solo
tendra en cuenta el 1er trimestre, en junio el 1º y el 2º, en Julio el 1º, el 2º y el 3º, etc

bueno, prueba con copias y si te vale la idea podemos intentar automatizarlo

'' en un modulo normal pega este codigo (ojo a la duplicacion de option explicit)
' y ejecutalo como mejor te venga (un boton, alt+F8, etc)
'
Option Explicit
'
' estas constantes podrian cambiarse en el codigo por su
' equivalente, pero las he puesto sobre la marcha y ya que
' estan pues quizas lo hagan mas comodo de cambiar
'
Public Const Cumplio As String = "Cumplio"
Public Const Pte As String = "Pte"
Public Const HojaTrimestre As String = "Pte_"
'

Sub Separar_Pendientes_Cumplidas()
Dim ultF As Long, ultF_2 As Long, _
n As Integer, Trimestre As Integer, _
Hoja As String, Hoja_2 As String, _
Estado As String, Rango As Range, FormulasEstado
With Worksheets("Resultados")
ultF = .[a65536].End(xlUp).Row
If ultF = 1 Or .Range("a" & ultF - 1) = "" Then Exit Sub
Worksheets("Cumplidas").Columns.Clear
.[a1:g1].Copy Worksheets("Cumplidas").[a1:g1]
Worksheets("Incumplidas").Columns.Clear
.[a1:g1].Copy Worksheets("Incumplidas").[a1:g1]
Trimestre = Int((CLng(Format(Date, "yy")) + 2) / 3)
FormulasEstado = _
Array(Pte & Pte & Pte & Pte, _
Cumplio & Pte & Pte & Pte, _
Cumplio & Cumplio & Pte & Pte, _
Cumplio & Cumplio & Cumplio & Pte, _
Cumplio & Cumplio & Cumplio & Cumplio)
For n = 0 To Trimestre
Estado = "=((d2&e2&f2&g2)=""" & FormulasEstado(n) & """)"
If n = 0 Then
Hoja = "Incumplidas"
ElseIf n = Trimestre Then
Hoja = "Cumplidas"
ElseIf n > Trimestre Then
Exit For
Else
Hoja = "Incumplidas"
End If
With Worksheets(Hoja)
ultF_2 = .[a65536].End(xlUp).Row + 1
Set Rango = .Range("a" & ultF_2 & ":g" & ultF_2)
End With
.[a1:g1].Copy Rango
.[i1:i2].ClearContents
.[i2].Formula = Estado
.Range("a1:g" & ultF).AdvancedFilter xlFilterCopy, _
.[i1:i2], Rango, True
If Hoja = "Incumplidas" Then
Hoja_2 = HojaTrimestre & n + 1
With Worksheets(Hoja_2): .Columns.Clear
With Worksheets(Hoja)
.Columns.AutoFit
.Range(.Cells(ultF_2, 1), _
.Cells(.[a65536].End(xlUp).Row + 1, 3 + Trimestre)).Copy _
Worksheets(Hoja_2).[a1]
End With
.Columns.AutoFit: End With
End If
Rango.EntireRow.Delete
Next
.[i2].Clear
End With
Set Rango = Nothing
End Sub


espero te ayude
un saludo y hasta pronto
Ivan

hola chicos,

1) [aparentemente] tienes *inidcadores* de cumplidas o pendientes en las columnas D, E, F y G [entonces]...
como se deberia *controlar* sobre cual de las columnas [E:G] se debe mover a una sola hoja [incumplidas o pendientes] ???

2) [probablemente] te convendria manejar filtros avanzados por codigo y mandar a hojas distintas las in/cumplidas -?-
solo define bien si necesitaras una sola hoja [segun cual columna como base] o varias [p.e. una por cada trimestre] ?-

acabo de leer el mensaje de Hector y me ha hecho gracia, pues el mio
parece un plagio de sus ideas (aunque seguro que el desarrollo de las
mismas no tendria comparacion), aunque lo cierto es que no lo he visto
hasta despues de enviar el mio.

bueno, es un 'honor' el tener (aunque sea en contadas ocasiones)
'ideas' parecidas a las del 'maestro'.

un saludo y hasta pronto
Ivan

PD: en el codigo hay alguna cosilla que sobra, aunque no parece
molestar

hola, Ivan y Jesus !

yo habia pensado en algo parecido a esto: -> http://tinyurl.com/yvpasr

saludos, ;)
hector.

1) [aparentemente] tienes *indicadores* de cumplidas o pendientes en las columnas D, E, F y G [entonces]...
como se deberia *controlar* sobre cual de las columnas [E:G] se debe mover a una sola hoja [incumplidas o pendientes] ???

2) [probablemente] te convendria manejar filtros avanzados por codigo y mandar a hojas distintas las in/cumplidas -?-
solo define bien si necesitaras una sola hoja [segun cual columna como base] o varias [p.e. una por cada trimestre] ?-

acabo de leer el mensaje de Hector... lo cierto es que no lo he visto hasta despues de enviar el mio.
bueno, es un 'honor' el tener (aunque sea en contadas ocasiones) 'ideas' parecidas [...]