Cuadro de mensaje si falta algún valor.

[dantemiguelturcutto]

Hola gente, como les va?.

Bueno, la duda que tengo es la siguiente.

Como hago una macro que al apretar el boton "generar" se fije si los campos tienen algun valor, si no es así, que salga un cuadro de mensaje el cual diga "Faltan valores".

No se si me explico, desde ya, muchas gracias.

Aca les paso la macro con la cual hace que se guarde en un listado los valores, al apretar "generar".

Código:

Sub Ingreso()
'
' Ingreso Macro
' Macro grabada el 15/01/2015 por MI PC
'

'
    Range("B7:H7").Select
    Selection.Copy
    Sheets("ListadoControl").Select
    ActiveWindow.ScrollRow = 3
    ActiveWindow.ScrollRow = 60000
    Range("A60000").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    ActiveWindow.ScrollRow = 60000
    ActiveWindow.ScrollRow = 1
    Range("A10:G60000").Select
    Application.CutCopyMode = False
    Selection.Sort Key1:=Range("A10"), Order1:=xlDescending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
    Range("E1").Select
    Sheets("IngEgr").Select
    Range("B1:H1").Select
End Sub