Acelerar ejecución macro

[smirnov]

Hola

Para evitar duplicados al introducir datos desde un formulario he creado el siguiente código:

Private Sub txtCode_AfterUpdate()

Dim i As Long
Dim R As Range
Dim repe As String

Set R...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[ioyama]

Hola smirnov

Con tu código y aprovechando el aporte del compañero Fernando Lemus te he montado algo que te puede valer (elimino el bicle For Next y uso Find).

Revisa el adjunto...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[smirnov]

Muchas gracias Ioyama ha funcionado perfectamente.

Ahora va rapidí­simo :lol:

Un saludo y Feliz Navidad