jhon fredy murcia

Dante Amor respondió: Con este control actualizas tu listbox: Private Sub ComboBox1_Change() 'Act.Por.Dante Amor ' ListBox1.SetFocus ' RECIBE EL FOCO AL CAMBIAR DE OPCION. Application.ScreenUpdating = False 'Busque = ComboBox1.Value ListBox1.Clear If ComboBox1.Value =...

Julián González Cabarcos respondió: Te juro que me he perdido con tanto código. En el formulario Contactos puedes poner, por ejemplo, un botón y en el evento al hacer clic poner docmd.setwarnings false docmd.runsql"insert into clientes(referencia,nombre_comercial,...

Elsa Matilde respondió: En algún momento tenés que volver a activar la hoja análisis. Lo mejor será al inicio del proceso 'Pulsa': Sub Pulsa() If n = 0 Then n = 1 ' si no se le pasa el numero asigna 1 Dim Temp As String Dim i As Integer 'EM: volver a la hoja análisis...

Dante Amor respondió: Revisa: https://youtube.com/shorts/I4aP25Wg2Xw

Elsa Matilde respondió: He comprobado en tu hoja Pista que los números no aparecen duplicados. En ese caso así quedaría tu macro: Sub buscaCuadro() 'x Elsamatilde Dim nrop As String Dim hoPi As Worksheet, hoCu As Worksheet Dim x As Integer Dim busco 'busca la combinación de...