Buscar con el codigo VBA

04/02/2005 - 01:21 por JAVIER | Informe spam
Hola amigos que tal, a continuacion queria ver si me pueden ayudar a lo
siguiente:
Tengo una informacion la cual necesito encajar en el mes correspondiente,
por tanto las casillas alas cuales me voya referir son meses, G8=Enero
H8=Febrero etc. donde G1=Enero que es la referencia que cambiara deacuerdo a
los datos pero bien necesito
Buscar cual de las casillas de G8:R:8 es igual a G1
Activar la casilla donde fue igual a G1
bajarse una fila y
Colocar la formula SUMAR.SI(Datos!$A:$A,$A:$A,Datos!$G:$G)
asi de sencillo.
espero ver si alguien tiene la forma facil y practica.
Saludos
 

Leer las respuestas

#1 Héctor Miguel
04/02/2005 - 09:03 | Informe spam
hola, JAVIER !

... buscar cual de las casillas de G8:R8 es igual a G1... bajarse una fila
... y colocar la formula SUMAR.SI(Datos!$A:$A,$A:$A,Datos!$G:$G)
... forma facil y practica.



la siguiente es una forma [entre varias mas] +/- 'sencilla y practica'
[pero requiere 'prevencion de errores'] :))
espera por mas propuestas.

saludos,
hector.
dentro del codigo de tu macro == Dim Col As Byte
On Error Resume Next
Col = Evaluate("Match(g1,g8:r8,0)")
If Col > 0 Then
Range("f8").Offset(1, Col).Formula = "=SumIf(Datos!$a:$a,$a:$a,Datos!$g:$g)"
Else
MsgBox "No hay coincidencias para <" & Range("g1") & "> en G1"
End If

Preguntas similares