Saltar al contenido

Enigma25

Moderadores
  • Contador de contenido

    2384
  • Unido

  • Última visita

  • Days Won

    47

Sobre Enigma25

  • Rango
    Miembro

Información de perfil

  • Sexo Hombre

Visitantes recientes del perfil

1903 visitas de perfil
  1. MACROS EN FACTURA

    Hola @ENRIQU3SC37 Puedes comprimir tu archivo y/o enviarlo desde Drive de Google. Saludos.
  2. ayudaaaaaaaaaaaaa

    Hola @Zayed07 Favor leer las normas de uso Saludos cordiales.
  3. In Memóriam

    Cuanto lamento la partida de una gran persona. Aunque sigamos adelante, siempre tendremos ese vacío por la tristeza de ese "adiós". Mis mas sinceras palabras de agradecimiento y pesar por su partida. MI MAYOR RESPETO...
  4. Copiar datos de una hoja a otra

    Hola Por favor adjunta tu archivo para ayudarte. Saludos.
  5. Actualizar libros sin abrirlos ??

    @eugeniocol Usted está siendo muy descortés al tratar a las personas que dedican su tiempo en ayudarle. No es la manera correcta de referirse cuando la intención es solucionar su requerimiento en forma eficiente. Lo invito a que reflexione un poco su modo de proceder. La humildad y el agradecimiento es algo valioso para todos y abre muchas puertas. Saludos a todos y muchas gracias por sus contribuciones que son excelentes. Mis respetos.
  6. Problema con Setfocus

    Hola Prueba quitando la propiedad SelStart a ver que sucede. Puedes adjuntar tu archivo para ver como se ejecuta. Saludos.
  7. Ordenar finas y asociar a otra columna

    Otra modificación : Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 2 Or Target.Column = 3 Then If Target.Row > 3 Then If Not IsEmpty(Target.Row - 1) Then Range("B3").Sort Key1:=Range("B4"), Order1:=xlAscending, Header:=xlNo End If End If End If End Sub Mis respetos.
  8. Ordenar finas y asociar a otra columna

    Espero que este tambien te sirva. Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 2 Then If Target.Row >= 3 Then Range("B3").Sort Key1:=Range("B4"), Order1:=xlAscending, Header:=xlNo End If End If End Sub Saludos.
  9. Pregunta acerca de formularios excel macro

    Hola @Cinthia avaria Siéntase con la libertad de preguntar cuanto guste que para eso existe el foro de Ayuda Excel y mas cuando se trate de tema sobre VBA en Excel. Gracias @Haplox por tu acertada respuesta. Ese es el principio mas básico del foro; ayudar a quienes lo requieran. Saludos cordiales.
  10. Es un honor @Alchemy Feliz fin de semana.
  11. Hola Antes del : Application.ScreenUpdating = True Incluye esta linea: Range("A1").Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlYes Comenta como te fue´. Mis respetos.
  12. Consecutivo con Macro

    Hola Aquí dejo tambien mi pequeño aporte. Saludos. Ejemplo Ayuda Excel.xlsm
  13. Consecutivo con Macro

    Hola @magocu Puedes comprimir tu archivo y/o crear uno con solo el asunto que deseas tratar. Mis respetos estimado @Gerson Pineda
  14. Pasar de filas a columnas

    Hola @digitalboy y gracias por tu aporte. Aunque mi observación mas relevante es que no recomiendo emplear Excel como base de datos ya que por obvias razones se torna lento ante una gran cantidad de información. Aunque y con la única misión de ayudar a resolver estos temas, se puede emplear lenguaje SQL para minimizar el tiempo de respuesta. Si tengo tiempo, voy a ver que puedo hacer. Saludos.
  15. Pasar de filas a columnas

    Hola @German Adjunto solución a tu tema. Saludos cordiales. TransponerBaseDatos (Ayuda Excel).xlsm
×