Jump to content

helenaberdasco

Members
  • Content Count

    18
  • Joined

  • Last visited

About helenaberdasco

  • Rank
    Member

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Muchísimas gracias. Me da vergüenza hasta comentártelo, pero bueno, yo lo hago por si existe alguna solución sencilla (que no creo). He estado probando y la única pega que le veo es que si por ejemplo, en el combobox2 de Departamento, si existiese Dpto. Analitico, Dpto. Informatica, Dpto. RRHH si en vez desplejar el combobox pongo una "D" en la celda E25 coloca directamente la primera opción, es decir, Dpto. Analítico. y si por ejemplo, en el combobox3 de nombre y apellidos, existiesen varios nombres con la letra "J", por ejemplo: Javier, Jorge, Jose,Juan, al poner en el comb
  2. Impresionante!!!!!!!!!!!!!!!!!!!!!!!!!!!! Muchísimas gracias
  3. Ahora que lo leo mas despacio, ¿te refieres a que ordene los combos por orden alfabetico cuando vaya incluyendo datos en las columnas? eso si se puede hacer sería genial
  4. Muchísimas gracias por ayudarme y por tu tiempo. Si se añadiese directamente en vez tener que dar a elegir sería genial (un paso menos), con respecto a los combos ordenados no se a que te refieres. Disculpa las horas pero trabajo y estudio y no me da la vida. Gracias de nuevo
  5. Muchisimas gracias ikanni, espero aprender poco a poco y no volver a molestarte. Muchas gracias de verdad por tu tiempo.
  6. Buenas tardes Eres muy amable. Lo que pretendo es que el combobox1, recoja los valores de la hoja llaves los valores que están en "A"sin incluir las celdas vacías, teniendo en cuenta que se puede ampliar el numero de llaves. En el combobox2, que recoja los valores de la hoja llaves, los valores que están en la columna F y en el combobox3 los que están en la columna G. Todo ello sin incluir los espacios en blanco y teniendo en cuenta que la lista se puede ampliar. Se que es muy lioso y me explico fatal pero te adjunto el archivo por si tienes un momento y me puedes ayudar si se pued
  7. Muchisimas gracias Antoni. Siento decirte que no he comentado que el combobox está en una hoja llamada control de llaves y los datos que quiero que recoja este combobox está en una hoja que se llama llaves, imagino que tengo que añadir la ubicación. ¿Verdad? Disculpa no haberlo puesto anteriormente Gracias por todo
  8. ikani siento molestarte, me diste este código para que si modificaba la columna "a" se rellenaran la celda E, pero como no tengo ni idea he cambiado la tabla y ahora necesito que cuando la columna "C16" se modifique se incluya en la columna "b16" la fecha y así es las siguientes celdas.
  9. Buenos días, Soy principiante y tengo mil dudas. Agradezco en primer lugar toda la ayuda. He creado un conbobox y lo he rellenado con una lista utilizando las propiedades indicando el nombre de la lista en listfillrange y funciona. Pero si quisiera realizarlo con código teniendo en cuenta que la lista va aumentando y no quiero que incluya espacios vacíos de la columna F que es donde tengo la lista, ¿me podríais decir como puedo hacerlo? Gracias
  10. Perdonadme pero soy super novata Private Sub Worksheet_Change(ByVal Target As Range) With Target If .Column = 1 Then Application.EnableEvents = False .Offset(, 4) = Format(Now, "hh:mm") If Len(.Text) = 0 Then .Offset(, 4) = "" Application.EnableEvents = True End If End With End Sub este código funciona fenomenal cuando borro los datos de la celda a18 se borrar los datos de la celda e18 y ¿si quisiera borrar además de la e18, la f18?
  11. Me sale error se ha detectado nombre ambiguo debe ser porque aparecen dos private Sub Worksheet_Change(ByVal Target As Range)
  12. He realizado este codigo para que cuando escriba en la columna A se rellene con la hora en la casilla E. Ahora necesitaría que si borro el dato de la celda por ejemplo a1 se borrara la celda e1 y sucesivamente, es decir que si quito la información de alguna celda de la columna "a" se borrara la celda e correspondiente. Gracias Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("a:a")) Is Nothing Then Range("e" & Target.Row) = Format(Now, "hh:mm") End If End Sub
×
×
  • Create New...

Important Information

Privacy Policy