Hola estimados Maestros del Excel (Vbasic) sorry pero cuando puedan... alguien me podria ayudar , solo quiero lograr que el formulario 2 imprima desde listbox Minuta 2018 mvo.xlsm

Hola a todos si alguien me puede ayudar con el siguiente caso: Tengo una hoja llamada "enero" que contiene como 8,000 registros la cual tengo que imprimir, pero como ejemplo adjunto solo una parte, bueno el caso es que antes de inprimir necesito que al inicio de cada hoja aparesca la misma cabecera, tal como se muestra en la hoja "ener_imp", y que tambien si es posible que aparesca las palabras van y vienen al final e inicio de cada hoja tal como se muestra en las letras de color rojo con su respectiva sumatoria asi como se encuentra. cabe mencionar que en cada hoja entraran 104 filas incluido la cabecera y las letras de color rojo. Gracias.. prueba…

hola buenos dias a todos estoy tratando de ejecutar la siguiente idea es que tengo cierta cantidad de cifras en varias tablas y me gustaria pasar esa informacion en una tablaque me muestre lo siguienteazul=numero que se quedo en el camino y no volvio a apareceramarillo= pista principal o numero unicorojo= numero que en su misma posicion cambio de lugar verde= numero que aparecio y desaparecio y volvio a aparecerel trabajo es para identificar ciertos patrones de una loteria de acuerdo a como van cayendo los sorteos como siempre agradecido por su ayuda ordendepatrones.xlsm

Hola a todos si alguien me puede ayudar con el siguiente caso: Tengo una variedad de registros desde la fila A7 hacia abajo (en la hoja "datos") y necesito que se separan por grupos de acuerdo a los codigos de la columna "A", Para tal separación se debe insertar una fila de bajo, tal como se muestra en la hoja llamada "debe quedar asi". Gracias. prueba_s.xlsx

Buenos días y felices fiestas a todos los miembros del foro. Tengo un calendario anual, que es una matriz de la celda B2 a la AF45 y en la columna AH están los festivos del año. Me gustaría poder hacer una macro para que busque en la matriz la celda inferior a la fecha del festivo para ver si esta en blanco, en situación de baja (IT), etc. Si estuviera en IT en la celda de la columna AH correspondiente al festivo que aparezca un mensaje "En IT" y si se ha dado el festivo a lo largo del año que aparezca el mensaje de "Disfrutado" Subo un Archivo. Un saludo y gracias por vuestra ayuda. FICHAJES 2019.zip

Buenos días a tod@s; Esta línea la he usado anteriormente y creo que funcionaba pero hoy al ponerla en una nueva macro me da el siguiente error “Error 52 en tiempo de ejecución, nombre o número de archivo incorrecto “. Por qué puede ser??. Que debo de usar si la ruta de un servidor a caído??. Gracias y un saludo, Ejemplo 1.xlsm

Hola a todos, por favor si alguien me puede ayudar con el siguiente caso: Tengo una hoja llamada "sin formato" la cual necesito dar formato en la hoja llamada "con formato". lo que necesito es que a partir de cada fila vacia de la hoja "sin formato" se inserte una debajo de otra el siguiente texto : SALDO ANTERIOR : MOVIMIENTOS MES : SALDO ACTUAL : SALDO TOTAL : debiendo quedar tal como se muestra en la hoja llamada "con formato" y si se pudiera hacer el respectivo calculo tal como se muestra en las columnas "F" y "G" que se encuentran sombreadas de color celeste. Muchas gracias Consulta_Libro.xlsm

Hola, tengo una macro que me abre un archivo xlam para poder cargarlo en Excel. Ccomo puedo abrir ese complemento desde la misma macro para que puedan utilizarlo, y al finalizar la funcionalidad del complemento como puedo seguir con otros procesos. Sub PortalPago() 'Funciones de Macro No Visibles Application.ScreenUpdating = False Dim Finfo As String Dim FilterIndex As Long Dim Title As String Dim FileName As Variant 'Configura filtro de Archivos Finfo = "Complemento Excel (*.xlam),*.xlam" FilterIndex = 1 'Establecer el título del cuadro de diálogo Title = "Seleccione un archivo Complemente Excel" '…

Hola chavales! Os comento mi GRAN problema y que me trae loco. Estoy trabajando con un libro de excel que tiene 'Código de Barras' y claramente hay código de barras que empiezan por 0. La cosa es que tengo un historial de bastantes código de barras y necesito contar cada EAN cuanta veces está repetido. Teniendo en cuenta que en la columna 'A' están todos los códigos de barras pues en la columna 'B' utilizo el famoso 'contar.si' Hasta aquí todo bien pero el problema es que los EAN que tiene 0 al principio no lo tiene en cuenta haciendo que me cuente dos codigo de barras totalmente distinto como si fuera el mismo. Adjunto foto para que me entendáis y también …

