Jump to content

JSDJSD

Members
  • Content Count

    612
  • Joined

  • Last visited

  • Days Won

    29

Posts posted by JSDJSD


  1. Hace 2 horas, Marcos14 dijo:

    @JSDJSD lo que desearía es que al introducir el DNI/CIF/NIE en un TEXTBOX, al apretar un COMMANDBUTTON pues me cambi el color de ese TEXTBOX a por ejemplo VERDE y eso querría decir que ese DNI/CIF/NIE, introducido es correcto.

    Prueba el adjunto y comenta. Te lo he dejado de manera que no tengas que hacer uso de un botón para comprobar si existe o no, simplemente introduce tu DNI,CIF o NIE y automáticamente se detectara si existe colocando de color verde el fondo del textbox.

    Prueba1 consulta Marcos14.xlsm


  2. Hola hugo tlapanco

    Hace 2 horas, hugo tlapanco dijo:

    Criterio 2 : Mostrar solo los resultados del estatus seleccionado del primer criterio, es decir solo mostrar los proyectos cancelados del director seleccionado en el primer criterio de búsqueda  (Fail)

    Mi opción, mira el video: https://drive.google.com/open?id=1Qh8WFGqMUdHCsPbKjVSpEGeHod56YRLt

    Hace 2 horas, hugo tlapanco dijo:

    Cambiar estatus: Al seleccionar un el nuevo estatus del director y presionar el botón cambiar estatus cambia la celda que le corresponde con el nuevo estatus pero en la base no (Fail)

    Explícate mejor pon un ejemplo lo más completo posible, pero si lo que pretendes  es modificar el estatus marcado en el listbox mediante el segundo criterio pulsando el botón cambiar estatus confirmalo y te lo modifico.


  3. Te dejo otra opción en la que tienes un formulario en el cual tienes una caja de texto y un listbox.

    Al iniciar el formulario te carga las hojas en el listbox por orden alfabético y si introduces una letra en el textbox te muestra las hojas que comiencen por dicha letra.

    Dando un click en cualquier hoja filtrada del listbox te lleva automáticamente a la hoja seleccionada.

    Listar hojas del libro y dirigirse a ella con un textbox y listbox.xlsm


  4. Te dejo una segunda opción.

    Opción 2 escribes las líneas en una celda, usando Alt+Enter para los saltos de línea
    copias la celda y en el editor de vba pegas en la propiedad "Caption" del botón
    y seguidamente le quitas las comillas (al inicio y al final del Caption)

    Para que te funcione debes establecer en True la propiedad "WordWrap"

    Video: https://drive.google.com/open?id=1Z3pgmLI2SpbkE8PjzQ0RN8D3P-eoN2f5


  5. En 23/1/2020 at 10:38 , Juanmasi dijo:

    Este es el archivo. La idea es en el formulario "mostrar" agregar un boton que me permita modificar el registro seleccionado

    Hola  Juanmasi , mira el vídeo y dí que parte no se cumple.

    https://drive.google.com/open?id=1QXbIPl5SmH46yxW_MKGbvVqi0XFoeyWo

     

    Hace 10 horas, Juanmasi dijo:

    lo he probado y al abrirlo ya me genera un error. Tampoco entiendo el cambio. Como comenté, lo que pretendo es incluir un botón que me permita realizar modificaciones sobre el registro activo y guardarlo, sustituyendo el antiguo. De todas formas muchisimas gracias por tu interés. 

    Que error te da al abrirlo ?

    Que no entiendes de que cambio ?


  6. Hola hiddenmafia, copia este código en tu formulario.

     

    Private Sub UserForm_Initialize()

      With Hoja2     

        ComboBox1.RowSource = "'" & .Name & "'!A2:B" & .Range("A" & Rows.Count).End(xlUp).Row

        ComboBox2.RowSource = "'" & .Name & "'!N2:N" & .Range("A" & Rows.Count).End(xlUp).Row

        ComboBox3.RowSource = "'" & .Name & "'!AB2:AB" & .Range("A" & Rows.Count).End(xlUp).Row

        ComboBox4.RowSource = "'" & .Name & "'!AH2:AH" & .Range("A" & Rows.Count).End(xlUp).Row

        ComboBox5.RowSource = "'" & .Name & "'!AK2:AK" & .Range("A" & Rows.Count).End(xlUp).Row

        ComboBox6.RowSource = "'" & .Name & "'!P2:P" & .Range("A" & Rows.Count).End(xlUp).Row  

      End With 

    End Sub

     

    y tendras resueltos los puntos  1,5,9,15,17 y 19.

    con 4 o 5 ayudas más como esta lo tendrás resuelto, eso sí siempre y cuando expliques a que te refieres cuando dices relación entre esto y lo otro.


  7. En 18/7/2019 at 9:09 , VALENTIN dijo:

    Y otro problema es como se puede quitar el error #N/D en los meses de menos de 31 días.

    Pega hoja ENTRADAS en la celda E1 la siguiente formula:

    =SI.ERROR(BUSCARV($D11;ENTRADAS!$C:$J;2;0);0)

    Confirmarla con Ctrl+Mayuscula+Enter

    Arrastra la formula hacia la derecha y hacia abajo para copiarla en todas las celdas que necesites.

    Con respecto a lo demás si explicas el funcionamiento yo lo plantearía de otro modo.

     

×
×
  • Create New...

Important Information

Privacy Policy


CTA Templates.png