24/11/2004, 05:45
|
 | | | Fecha de Ingreso: noviembre-2003
Mensajes: 418
Antigüedad: 21 años, 6 meses Puntos: 0 | |
| Probaste cambiando el buscar que en la siguiente línea:
Cells.Find(What:=TextBox1, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False).Activate
Por esto: LookIn:=xlValues
Prueba a ver si te soluciona el problema.
Saludos.
__________________ La cantidad total de inteligencia del planeta permanece constante.
La población, sin embargo, sigue aumentando. COLE :cool: Los ordenadores no resuelven problemas ... ejecutan soluciones.Laurent Gasser Tienes alguna duda :pensando: ? >>> www.google.com :aplauso: <<< |