gmeeuwes

arico19 respondió: Usando filtro avanzado es muy sencillo. Te añado una imagen donde busco tanto en una de las columnas como en la otra el dato "Apellido2". Para ello tengo que crear antes una tabla de criterios (la coloco al lado de la tabla de apellidos) y le indico...

aetxezar respondió: con exit sub sales del sub actual pero vuelves al punto desde donde se le llamo. Para terminar y dejar de ejecutar codigo debes poner un end Sub Rango_Vacio(Value1, Value2) If Range(Value1) = "" Then MsgBox (Value2) End End If End Sub

jerryeagle respondió: No explicas si el TextBox esta en un userform o en la hoja, de cualquier forma esta opción funciona: En el evento KeyCode del Textbox: Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) If KeyCode = 13 Then...

jpcjose respondió: La macro seria la siguiente Sub prueba() On Error Resume Next Error 1004 n = WorksheetFunction.VLookup(Hoja1.Range("A1").Value, Hoja2.Range("A1:A50000"), 1, 0) If Hoja1.Range("A1").Value = n Then Dim Mensaje, Estilo, Título, Ayuda, Ctxt, Respuesta,...