Como colcar un msgbox en macro.

Me proporcionaron una macro por este medio, funciona muy bien, solo qube necesito que lleve un msgbox ya que al dar click se quiere saber si esta bien el cambio a realizar de lo contrario no habrá cambios en la celda "j" inserto macro paa que me indique como quedaría.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C:C")) Is Nothing Then
Range("J" & Target.Row).Value = Date
End If
End Sub

2 Respuestas

Respuesta
1

H o l a:

Private Sub Worksheet_Change(ByVal Target As Range)
'Muestra MSGBOX
 If Not Intersect(Target, Range("C:C")) Is Nothing Then
    If MsgBox("Desea realizar cambios", vbYesNo) = vbYes Then
       Range("J" & Target.Row).Value = Date
     End If
     End If
End Sub
Respuesta

En este link te muestro como

http://www.programarexcel.com/2013/10/como-crear-un-msgbox-vba-en-excel.html 

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas