Jump to content

juan Ignacio

Members
  • Content Count

    46
  • Joined

  • Last visited

About juan Ignacio

  • Rank
    Member

Converted

  • Campos Array

Recent Profile Visitors

397 profile views
  1. Muchas Gracias Silvia !!!!! Saludos.
  2. Estimados, Junto con saludar necesito de su ayuda.... en el siguiente adjunto tengo una formula en la columna E que me extrae el rut de una transaccion bancaria.... pero tambien necesito extraer las filas que tengas letras. En rojo estan los casos que me trae un No-No y no el texto. Adjunto el archivo. De antemano Muchas Gracias y espero sus comentarios. Gracias y Saludos. Juan Ignacio. EXTRAE.xlsx
  3. JSD JSD Muuuuuuchas Gracias por esta nueva solucion !!!! Seguire actualizando y si tengo alguna duda te la hago saber... Un gran Abrazo !! JI
  4. Estimado JSD JSD Junto con saludar y esperando que te encuentres super.... tengo un pequeño problema.... los comentarios de manera automatica son guardados por fecha y hora en la (columna A) de Datos1, pero me di cuenta que el formulario no esta mostrando el historial de comentarios si no estan ordenados por Codigo (columna B).... A modo de ejemplo el mismo cliente 55 tiene un comentario de fecha 13-09-2018 y el formulario no lo muestra pero si lo ordenas por codigo si lo muestra... Quedo atento a tus acostumbrados comentarios.. Gracias y Saludos !! JI Buscar cliente-6 (1)-2.xlsm
  5. JSD JSD !! MUuuuuuuuuuuuuchas Gracias !!! Por lo que vi seria la solucion ...... dejame conectarlo a mi projecto y te cuento ...!! Un abrazo !!! JI
  6. Estimados, Para terminar con este proceso favor de sus comentarios con lo expuesto anteriormente... Solo necesito que al llamar el formulario este quede en la pestaña que se ejecuto. De antemano Muchas Gracias !! y estoy muy agradecido por todos sus aportes ya que pucha que aprendo...!! Saludos. JI
  7. Gracias Cacho por la observacion !! Saludos !! JI
  8. Estimado Antoni, Su ultima actualizacion estaria perfecta... pero podemos hacer un pequeño cambio.... quiero centralizar todos los comentarios en la pestaña DATOS1 de todos los usuarios, pero en estos momentos al llamar el formulario del usuario 1 se habre en el usuario 2 y se va corriendo..... y lo quiero que quede activo para cada usuario.... me explico ?? Adjunto archivo. QUedo atento a sus comentarios. Gracias y Saludos. JI Buscar cliente-5.xlsm
  9. Buenas tardes a todos !! A revisar el material se a dicho..... Cacho gracias por tu aporte y por supuesto a don Antoni y JSD .... !! Un abrazo !! JI
  10. OK Quedo atento a tus comentarios.... Muchas Gracias !! Buen fin de semana para los dos !! JI
  11. OK Si se fijan esta el cliente 400055 el mismo dia 28-08-2018 con varios comentarios em diferentes horarios y al llamarlo solo muestra algunos... Pueden verificar..... cliente quedo de color amarillo. Saludos. JI FORMULARIO 6(1) (1) (1).xlsb
  12. Que tal.....hice las pruebas y al parecer no esta copiando todos los mensajes.... es decir, repeti varias veces un codigo de cliente con la misma fecha de comentario pero distinta hora..... y no figuran todos... Saludos. !! JI
  13. Solucionado lo de la hoja pero si te fijas los codigos los muestran desordenados ya que es el mismo orden en que se graban.... y por otro lado si busco un codigo que no existe me tira un error : Saludos.
  14. Estimados !! Buenos dias !! despues de revisar su aporte... lo estoy implementando y nacieron las siguientes consultas.... es factible que al desplegarse los codigos de clientes se muestren en orden cronologico ?? y por otro lado en mi projecto la hoja en que se encuentran los comentarios es la N°47 llamada DATOS1 comenzando el primer registro en la columna A5... al reemplazar datos no me trae los correctos... Los codigos enviados son : Private Sub ComboBox1_Change() If ComboBox1.ListIndex = -1 Then ListBox1.Clear: MsgBox "El cliente es no existe ", vbCritical Exit Sub End If If Not ComboBox1.ListIndex = -1 Then TextBox1 = ComboBox1.List(ComboBox1.ListIndex, 1) TextBox2 = ComboBox1.List(ComboBox1.ListIndex, 2) TextBox3 = ComboBox1.List(ComboBox1.ListIndex, 3) TextBox4 = ComboBox1.List(ComboBox1.ListIndex, 4) End If Label8 = "" For X = 6 To Hoja1.Range("C" & Rows.Count).End(xlUp).Row If Hoja1.Range("C" & X) = TextBox1 Then Label8 = Label8 & Hoja1.Range("A" & X) & " " & Hoja1.Range("G" & X) & Chr(10) & Chr(10) End If Next End Sub Private Sub CommandButton1_Click() Unload Me End Sub Private Sub Label8_Click() End Sub Private Sub UserForm_Initialize() ComboBox1.RowSource = "'" & Hoja1.Name & "'!B7:G" & Hoja1.Range("B" & Rows.Count).End(xlUp).Row End Sub Quedo atento a sus comentarios !! Gracias y Saludos !! JI
  15. Muchas Gracias a ambos por su notable aporte ....!!!! Un gran abrazo. JI
×
×
  • Create New...

Important Information

Privacy Policy

Ayuda Excel - Madrid, Madrid, ES - Valorada por 6254 personas - Aprender Excel - Total: 4.7 / 5