Ejecutar macro con botón y condicionales

Tengo un libro excel el cual lo uso de base de datos para guardar contactos, y lo tengo con una macro la cual al llenar un formulario me los guarda, el tema que tengo es que aveces se me olvida llenar campos por ende le puse una fórmula que dice si es 1 si esta ocupado y si es 0 si esta vacío, esto me da una suma de 4 en la celda a8, ahora el problema es el siguiente, necesito que al darle guardar la macro se ejecute solamente si la celda A8 sea valor 4, y si no es dicho valor, al apretar el botón aparezca un text box que diga qua falta información.

1 Respuesta

Respuesta
1

Te anexo el código

Private Sub CommandButton1_Click()
'Por.Dante Amor
    If [A8] <> 4 Then
        MsgBox "falta información"
        Exit Sub
    End If
    '
    'Aquí debe continuar tu código
    '
End Sub

Saludos.Dante Amor

Recuerda valorar la respuesta.

Como puedo anexarla al botón ya que al asignarle la macro no me aparece en el listado de macros disponibles

Cambia a esto:

Sub Macro()
'Por.Dante Amor
    If [A8] <> 4 Then
        MsgBox "falta información"
        Exit Sub
    End If
    '
    'Aquí debe continuar tu código
    '
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Reloj en excel que tiene conflicto al abrir otro archivo

Para: Dante Amor Ante todo un saludo y por la gran experiencia que tienes en estos temas, tengo un problema con una macro que anteriormente me diste y que funciona excelente, pero tiene un inconveniente que al ejecutarlo me genera conflicto con los...
3 respuestas

Insertar numeros con letras en una celda y detectar error con un msgbox

Me acaba de ayudar bastante en la anterior macro (EL cual me ha servido de mucha ayuda), me ha salido un problemita no en el código si no a la hora de utilizarlo ya que por error no te mencione lo sig.. Este es el código tuyo que me funciona...
1 respuesta

Msgbox al llenar ciertos datos

Tengo un rango A1:A10 (el A7) no es necesario Entonces quisiera que al llenar el ultimo campo A10 (con texto o numero) este me aparecienra un msgbox: "confirma los datos del cilente" Pero que vaya en secuencia A1 A2 A3 Al A10 (si el A7 no se llena no...
1 respuesta

Al no llenarse un campo en un userform salga un msgbox

Tengo una macro con un userform en el cual el usuario llena unos campos que después se ingresan a una hoja de excel. Mi problema es que para uno de esos campos, necesito que si se deja en blanco aparezca un msgbox y se vuelva a poner el cursos en el...
1 respuesta

Buscarv en un formulario con combobox para dante amor

Dante nuevamente recurro a su conocimiento tengo un archivo con mas de 6000 datos insertados por la dependencia gubernamental que me lo envia el detalle es que al terminar de trabajar los avisos para los contribuyentes tengo que capturar de uno por...
1 respuesta

Agregar formato de cela y colorear

Pregunta para dante tengo este código que me hiciste anda bárbaro quisiera agregarle lo siguiente Selection.NumberFormat = "$* #,##0;[Red]$ * -#,##0" (darle este formato a las celdas donde se pegan los importes o sea las celdas de la columna H,I,J, y...
1 respuesta

Macro buscar columna breve con palomeado

Datos con palomeado y datos sin palomeado Caso dato buscado con palomeado: (1) en celda busqueda digite "248" y di enter. (2) Encuentra la columna llamada "PALOMEADO", y pregunta ¿Escriba su palomeado? Respondí "A" (puede ser cualquier dato). (3)...
1 respuesta

MACRO realice búsqueda en donde se coloque la celda de "busqueda" (en 1ra fila)

Dante la presente es una petición o mejora al MACRO desarrollaste en la pregunta " MACRO para búsqueda y reemplazo BREVE" cuya MACRO es la siguiente (la cual funciona muy bien) Private Sub Worksheet_Change(ByVal Target As Range)'Por.Dante Amor If...
1 respuesta

Macro para copiar datos de una hoja a una tabla con fecha especifica

Necesito una macro que copie los datos de una hoja (Dato 1 y Dato 2) con una fecha determinada y ubicarlo en la tabla de la otra hoja de manera lineal Primero debe de buscar la fecha en la tabla y luego recién proceder a copiar. En caso tenga ya data...
1 respuesta

¿Cómo enviar correo outlook mediante una macro desde EXCEL, obteniendo datos de un formulario y de celdas de una planilla?

Actualmente estoy desarrollando una macro que envía un correo de aviso. Me gustarían dos cosas: 1) que los destinatarios sean agregados en un TextBox de un formulario, y que 2) el mensaje que entregue dependa de cierta información que sea recolectada...
3 respuestas