Saltar al contenido

Macros y programación VBA

Temas sobre la automatización de Excel utilizando macros y VBA. Errores de VBA. ¿No consigues que tus macros hagan lo que necesitas?

  1. Started by prax3des,

    Buenas a tod@s, Os adjunto un calendario al que quiero hacer lo siguiente: como veis tengo una celda que es la E22 en color rojo que usaré para los dias festivos. Justamente debajo incluiré los dias festivos (1 de enero, 6 de enero, etc) estos dias al incluirlo en el listado querria que cambiaran el color segun el relleno de la Celda E22. Tambien busco la forma de que si cambio el año estos dias se actualicen Luego tengo la celda I18 que tiene el color amarillo y querria que al incluir los dias del calendario me cambiaran al color de relleno de dicha celda. Es posible? 2021.xlsm

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 922 visitas
  2. Started by ogrino,

    Buenas, alguien sabe como convertir un numero racional a notación decimal? Muchas gracias

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 367 visitas
  3. Started by gary rock,

    Buenas tardes Me podrias ayudar con una macro para captura, me estan solicitando una hoja de excel donde se pueda capturar la informacion, revisar y modificar una vez ya capturado, realice un archivo para captura pero como lo genere con la grabadora tarda mucho y solo sirve para capturar y no para modificar y revisar, adjunto archivo con la macro generado por grabadora. Actividades por sup.zip

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 575 visitas
  4. Started by woodixd,

    Buenas amigos Necesito su ayuda. para este "miselaneo". tengo Varios Archivos de Excel que quiero bloquear masivamente para que solo se pueda leer todos con una misma contraseña. Saben de alguna macro o me pueden apoyar con la creacion de dicha macro para poder hacer esto. lo que pasa es que son como 500 archivos, y bloquear uno por uno con la misma contraseña pues va a ser un trabajo muy tedioso. quedo a espera de su apoyo espero me puedan ayudar maestros. Saludos

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 577 visitas
  5. Started by CECILIO,

    Buenas Tardes a todosNecesito de su valioso ayudaEstoy desarrollando una rutina pero , me he atorado y no encuentro la forma de resolverlo , tengo el archivo llamado Nom 6 Ejemplo de la cual ocupo las siguientes hojas:-Hoja1-CATquisiera ejecutar este macro iniciando desde Hoja1 Celda BC3 para que se ejecute mientras la celda activa ("BC3") tenga datos y la columna al lado se encuentre vacío ("BB3"),busque el dato Hoja1 de la columna BC ,relice la búsqueda en la hoja CAT columna "D" y si lo encuentra me devuelva el código de la columna "B" de la hoja CAT en este caso se cumple las condiciones a partir de la fila BC14y si no lo encuentra se siga con la siguiente fila Bc15, …

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 747 visitas
  6. Hola buenas, ¿alguien sabe sumar dos números racionales y devolver el resultado simplificado? Muchas gracias

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 391 visitas
  7. Started by mcrbkn,

    Estimados amigos del foro, junto con saludarlo queria que me ayudaran con una planilla que quiero implementar, bueno quiero que por un combobox se genere una tabla con los siguientes filtros (segun archivo adjunto): E-CL A por escalon I me entregue el coordinado, S/E y el valor asociado. Lo mismo para E-CL B y los distintos escalones... por lo tanto filtrar por escalon I, II, III, etc. y que me entregue coordinado, S/E y el valor asociado tanto para E-CL A y E-CL B... Espero puedan ayudarme.... EDAC.zip

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 818 visitas
  8. Started by fedeb,

    Hola, realice una planilla de excel para control de stock y tengo dos botones, uno para sumar una unidad y otro para restar una unidad. Pensé en dos formatos para realizar mi planilla pero en ambos formatos necesito ayuda para realizar mi idea. Formato 1 : dos botones en cada producto, o sea dos macros por producto, pero no se como arrastrar las macros para no tener que crear yo manualmente una por una de las macros. Se me ocurrió usar las referencias relativas pero no me funciona. ej: suponiendo que la columna de unidad disponible es la E la siguiente es la formula para el producto en la fila 4 Sub inc() Range("e4").Value = Range("e4").Value + 1 End Sub esto func…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 860 visitas
  9. Hola disculpen, saben que tengo un archivo excel con una macro que antes de formatear mi computador funcionaba correctamente, en donde, utilizaba una columna de 43 archivos diferentes y creaba otro archivo nuevo con las 43 columnas juntas una al lado de la otra, pero ahora no se que sucede... si pueden ayudarme me avisan y coloco el archivo excel con la macro y los archivos 43 archivos que utiliza.... Bueno de antemano Muchas Gracias!

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 517 visitas
  10. Buenos días. Mi intención es asociar un formulario de barra de progreso ( lcf_ProgressBar ) que corra de acuerdo a la ejecución en segundo plano de una actualización ODBC que tengo en mi libro con una base de datos, a la vez y antes de que se ejecute la barra de progreso me gustaría poder corroborar si el equipo cuenta o no con conexión a Internet antes de realizar la actualización para que en el caso de que no tenga conexión No ejecute la consulta y advierta al usuario. lcf_ProgressBar.xls

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 913 visitas
  11. Hola buenas noches hoy me salio un tremendo reto en la empresa donde la labora, la verdad llevo todo el dia tratando de realizar un informe de todas las combinaciones posibles que se puedan realizar con una serie de tablas y valores, con el fin de conocer la matriz de probabilidades de planes que ofrece la empresa donde laboro. en la hoja de tablas estan todas las tablas que tengo que combinar con el fin de realizar la matriz de probabilidades consiste en los siguiente: se organiza en la hoja de registros. hay que tener encenta los siguientes criterios - el mínimo de Adultos y el máximo de Niños es igual al total de los huespedes …

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.2k visitas
  12. Started by fredy122,

    hola expertos algun codigo que de acuerdo al numero que este en la columna z lo busque en el rango a1:w42 y si lo encuentra colocarle borde grueso a esa celda Libroprueba.xlsm

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 750 visitas
  13. Buenos dias Tengo una rutina que me guarda los datos de un formulario a dos hojas excel dentro del mismo libro y necesitaría que en esa misma rutina me creara un archivo pdf con el nombre del label "lb_parte" Private Sub Imprimirparte2() Dim final As Long Dim fila As Integer With ThisWorkbook .Sheets("PARTE DE TRABAJO").Range("r2").ClearContents .Sheets("PARTE DE TRABAJO").Range("d2").ClearContents .Sheets("PARTE DE TRABAJO").Range("g2").ClearContents .Sheets("PARTE DE TRABAJO").Range("l2").ClearContents .Sheets("PARTE DE TRABAJO").Range("c3:o4").ClearContents .Sheets("PARTE DE TRABAJO").Range("b8").…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 733 visitas
  14. Started by jhon fredy,

    expertos buenos dias como puedo unir las celdas como se muestran en el libro pista.xlsx

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 765 visitas
  15. Started by helenaberdasco,

    Buenos días, Tengo una hoja excel con varios combobox y de un dia para otro han empezado a cambiar de tamaño al hacer consultas... pongo una imagen por si sirve. La parte que pone nombre va reduciendo el tamaño al ir introduciendo datos y el que poner elegir aumentandolo...

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 945 visitas
  16. Started by juan Ignacio,

    HOLA A TODOS... ME PUEDEN AYUDAR A MEJORAR LA SIGUIENTE MACROS...... YA QUE SI BIEN ENTREGA EL RESULTADO... ES MUY LENTA.... LA IDEA ES DETECTAR LOS REGISTROS QUE SE REPITEN ENTRE LAS COLUMNAS A Y B : Sub conciliacion() Dim conta As Integer Dim veces As Integer Dim fila As Integer Dim col As Integer Dim valor1 As Variant veces = 1 While veces < 3 If veces = 1 Then col = 4 Range("A2").Select Else col = 7 Range("B2").Select End If fila = 2 conta = 1 valor1 = ActiveCell.Value While ActiveCell.Value <> 0 If ActiveCell.Offset(1, 0).Value <> valor1 Then Cells(fila, col).Value = valor1 Cells(fila, col + 1).Value = conta …

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 944 visitas
  17. Started by guatszap,

    Buenas tardes, quisiera que me ayudaran con una problema, tengo dos columnas con fechas, una donde se encuentra la fecha inicial y otra con la final, debo enviar un correo alertando a X persona cuando el tiempo es cercano al final, esto para cualquier fecha que se encuentre en un rango determinado.

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 722 visitas
  18. Started by Crist77,

    Estimados buenas tardes, cuento con una pistola de códigos de barra, quiero hacerme de un archivo de inventario pero me e percatado que cuando capturo el código este salta a la siguiente fila, y necesito que busque y cuente sin agregar datos nuevos, envió la planilla, agradeceré su ayuda. Quedo atento a sus comentarios. Saludos. Plantilla para inventario con código de barras.xls

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 507 visitas
  19. Hola estimados; Soy nuevo en el foro, ojala me puedan ayudar con lo siguiente: Necesito que varios usuario puedan ingresar en un archivo excel compartido en red, este archivo excel tiene formularios. Quiero que los usuario puedan ingresar/Modificar/Eliminar datos. Lo ultimo que les menciono ya lo he logrado. Solo me falta que sea usado por varios usuarios a la vez. gracias de antemano a todos.

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 2.7k visitas
  20. Started by viejo,

    hola que tal no se como poder poner un listbox con barra de dezplamiento horizontal ¿alguna sugerencia? este es mi codigo que no funciona Private Sub Lst_nombres_Click() Call DisplayHScroll End Sub Private Sub DisplayHScroll() ' Make no partial items are displayed vertically. Me.Lst_nombres.IntegralHeight = True Dim x As Integer ' Add items that are wide to the ListBox. For x = 0 To 10 Me.Lst_nombres.Items.Add ("Item " + x.ToString() + " is a very large value that requires scroll bars") Next x ' Display a horizontal scroll bar. Me.Lst_nombres.HorizontalScrollbar = True ' Create a Graphics object to use when determining the…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 925 visitas
  21. Started by Fegedi,

    Buenas tardes, Como se encuentra?Un favor enorme. Necesito automatizar el envío de un mail en excel 2010 de la siguiente forma. Tengo el archivo adjunto y necesito enviar la información de las matriz (A1:I30) de la hoja 1 . En el asunto debe decir "carga- "un nombre ubicado en la columna J de la hoja 1"y la fecha de envío del mail. En el cuerpo del mail debe decir lo siguiente:_"Estimados, Las siguientes cargas se encuentran retenidas por el motivo descrito más abajo:Aca va lo copiado de la hoja 1 (A1:I30).Las cargas retenidas permanecerán en este estado.Por favor enviar una respuesta.. Muchas gracias!.Atentamente," los destinatarios son mails que figura en la co…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 996 visitas
  22. Estimados Amigos, Saludos cordiales, acudo a su apoyo para pedirles sugerencias para como podría realizar a través de un código, para que en una celda se despliegue una lista desplegable con los valores de otra hoja, y al momento de escribir las primeras letras se vallan filtrando los valores que empiezan con las letras escritas hasta que solo quede el texto deseado y se rellene las letras faltantes automáticamente. Para dejarme entender mejor, dejo un ejemplo especificando lo que deseo hacer. Gracias, Fernando EJEMPLANILLA.zip

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 782 visitas
  23. Estoy realizando una macro pero tengo poca experiencia lo que sucede es lo siguiente: Tengo una columna (Columna A) con 15.000 datos y lo que yo quiero hacer es copiar de 120 datos provenientes de la columna A a las columnas B, C, D... Entonces esos 15000 datos estarían fraccionados en 120 datos pegados en las columnas B, C,... Hasta completar los 15000 o más. En el excel está mejor explicado lo que quiero hacer. Saludos pregunta.xls

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 693 visitas
  24. Started by AdolfoGus,

    Se me presenta un problema que supongo no es dificil de resolver, pero por mas que intento no logro solucionarlo, al ingresar al archivo ADMINISTRACION, solo se despliega un Formulario llamado sistema Contable, en el puedo acceder a diferentes tareas, en el caso de "Registración Contable" al clikear se abre el archivo correspondiente, necesario para atender todo lo que hace a la Registarción Contable y cuando cierro el formulario se cierra el archivo; Todo bien, el problema es cuando solicito "Plan de Cuentas", en este caso se habre y cierra pero la diferencia es que no solo se cierra el Archivo, tambien se cierra el formulario. Existen diferencias entre el llamado a…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 896 visitas
  25. Started by jotaeme,

    Estimados Espero estén bien de salud ante esta pandemia que nos azota En materia, me marca error de desbordamiento en VBA en la sentencia: dias = DateDiff(parametro, f1, f2) Donde dias es numerico, parametro es string con valor "d", f1 y f2 son tipo date y se obtienen de: f1 = Range("X" & fila).Value f2 = Range("N" & fila).Value donde esas celdas son de tipo fecha en excel Gracias de antemano por la ayuda

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.3k visitas

Información básica de protección de datos

  • Responsable: Sergio Andrés Celemín
  • Finalidad: Moderar y responder comentarios de usuarios. Recuerda que la información que facilites es pública, y los datos que incluyas los leerá cualquier visitante de esta web, así como el avatar que poseas.
  • Legitimación: Consentimiento del interesado.
  • Destinatarios : Hetzner Online GmbH.
  • Duración: Mientras se conserve este post o hilo en la comunidad, o decidas eliminar el comentario.
  • Derechos: Puedes ejercitar en cualquier momento tus derechos de acceso, rectificación, supresión, oposición y demás derechos legalmente establecidos a través del email [email protected]

Información adicional: Encontrarás más información en la política de privacidad.