En Excel como funciona el Do... Loop until
Tengo el siguiente problema para un doble Do.... loop until. ¿Cómo freno el segundo Do? Te pongo los datos:
Gracias...
- Sub VARIABLE()
- Dim A As String
- X = 12
A = 4 - Do
'SE POSICIONA EN EL PRIMER REGLON DEL OBRA SI ASIGNAR No. DE REQUISICION
Range("D5").Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 1).Select
Stop
'COPIA A B-X EL VALOR DEL No.OBRA DE ESE RENGLON
Range("A" & X) = ActiveCell.Value
Stop
'PONE EL VALOR DEL No. DE REQUISION EN EL RENGLON ACTUAL
ActiveCell.Offset(0, -1).Value = A 'Range("B" & X).Value
Stop
'SE BRINCA AL SIGUIENTE REGLON
ActiveCell.Offset(1, 0).Select
Stop
'CONDICIONAL SI LA OBRA ACTUAL = LA OBRA COPIADA ENTONCES DA EL VALOR DE No. REQUISICION
'ELSE SE BRICA UN RENGLON
Do
If ActiveCell.Value = Range("A" & X) Then
ActiveCell.Offset(0, -1).Value = A 'Range("B" & X).Value
ActiveCell.Offset(1, 0).Select
Else
ActiveCell.Offset(1, 0).Select
End If
Stop
Loop Until ActiveCell.Value = 100
Stop
A = A + 1
Loop Until ActiveCell.Offset(0, 0).Value = ""
Stop
Range("A1").Select
End Sub
1 respuesta
Buen dia Dante, te platico lo que necesito:
Es un formato para hacer ordenes de compra, se trata de llenar el numero de obra y la descripción del material y que la macro defina el No. de orden de compra tanto por obra como general.
Muchas gracias por tu ayuda.
Entiendo que estás poniendo una imagen antes de que se ejecute la macro, ahora me puedes explicar cómo se llenaría, es decir, pon una imagen de cómo quedaría después de ejecutar la macro.
Procura que en la imagen se vean las filas y las columnas de excel.
Explícame cómo se llena, es muy importante que me expliques cómo se llena el número de compra por obra como general.
La imagen no es parte de la macro. El numero de requisicion por obra: la primera por llenar seria la de la obra 10, en las anteriores de la obra 10 tenemos la ultima orden de compra por obra numerada en 1, por lo tanto la siguiente es la 2, al igual la otra que esta dos filas abajo. La siguiente por definir seria de la obra 30.1, en las ordenes de compra anteriores la ultima es la numero 2, por lo tanto sigue la 3 para los dos materiales que tenemos en la nueva. Para la orden de compra de la obra 15 no tenemos anteriores, por lo que su numero seria 1. El numero de orden de compra general es simplemente el ultimo numero de requisicion mas uno para la siguiente (una orden de compra tiene uno o varios materiales).
Espero haberlo explicado bien esto.
Muchas gracias Dante
Disculpa, pero sigo sin entender.
Para entender tienes que poner 2 imágenes, una con los datos originales y la segunda imagen con los resultados que esperas.
Procura que en las 2 imágenes se vean las columnas y las filas de excel.
Ahora sí, con las 2 imágenes me explicas cómo llenaste los datos de la imagen2.