Estimados amigos foreros, solicito su ayuda una vez más. Tengo unos datos que necesitan ser analizados por una planilla "WLM S1". Para esto y con muy poco conocimiento cree una macro que copia dato de una hoja a otra. Me funciona en una primera instancia pero necesito que la pequeña macro se ejecute con un comando y en forma secuencial de forma que vaya analizando los datos de la columna A del a pestaña ZPP001 uno a uno y luego los pegue en la Hoja "datos" hacia abajo para tener el output de los datos analizados. Espero haberlo explicado bien... Adjunto el archivo Les deseo una Feliz Navidad y un gran 2019!! Muchas Gracias! Prueba WLM FS.x…

hola expertos de excel mi pregunta es como hacer un codigo de acuerdo a esta condicion , si el numero de la hoja 1 se encuantra en cualquier cuadro de la hoja cundi1 colocarlo debajo de este ejemplo el 2687 esta en la hoja 1 y aparece en un cuadro de la hoja cundi1 colocandolo debajo de donde se encontro dicho numero les agradezco su colaboracion ejemplo2.xlsm

Buenos días; Hoy estoy muy espeso y mi cabeza no rula na de na…….me puedes ayudar Estoy intentando señalar un rango de celdas en una fila ( de A5 a Axx ), para ello estoy usando “Range(Selection, Selection.End(xlToRight)).Select”, la cosa es.......a lo que señalado tengo que añadirle una celda más. He probado un par de cosas y no doy con ello, la cosa es, que ya lo hice en su momento en una macro hace años pero…..mi cabeza ya no es lo que era. Muchas gracias y un saludo, Ejemplo.xlsm

Estimados, Buenos días, agradecería su apoyo con una macro que me permita insertar filas y copiar la cabecera según una condición: - En la hoja3 "Datos" la primera columna es Ciudad, lo que debería hacer la macro es identificar si el valor (ciudad) de la celda A3 es diferentes al de la celda A2, si son diferentes inserta 2 filas en blanco y copia la cabecera en la 2da fila en blanco, si son iguales pues repetir la validación hasta la ultima fila con valor. - Les pongo un ejemplo del resultado en base a la hoja3 para que se puedan guiar, la idea es que la macro modifique directamente en la hoja3 "Datos" y no tenga que crear otra hoja. * Las demás hoja…

Hola estimados amigos De nuevo recurro a ustedes para ver si me pueden ayudar en este problema, les explico, tengo un albun de imagenes, al que le he puesto un escroll, este no he conseguido que funcione, me recorre la pagina, y me busca el registro, pero no consigo que me visualice la imagen, el libro lo subo sin imagenes por que si no no se abre Muchas gracias por su ayuda, un cordial saludo Prueba

Necesito de su ayuda quisiera cambiar este título: “PUBLICACIÓN. . .”, por otro. Esto sucede cuando estoy exportándolo o convirtiéndolo a PDF una hoja de Excel. Aquí les dejo la MACRO: Sub Imprimir() If MsgBox("¿Estás seguro que deseas imprimir el archivo.?", vbQuestion + vbOKCancel, "HOLA") = vbOK Then MsgBox "Procediendo con la impresión del archivo. . .", vbInformation, "HOLA" MsgBox "Seleccione la ubicación o Directorio a guardar su archivo .PDF. . . !", vbExclamation, "HOLA" 'nombre = WorksheetFunction.Text(Now(), "dd-mmm-yyyy-O-hh-mm-ss") nombre = "HOLA" ruta = Application.GetSaveAsFilename(nombre, "Pdf,*.pdf", , "Guardar como") If ruta &l…

Hola amigos tengo un userform donde tengo un botón para eliminar fila seleccionada de un ListBox, ahí la instrucción funciona bien pero mi intención es ponerle clave para que no cualquiera pueda tener ese privilegio, para ello tengo otro userform que se llama desde el mismo botón donde tengo que poner la contraseña y entonces da paso a ejecutar la macro, pero ahí esta el detalle la macro no se ejecuta. la pregunta que estará pasando. anexo archivo para su análisis Busqueda.rar

Chic@s les pido ayuda con un macro que me ayude a lo siguiente: Anexo Excel Tengo un control de números que refiere a las fechas: Quiero que al seleccionar cualquier numero el macro me lleve a la celda donde esta la fecha que refiere el numero. Pero que me de la libertad de poder navegar también manualmente. Les anexo mi archivo muchas gracias COMPARTIR.xlsm

