Saltar al contenido

Como ejecutar macro dependiendo valor de celda


.

✅Como Ejecutar Macro 💥💥Condicionada por Valor de una Celda

En esta oportunidad te presento una macro que se ejecuta dependiendo del valor de una celda, es decir que la macro evaluará el valor de una celda determinada si coincide con el valor establecido ejecuta la macro.

Si estás trabajando con textbox quizás te interesen las macros presentadas anteriormente, una consiste en una macro que solo permite en el Textbox ingresar texto o string, otra es una macro que sólo deja ingresar números en los Textbox, otra es macro que escribe las barras automáticamente al ingresar las fechas.

Te recomiendo para mejorar tu manejo de Excel hacer click acá, si quieres aprender sobre Excel, en inglés, entonces debes hacer click here. Si lo que necesitas es aprender o profundizar sobre la programación de macros con VBA este es unos de los mejores cursos on line que he visto en internet, te lo recomiendo no te arrepentirás.

  
Descargando el ejemplo desde el link del final podrás observar que la macro depende del valor de la celda A1, en este caso si el valor es 1 se ejecuta la macro, si el valor es 0 se ejecuta otra macro, desde luego se puede adaptar e incluso obtener el valor de alguna fórmula y ejecutar la macro.

En el ejemplo, la macro ingresa valores desde el 4 al 16 de la columna A a la G, si el valor de la celda A1 es igual a 1 si es igual a 0 borra los valores de dicho rango. En el vídeo que sigue podrás ver su funcionamiento y explicación en forma más gráfica.

Suscribe a nuestro canal de You Tube para recibir en tu correo vídeos explicativos sobre macros interesantes, como  por ejemplo formulario que crea un listado de todas las hojas para poder luego seleccionarlas, buscar en listbox mientras escribes en textbox, ordenar hojas libro excel por su nombre, conectar Excel con Access y muchos ejemplos más.


if (payload.eventType == ‘subscribe’) {
// Add code to handle subscribe event.
} else if (payload.eventType == ‘unsubscribe’) {
// Add code to handle unsubscribe event.
}
if (window.console) { // for debugging only
window.console.log(‘YT event: ‘, payload);
}
}

Código que se inserta en un Formulario

Sub borra()
Range(«A4:G16»).Clear
End Sub

Sub llena()
For j = 1 To 7
For i = 4 To 16
Cells(i, j) = i
Next i
Next j
End Sub





Código que se inserta en el objeto hoja

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 1 And Target.Column = 1 Then
If Cells(Target.Row, Target.Column) = 1 Then
Call llena
ElseIf Cells(Target.Row, Target.Column) = 0 Then
Call borra
End If
End If
End Sub

Si te fue de utilidad puedes INVITARME UN CAFÉ y de esta manera ayudar a seguir manteniendo la página, CLICK para descargar en ejemplo en forma gratuita.


.

If this post was helpful INVITE ME A COFFEE and so help keep up the page, CLICK to download free example.

Si te gustó por favor compártelo con tus amigos
If you liked please share it with your friends