Andy Machin

¿No estoy seguro de a que te refieres con "generar HOJAS de picking" hablas de hojas de excel? ¿Osea crear una nueva hoja por cada numero de entrega nuevo? A parte de que me respondas eso, me va a servir que me compartas el libro, súbelo a algún...

Hace días decidí dejar el foro como experto y no continuar respondiendo, pero te ayudare esta vez. No entiendo algunas cosas de la pregunta así que aclárame lo que te pregunto allí.

No se que es eso de exportar un ListBox pero para pedir una contraseña antes de cualquier acción (incluyendo "exportar un listbox") puedes usar un InputBox así: Al comienzo de cualquier macro: Dim ValidarPass As String ValidarPass =...

Depende como es que quieres ejecutar dicha macro, puedes empezar probando esto: Suponiendo que ejecutaras la macro una vez cuando tu decidas en la fila que decidas, parandote en una de las filas a la que le quieres aplicar el efecto y presionando...

Vale, como no se como lo quieres ejecutar, te lo hice a modo de función, ya que siempre son 3 frutas, te hice 3 funciones. En este video puedes ver como funcionan: video demo Colocas la fórmula en las celdas que tu quieras, en este caso en B5, B15 y...

Esto es lo más parecido a lo que tu quieres hacer, igual sigue siendo engorroso (tienes que hacer bien la cuenta de las celdas), pero que al menos le sirva de conocimiento general a usted y a los demás. En Excel puedes seleccionar un rango de celdas...

No lo sé hacer, disculpa. Esperemos la respuesta de alguien más. La verdad es que no entiendo, pase este rato pensando y no doy con la solución.

¿ ¿Así no te sirve?: En el editor de VBA seleccionas las hojas en el explorador de proyecto, en las propiedades colocas la propiedad Visible en xlSheetVeryHidden

En mi opinión esto no es algo que debas hacer con una función, pero prueba si es esto lo que necesitas. Function FindKO(Rng As Range) Dim fRow As Integer: fRow = Rng.Row Dim maliason As String, liason As String Dim i As Integer maliason = Range("A" &...

No es tan sencillo como parece, dices que el patrón es único, pero no, no es único jajaja Este es el código: Sub Depurar() Application.ScreenUpdating = False Dim uF As Long: uF = Range("A" & Rows.Count).End(xlUp).Row Dim rRng As Range: Set rRng =...