Macro exel: recibir aviso "Datos Existen"
Tengo un formulario echo en excel el cual tiene textbox, quisiera que si se agrega un dato existente en el textbox1
El código de mi formulario es este:
Private Sub CommandButton1_Click()
Dim ultimafila As Long
Dim ultimacolumna As Long
Sheets("CLIENTES").Select
ultimafila = Range("A65536").End(xlUp).Row
ultimafila = ultimafila + 1
Cells(ultimafila, 1).Select
ActiveCell.Value = TextBox1
Cells(ultimafila, 2).Select
ActiveCell.Value = TextBox2
Cells(ultimafila, 3).Select
ActiveCell.Value = TextBox3
Cells(ultimafila, 4).Select
ActiveCell.Value = TextBox4
TextBox1 = Empty
TextBox2 = Empty
TextBox3 = Empty
TextBox4 = Empty
Sheets("factura").Select
Unload Me
End Sub
Saludos y Feliz Año Nuevo
El código de mi formulario es este:
Private Sub CommandButton1_Click()
Dim ultimafila As Long
Dim ultimacolumna As Long
Sheets("CLIENTES").Select
ultimafila = Range("A65536").End(xlUp).Row
ultimafila = ultimafila + 1
Cells(ultimafila, 1).Select
ActiveCell.Value = TextBox1
Cells(ultimafila, 2).Select
ActiveCell.Value = TextBox2
Cells(ultimafila, 3).Select
ActiveCell.Value = TextBox3
Cells(ultimafila, 4).Select
ActiveCell.Value = TextBox4
TextBox1 = Empty
TextBox2 = Empty
TextBox3 = Empty
TextBox4 = Empty
Sheets("factura").Select
Unload Me
End Sub
Saludos y Feliz Año Nuevo
1 respuesta
Respuesta de emov19
1