csarxex fmv

Revisa el siguiente XLSM https://drive.google.com/file/d/0B8C1GHm1BZs5Z1Z2bERuZVZPUE0/edit?usp=sharing ... y me cuentas

No Olvida eso, no es un problema

Prueba asi Public Function suum(cell As Range) As Long 'String suum = cell.Value + Cells(cell.Row, 2).Value End Function

Si puede ser recurrente esa infección y debes aplicarte el remedio cada vez que aparezca. Tienes que descubrir que haces que lo reproduzca. Por ejemplo ¿Con quién te acuestas? ¿Cada cuánto cambias las sabanas? ¿Cada cuánto tiempo te cambias la ropa...

Sin en A:A tienes lo que se busca en Hoja2 En A1 titulo Equipos En A2 algún equipo a buscar en B2 puedes poner =buscarv(a1;Hoja2!A:X;2;2;0) en C2 puedes poner =buscarv(a1;Hoja2!A:X;2;3;0) . . . Y asi sucesivamente

¿Funciona si lo diligencio celda por celda? Barajeamelo mejor ¿Qué es para ti "se dañan las validaciones"? Enviame el archivo y esos detalles Para devolverlo con la solución (si es posible)

Cuando pegues hazlo con pegado especiial "Valores"

En una hoja para este reporte Podemos poner En A1 el numero 2 (o el que desees) En A2 la frase que desees ( Por Alcanzar) Luego en la columna C (por ejemplo) podemos mostrar el numero de la hoja donde aparezca la frase (A2) en la linea 2 (A1)...

. Mivariable = Cells(x, 1).value

Saca 'copia a gastos de los "case" ponlo aparte en un IF 'copia a gastos IF Left(ActiveCell, 1) = 5 Then CopiaAGastos (antes o después de Select case ... End select )