Hola a Todos, estoy haciendo una macro pero quiero agregarle un contador, mi macro va guardando informacion de una etiquetas, y quiero que cuando hayan registrado la etiqueta 500 se detenga y no permita hacer nada, si alguien me puede ayudar se lo agradecere mucho, saludos
Actualizar:hola, este es el codigo que estoy usando, es de un userform
Private Sub cmdCaptura_Click()
On Error Resume Next
'ActiveSheet.Unprotect "parabar"
'aqui verificamos que los texts no esten vacios
If Me.txtEtiqueta.Text = "" Then MsgBox "El Numero de Etiqueta no puede estar vacio", _
vbExclamation, "CONTROL DE BOTELLAS": Exit Sub
If Me.txtCodigo.Text = "" Then MsgBox "El Codigo de Botella no puede estar vacio", _
vbExclamation, "CONTROL DE BOTELLAS": Exit Sub
Range("A1").Activate
'inicia la busqueda en la columna A
[a1:a1010].Find(What:=txtEtiqueta, After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
'si encontro el valor se posiciona
ActiveCell.Offset(0, 0).Select
'pregunta si la posicion del valor buscado esta vacio
If Selection.
Answers & Comments
Verified answer
Si estas utilizando un formulario puedes usar un textbox que cambie su valor cada vez que ejecutes la macro. Asi solo te quedara validar cuando ese campo sea igual a 500 con Do Until y Loop.... Algo así.
Private Sub CommandButton1_Click()
Do Until TextBox1 = 500
TextBox1 = TextBox1 + 1
Loop
End Sub
En esta sencilla macro le digo que sume 1 al valor que esta en el textbox1, y con Do Until le especifico que lo repita hasta que su valor sea 500. Con Loop inicio la repeticion
Si tienes una camera, sin importa cuál es la que uses y quieres pasar al posterior nivel, un semi-experto en fotografía entonces el volumen Manual de Técnica Fotográfica de aquí http://manualdetecnicafotografica.enle.info/?jL2f es perfecto para ti.
El volumen, Manual de Técnica Fotográfica te guiará a través de todos los aspectos de la fotografía digital. Aunque quieres aprender la parte teórica o quieres conocer las habilidades técnicas, este ejemplar es lo que necesitas para ser mejor fotógrafo.
Desde cómo funciona y como elegir tu cámara hasta como manipular la luz, obtener el color y exposición correcta, hacer retratos impactantes y crear composiciones originales y profesionales con este manual las conocerás mejor.
Este manual fue creado con un solo objetivo en mente, enseñarte a tomar las más increíbles fotografías de forma rápida y liviana.