James Bond

Le hice unas leves modificaciones a tu macro, le puse tres colecciones con indice, si el dato es repetido no lo cargara en los comboboxs Option Explicit Dim unicos As New Collection Dim unicos2 As New Collection Dim unicos3 As New Collection Dim...

Este es un ejemplo de como colocar un valor de combobox en una etiqueta, solo adáptalo a tu combobox. label1.caption=combobox1.value

Prueba esta fórmula =SI(E2-C2>0,"pagado",ABS(E2-C2))

Solo haz lo que indico en la pantalla y tendrás lo que buscas

Prueba esta macro Private Sub CommandButton1_Click() 'bajar celda ActiveCell.Offset(1, 0).Select End Sub Private Sub CommandButton2_Click() 'subir celda ActiveCell.Offset(-1, 0).Select End Sub Private Sub CommandButton2_Click() 'llamar macro 'poner...

Este archivo tiene todavía el código más revuelto que el primero, demasiadas líneas innecesarias en la carga inicial, de lo que solicitas lo único complicado es realizar el código de la búsqueda, para una hoja el código que tienes esta bien pero para...

Para formularios la instrucción varia Suponiendo que estas en el segundo formulario VBA al activar el checkbox este ocultara el commandbutton del primer formulario Private Sub CheckBox1_Click() If CheckBox1.Value = True Then...

Quizá sea porque te falto esto Sub COPIAR() Range("A1") = Range("K5") Range("A1") = Worksheets("Hoja2").Range("B1") Range("A1") = "=K5" Range("A1") = "=Hoja2!B1" End Sub

Trata con esta macro, en tu código falta relacionar las variables con los textbox, después de la pantalla con los resultados de la macro esta el código este es el codigo Private Sub ELIMINAR_Click() Set h = Worksheets("AGUA") On Error Resume Next...

Para agregar los datos al listbox solo agrega la línea que esta en el ejemplo, sin importar cuanto crezca o disminuya la columna A esta instrucción tomara en cuenta los cambios. Application.CutCopyMode = False Workbooks(a).Close False...