Hola amigos, Tengo un reto. En el archivo adjunto tengo un archivo con varias pestañas. La pestaña LEAVE SOURCE tiene dos tablas, estas deberían esta en blanco al abrir el archivo, excepto los Headers o titulos de las tablas. Existe un botón que le solicita un password al empleado, solo asi el podra ver su información. Hice manualmente una simulación de como se vería el resultado si el Empleado 2 ingresara al sistema. El resultado esta en la hoja LEAVE TARGET. NOTA: no deseo que se abra otra hoja, sino que en la misma hoja LEAVE SOURCE se filtre y muestre la información solicitada por el empleado (segun su password) Alguna idea con el codigo? …

Hola a todos, mi nombre es Maurizio Y mi problema es este: En una hoja de Excel estoy tratando de crear un horario con fechas. 1) En Práctica en la Columna (G6: G35) ingrese una fecha de visita 2) Medidor que explota el VBA Me gustaría que en la columna (H6: H35) se verificara la cantidad de días que comen en la fecha límite. 3) Los medidores en la columna (I6: I35) deben darme la Confirmación o no de la caducidad. Ahora, en lo que respecta a la Columna (H), no me arriesgo a cambiar el simple clic para permitir evaluar cualquier inserción de fecha en la columna (G), pero tomada individualmente funciona muy bien ya que he adoptado esta función (Con Sheet1 …

Buenas noches... En un libro abierto de excel presiono F5, luego el botón Especial..., selecciono la opción Objetos y presiono Aceptar. Como resultado se obtiene una buena cantidad de formas u objetos que ponen lento el archivo, al punto de que No Responde por bastante tiempo haciendo imposible utilizarlo con normalidad. ¿Es posible suprimir con alguna MACRO esos objetos de tal manera que no relentice el archivo de excel?

Buenas tardes tengo un formulario donde se carga un plan de cuentas, los combobox se eligen y cargan en los textbox el index según el criterio (esto lo tenia pensado para que el rango que se elige en los combobox se visualicen en el listbox, como un filtrado por dos condiciones y que borre solo los que no están en el rango), por ejemplo si pongo en inicio 20 y en fin 15 en el listbox se visualicen 20,201,20111,201111,15, he intentado según el index pero al parecer no es como lo estaba planteando, por favor me pueden ayudar, les dejo el archivo de ejemplo... EjemploAyuda.xlsm

Hola a Tod@s, Espero me puedan ayudar,... al intentar insertar una imagen a un formulario en tiempo de creación por medio de VBA, me dice que el objeto no esta disponible. Sub CreaForm() Dim MiNewForm As Object Set MiNewForm = Application.VBE.ActiveVBProject.VBComponents.Add(3) With MiNewForm .Properties("Height") = 300 .Properties("Width") = 300 .Name = "Prueba" .Properties("Caption") = "Prueba_LBV" .Properties("BackColor") = RGB(0, 255, 0) .Properties("Picture") = ActiveWorkbook.Path & "\Imagen1.jpg" ' .... AQUI ME SALTA EL ERROR? .Properties("PictureSizeMode") = 1 End With End Sub …

Estimados, tengo una macro que copia en una hoja el contenido de todas las demas, el problema se presenta cuando lo corro en un archivo que tiene 1017 hojas. el codigo de la macro en mencion es el siguiente Sub uoooooooooooooooo() Sheets("union").Select ULTIMF = Range("A" & Cells.Rows.Count).End(xlUp).Row + 1 For hoja = 2 To Sheets.Count Sheets(hoja).Select ufh = Range("A" & Cells.Rows.Count).End(xlUp).Row Range("A1:BA" & ufh).Copy Sheets("union").Select ULTIMF = Range("A" & Cells.Rows.Count).End(xlUp).Row + 1 Range("A" & ULTIMF).PasteSpecial Paste = xlPasteAll Next hoja MsgBox ("fin proceso") End Sub 00LB…

Hola a Tod@s. Necesito ver si me pueden ayudar con una Macros, la idea es que me borre una cantidad de columnas Ocupadas determinadas, tengo varios Archivos y en todos son Rangos diferentes los que debo eliminar cada día, en el ejemplo hay dos Hojas con Rangos diferentes. En el archivo que subo explico más específicamente cual es la intención. Desde ya Agradecido por su colaboración. Un Saludo Lázaro. Borrar Últimas Columnas.rar

Muy buenos días, Mi problema radica creo que en algo en la configuración de mi equipo, resulta que: Tengo un archivo CSV delimitado por comas, al ejecutar separar el texto en columnas desde las herramientas del excel, una de las columnas que trae un formato dd/mm/yyyy se separa correctamente, el problema radica cuando trato de hacer esa separación ejecutándola desde el VBA: la posición del día y del mes se invierten automáticamente, quedándose con el formato que nombré arriba, por ejemplo: La columna de fecha es: ",07/12/2018,"(con formato dd,mm,yyyy), cuando ejecuto Selection.TextToColumns, la fecha queda: "12/07/2018" (con formato dd,mm,yyyy). He le…