none
ejecutar una macro al cambiar el valor de una celda en una formula RRS feed

Respuestas

  • Hola!

    tan simple como verificarlo en el evento al cambiar de la hoja

     

    Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, ActiveSheet.Range("A1:A10")) Is Nothing Then
       If ActiveSheet.Range("B1") > 1000 Then MsgBox "Te has pasado"
    End If
    End Sub


    Saludos a todos desde Huelva <br/> http://www.mvp-access.es/emilio/

    martes, 20 de agosto de 2013 16:21

Todas las respuestas

  • Hola!

    tan simple como verificarlo en el evento al cambiar de la hoja

     

    Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, ActiveSheet.Range("A1:A10")) Is Nothing Then
       If ActiveSheet.Range("B1") > 1000 Then MsgBox "Te has pasado"
    End If
    End Sub


    Saludos a todos desde Huelva <br/> http://www.mvp-access.es/emilio/

    martes, 20 de agosto de 2013 16:21
  • excelente, me funcionó a la primera,

    muchas graciassssssss

    martes, 20 de agosto de 2013 17:19