Ayuda con Macro que se ha vuelto lenta

[Jose BN]

Buenas tardes,

Amigos del foro, hace un tiempo un usuario en este foro me colaboró con el siguiente código:

Private Sub CommandButton1_Click()

Application.ScreenUpdating = False...

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í

 

[Jose BN]

Buenas tardes,

Amigos agradecería si alguno me pudiera ayudar a resolver mi dilema.

Saludos
JB

 

[acoris]

Hola Jose BN,

Y la macro se sigue ejecutando en el mismo equipo, es decir, que ahora se corra en una compu de menor capacidad, o quizá, la cantidad de registros ha aumentado considerablemente...

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í

 

[Jose BN]

Gracias! Por tomar el tiempo en responder, de alguna forma extraña ha vuelto a la normalidad.
Tema cerrado

 

[Macro Antonio]

Así mejor:

Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Range("A6:E45").ClearContents
Select Case combobox1
   Case Is = "Día Recolección ImPar"...

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í

 

[Jose BN]

Muchas gracias!