UniversoExcelForo

Respuesta a consultas.
Fecha de creación: 09.Abril.2012

Fundadores: Wibly,Tyno,Servando,Sakkar,Rosendo2,RMaximo,Railar,Mcoronel,Ioyama,Igtelo,Hugotron,Drochar,Dedos,Alberto,Adolfo

No se pueden hacer consultas de Excel o VBA por mensaje privado.
Utiliza el botón buscar del foro y te ahorras tiempo para obtener "ayuda".

No estás conectado. Conéctate o registrate

Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje [Página 1 de 1.]

1RESUELTO BUCLE CONDICIONAL PARA MACRO el 13/01/14, 07:07 pm

TONIELCUBANO


Hola buenas tardes. Estoy buscando el método para complementar las instrucciones de una macro, de manera que se detenga el proceso cuando llegue a un valor ya prefijado en una celda. EN EL ARCHIVO ESTÁ LA EXPLICACIÓN. Gracias de antemano por la respuesta.
Archivos
Macro bucle condicional.xlsm
No tienes los permisos para descargar los archivos.
(40 KB)

2RESUELTO Re: BUCLE CONDICIONAL PARA MACRO el 15/01/14, 09:35 am

SAKKAR


Tonielcubano, como estás?

Bueno, espero que te sirva... te adjunte archivo con el comentario dentro del mismo cuadro de texto en donde explicas tu problema.

Fijate si te sirve...

Abrazo
Archivos
Macro bucle condicional.xlsm
No tienes los permisos para descargar los archivos.
(41 KB)

3RESUELTO SAKKAR el 15/01/14, 11:20 am

TONIELCUBANO


Hola Sakkar. Ya lo he probado y sí funciona el ciclo de repetición, sin embargo no se detiene. En la macro que tú me has dado, elijo la celda y el valor que necesito, y de hecho (en el archivo que estoy trabajando) veo que cuando se presenta en la celda asignada, el valor que he fijado, no se detiene el proceso. Incluso no sé como pararlo más que reiniciando el equipo. Yo no estoy muy ducho en esto de las macros, si hay otra manera te agradezco. Gracias.

4RESUELTO Re: BUCLE CONDICIONAL PARA MACRO el 15/01/14, 11:39 am

SAKKAR


Antes que nada...  para parar un ciclo loop indefinido, con ESC debería cortar y mandarte a depuración.

seguire viendo y te aviso

5RESUELTO Re: BUCLE CONDICIONAL PARA MACRO el 15/01/14, 11:44 am

SAKKAR


Comencemos desde CERO....

Por favor te pido, realices una pequeña descripción de lo que necesitas que haga la macro, ya que lo vi más detenidamente y el código que ejecutas NO ENTRA EN LOOP en absoluto.... es de corrida simple y sin ciclos.

de esta forma reharemos todo todo desde el inicio.

Saludos

6RESUELTO Re: BUCLE CONDICIONAL PARA MACRO el 15/01/14, 02:03 pm

TONIELCUBANO


Disculpa. ¡Sí funciona!. Sucede que estaba tomando la referencia de otra hoja. La cambié a ActiveSheet y va perfecto. Aprovecho para preguntarte.

1-Cómo puedo hacer para que se detenga cuando el valor es mayor de 125

2-Cómo hago para sustituir el rango "C1" por la celda que está situada 18 posiciones arriba de la celda activa y siempre en la misma columna.

7RESUELTO Re: BUCLE CONDICIONAL PARA MACRO el 15/01/14, 02:11 pm

SAKKAR


OK ahora me quedo tranquilo!!!  jajajaj ya comenzaba a preocuparme...

Respondo;

1) Para que se detenga cuando el valor es MAYOR a 125, solo debes de cambiar en la línea del while a >125 el valor correspondiente

2)Para algo que esta 18 celdas más arriba, debes de utilizar lo siguiente (posicionado en la celda 18 filas más abajo)
ACTIVECELL.OFFSET(-18,0).SELECT

DE esta forma seleccionas la celda 18 filas arriba

Espero te ayude

Saludos

8RESUELTO Re: BUCLE CONDICIONAL PARA MACRO el 15/01/14, 02:44 pm

TONIELCUBANO


No sé que pasa. Sustituyo <>125 por >125 y no se ejecuta la macro (No hace nada)

Y cuando sustituyo Range("C1") por ACTIVECELL.OFFSET(-18,0).SELECT
me dice que algo de que no es compatible el objeto.

9RESUELTO Re: BUCLE CONDICIONAL PARA MACRO el 15/01/14, 02:50 pm

TONIELCUBANO


Primera cuestión solucionada es "<" en vez ">"

Sólo me queda lo de la referencia a la posición (-18,0)
Ya casi casi...

10RESUELTO Re: BUCLE CONDICIONAL PARA MACRO el 15/01/14, 03:54 pm

TONIELCUBANO


Esta es la macro real que estoy trabajando y ya todo funciona perfectamente. Lo único que no me acepta es que quiero cambiar Range("AC1") por ActiveCell.Offset(-18,0).Select ya que esta operación la vuelvo a ejecutar siempre desde la misma fila pero diferente columna. Da un mensaje de que el objeto no admite esta propiedad o método.
















While ActiveSheet.Range("AC1").Value < 19

 ActiveCell.Cut Destination:=ActiveCell.Offset(-1, 0)

 ActiveCell.Offset(-1, 0).Select

Selection.AutoFill Destination:=Range(ActiveCell.Offset(0, 0), ActiveCell.Offset(2600, 0)), Type:=xlFillDefault

 ActiveCell.Offset(1, 0).Select

 Wend

End Sub

11RESUELTO Re: BUCLE CONDICIONAL PARA MACRO el 15/01/14, 04:42 pm

SAKKAR


La línea debería ser (siempre antes de que se ejecute, debes de estar posicionado en la cela 18 filas más abajo de la que queres analizar).

No te lo aceptaba porque es una propiedad de la celda activa y no de la hoja.

While Activecell.offset(-18,0).value<19


Saludos

12RESUELTO Re: BUCLE CONDICIONAL PARA MACRO el 15/01/14, 06:09 pm

TONIELCUBANO


¡¡PERFECTO!! YA ESTÁ SOLUCIONADO. POCO A POCO SE VA APRNDIENDO ALGO MÁS. MUCHAS GRACIAS POR LA AYUDA Y QUIZÁS OTRO VUELVA CON OTRA. GRACIAS.

Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje [Página 1 de 1.]

Permisos de este foro:
No puedes responder a temas en este foro.