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. Buenas tardes recurro nuevamente a su apoyo, tengo una lista de asistentes por fecha (Hoja ASISTENCIA) lo que la macro hace, es Eliminar varios registros a la vez, hasta allí todo bien El problema esta en que los asistentes se repiten sus datos (nombre, código, etc), lo que cambia es la fecha de asistencia, entonces al Eliminar, me elimina los registros que encuentra primero Lo que deseo es que me elimine los registros seleccionados pero diferenciando la fecha de asistencia. asi mismo que con el boton modificar me permita hacer modificaciones a varios registros a la vez en el campo Fecha Asistencia Muchas Gracias por sus respuestas. …

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.3k visitas
  2. Started by vulkatho,

    Estimados solicito de su ayuda para optimizar esta macro que he implementado pero se me esta quedando mucho y no tengo muchas bases en visual. Sobre todo mucha ayuda para el cargue de ventas ya que no he logrado como hacer para que me cree un archivo solo de los criterios que estén reportados ya que no todos los meses me reportan ventas en la misma agrupadora.ventas-Colsubsidio_V 1.2.xlsm ventas.zip

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.2k visitas
  3. Started by ANIBAL3,

    Saludos maestros de Excel. Como podría hacer para buscar una información con varios campos que esta en una hoja y reemplazarlo en otra hoja pero no todo el campo sino uno o dos de ellos dependiendo de la necesidad. para el internet.xlsm

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.2k visitas
  4. Started by 96andres96,

    Buenas. Quisiera hacer una macro para guardar un rango de celdas en un PDF cuando se cliquee en un botón. La macro en sí, se hacerla. El problema viene en que el rango de celdas seleccionado es grande (no mucho), pero lo suficiente como para que cuando se genere el PDF se guarde en varias hojas. Por tanto, lo que me gustaría que me ayudasen a conseguir es a que la información del rango de celdas se redimensione para que quepa en una única hoja del PDF. ¿Es posible? Gracias.

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 4.2k visitas
    • 3 seguidores
  5. Started by carluci,

    cordial saludo, estimados, quiero realizar una consulta del archivo programa de producción que adjunte: trabajo en una empresa de vidrio y tengo que cumplir con 3 variables muy importantes para llevar el proceso, pero el mas importantes es el siguiente. 1. realizar 500 mt2 de vidrios laminados diarios, tengo que enviar a cortar diariamente cumpliendo con esta variable. en la celda v6 están los metros de cada orden. lo que quiero es que el sistema me realice una simulación de corte para tener un mejor seguimiento a la producción. también quisiera que me valla colocando en una celda que ya la orden se mando a cortar ojala puedan enseñarme o guiarme para sacar est…

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 971 visitas
  6. Started by muyayito,

    Buenas a todos foro. Estoy dandole vueltas a ver que fallo me da la macro para generar un codigo QR y no soy capaz de detectarlo. Y otra cosa, como se modificaría la macro de borrar el codigo? Porque boton que haya para ejecutar macro, se lo ventila. Gracias a todos por vuestro tiempo. Generar código QR.xlsm

    • 2

      Reacciones de usuarios

    • 6 respuestas
    • 813 visitas
    • 2 seguidores
  7. Started by Marco Corrales,

    Buenas tardes gusto saludarles. ¿Alguién conoce alguna opción o Macro, que le de una ubicación determinada a un ComboBox? El asunto es que tengo problemas con una macro que oculta un rango que va de fila 10:40, pero que en las filas 41 y 42 tiene un ComboBox en cada una (mas otros que han quedado ocultos en las primeras filas), y cuando la macro corre me indica que "no puede desplazar objetos fuera de la hoja", aun y cuando esos objetos tienen como propiedades "Mover y cambiar tamaños con celdas". Lo que pasa es que ya no quedan filas en la parte superior para alojar esos comboBox, por eso es que se me ocurre que tal vez exista una forma de ubicar dichos objetos en un …

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.9k visitas
  8. Hola amigos de ayuda excel, buenos días Necesito una colaboración de ustedes. Anexo envío archivo el cual contiene un cuadro que se va llenando la información fila por fila, desde columna A hasta la F pero deseo que cuando el usuario llene la información de la fila correspondiente a la columna E le salga un mensaje de advertencia o recordatorio que "Debe ejecutar la Macro A". Es decir, el mensaje debe aparecer en cada fila una vez completado el dato de la columna E. Gracias! MSGBOX CUANDO CELDA CONTENGA INFORMACION.xlsm

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.4k visitas
    • 1 seguidor
  9. Buena tardes. Tengo una duda, se podrá separar los datos de una hoja en varias hojas siguiendo un criterio. Por ejemplo, tengo una base de datos de miles de trabajadores (filas), con muchísimos datos (columnas) y que son de diferentes empresas, lo que quiero saber es si se puede separar todos esos trabajadores dependiendo de la empresa a la que pertenecen de manera automatizada sin tener que estar filtrando y copiando los datos que necesito. Aquí subo un ejemplo de lo que necesito, gracias de antemano por su respuesta. Modelo 1.xlsx

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.9k visitas
    • 1 seguidor
  10. Hola, He diseñado una función que detecta el doble click, funciona perfectamente solo que el tiempo máximo entre clicks está siempre fijo, lo he puesto a 500 milisegundos. Me gustaría que este valor lo tomara del valor que le hayamos puesto en el panel de control, apartado Mouse. He encontrado una API donde se supone que extrae ese valor, la declaración es "Public Shared ReadOnly Property DoubleClickTime As Integer" pero no es compatible con VBA6, la api es: SystemInformation.DoubleClickTime Property (System.Windows.Forms) Llevo un buen rato buscando algo compatible con VBA sin suerte, a ver si algún maquina de los de aquí sabría como conseguir adaptarlo a VBA o se le …

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 888 visitas
  11. Started by PATILARGO,

    Muy buenas a tod@s y muchas gracias de antemano, tengo un calendario en el que quisiera que se rellenaran las celdas desde una fehca hasta otra, una vez se lo indique las mismas., para no tener que hacerlo manualmente,muchas gracias por su ayuda. RELLENAR FECHAS.xlsx

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 2.9k visitas
  12. Started by Avimelec,

    Hola chicos! hace poco publique un post sobre mi problema para leer los datos de una bascula TORREY, bueno, eso ya solucionado, en parte. Resulta que cuando leo los datos tengo que declarar mi variable "Peso" como String, si la declaro como double o byte me marca error, y necesito tomar solo el numero (ej. 0.406 kg solo necesito leer 0.406) para poder sacar el porcentaje en base a otros kilos ingresado anteriormente en una pagina llamada Estimaciones. Espero me puedan orientar o ayudar con esto Adjunto el archio =) Muchas Gracias! =) DatosBasculaxlsx.rar

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 2.2k visitas
  13. Started by gacg1310,

    Buenas Tardes: Otra vez necesito de su ayuda, quien tiene un codigo para que me busque lo que escriba dentro del textbox y que si no lo encuentra limpie y reinicie la busqueda, gracias

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 2k visitas
  14. Estimad@s, buenos días. Debo seleccionar un rango de celdas que contienen formulas desde la celda B2 hasta la I800 (B2:I800). Este rango varía de acuerdo a la información necesaria. Es decir que trae datos desde B2 hasta I3 y/o hasta I800. El tema es que las fórmulas siempre van hasta la I800 y no hasta el dato que quiero que seleccione. En este caso, el dato es un texto que es resultado de una fórmula. Cuando la fórmula no cumple cierta condición se muestra en blanco (" "). Pero para la Macro es una celda con datos. Entonces, cómo seleccionar hasta la última celda que contenga "x" dato que es el resultado de una fórmula. Debo seleccionar B2 hasta la última celda que…

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 556 visitas
    • 1 seguidor
  15. Buenas tardes, a ver si me podéis echar una mano porque estoy acabando con mi paciencia. Estoy haciendo una macro sirviéndome de las librerías de ADO, y tengo un problema en una sentencia SQL que no sé cómo resolver. No sé si el problema viene dado por el tipo del campo en la hoja excel o en la propia sentencia SQL. Me gustaría coger los campos que tienen un valor superior a 1000 y la siguiente instrucción, me falla: SQL = "select count([APPThroughputUp]) from [LLAMADAS$] where [APPThroughputUp] not in ('-') AND [APPThroughputUp]> CInt(1000) '" La instrucción se ejecuta pero no filtra bien, cuenta todos los campos y no sólo los que son mayores que 1000. ¿Alguna …

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 976 visitas
  16. Buenas tardes, Necesito ayuda en varios aspectos, me he bloqueado y a pesar de haber intentado varios métodos no consigo llegar a lo que necesito. Adjunto archivo con una pequeña prueba. 1. Necesito insertar un número determinado de filas desde A1 hacia abajo, a partir de la cantidad que ponga en B2, será entre 1 y 6 máximo, pero es por no estar insertando manualmente. Lo he intentado con la siguiente macro, pero siempre tengo que tener la celda bien marcada y con al menos 2 filas ya fijadas para que se quede el mismo formato, no sé si existe otra forma de hacerlo: Sub InsertarFilas() Dim numFilas As Long Preguntar al usuario por el núme…

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 628 visitas
    • 1 seguidor
  17. Que tal amigos de ayuda excel ,bueno lo que quisiera comentar y pedir ayuda es saber si se puede hacer lo siguiente: Tengo una plantilla con un encabezado, donde tengo un boton autocorrelativo lo que hace es aumentar de uno en uno su valor, lo que nescesito es lo siguiente que las demas celdas del encabezado esten bloqueadas y se desbloqueen presionando este boton autocorrelativo y q a la vez se guarde automaticamente ,pero de la forma como si se guardara con el diskete de la parte superior izquierda de excel (que lo que hace es guardarlo sin ningun cartel de de aviso de pormedio). Esto lo quiero hacer para obligar al usuario que lo primero que tiene que hacer es a…

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.4k visitas
  18. Started by Kane51,

    Buenas días Primero me gustaría agradecer a la gente de este foro por toda la ayuda que proporcionan a la gente como yo que no se manejan muy bien con Excel pero que tienen ganas de mejorar. Aquí está mi problema y no sé como corregirlo: Me sale este mensaje: Se ha producido el error '1004' en tiempo de ejecucción No se puede asignar la propiedad Name de la calseFont Y cuando depura sale lo siguiente: Range("J301:P301").Select Selection.Copy Sheets("Mis recetas").Select Range("H2:N2").Select Range("H2").Activate Do While Not IsEmpty(ActiveCell) ActiveCell.Offset(1, 0).Select Loop ActiveSheet.Paste Selection.PasteSpecia…

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 960 visitas
  19. Started by JESUSH,

    Buenas tardes, requiero de la colaboración de un experto para lo siguiente: Tengo unos movimientos contables en la hoja denominada movimientos. Quisiera generar un filtro en la hoja denominada auxiliares que contenga los siguientes criterios: Permita generar un listado a partir de un código de tercero y una cuenta para que me muestre los movimientos débitos y créditos en un rango de fecha dada. Igualmente que si existe movimiento de esa cuenta saque la deferencia entres débitos y créditos la muestre en la columna L de la hoja auxliliares. anexo archivo AUXILIARES.rar

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 914 visitas
  20. SentenciaSQL.xls Hola , estoy intentando hacer consulta SQL con este archivo pero no consigo que funcione en OFFICE 365, sin embargo en la version office 2016 si funciona.

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.2k visitas
    • 1 seguidor
  21. Started by Pakus,

    Buenas tardes a todos Esta macro que os pongo a continuación envía un mensaje de texto y foto a una lista de teléfonos que le pongas en el Excel. Funciona perfectamente, el único inconveniente es que todos los teléfonos tienen que estar en la agenda, si algún teléfono no esta en la agenda se cuelga y deja de enviar. ¿Hay alguna manera de hacer que si un numero no está en la agenda no haga nada y pase al siguiente numero? Gracias por prestarme atención La macro: Sub EnvíoMensajesW2() Dim Teléfono As String Dim Imagen As String Dim Texto As String For Each Celda In Envío.Range("Clientes[TELÉFONO]") With Envío Te…

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 2.2k visitas
    • 1 seguidor
  22. Started by pinoji,

    Buenos días colegas. Espero se encuentren bien de salud. En el Sistema de Facturación que he estado trabajando y que el profesor JSD me ha estado ayudando necesito hacer algo que realmente no encuentro cómo hacerlo. Yo Guardo las Facturas en PDF en un a carpeta (D:\Facturación\Facturas), pero cuando necesito hacerle una modificación (FrmModificarFactura) a una Factura "X", necesito que me sobre escriba el archivo ya existente pero con los cambios que se le haya hecho a dicha factura. Intenté hacerlo con el condicional IF, pero parece que algo no estoy haciendo correctamente y necesito resolver este problema. Ejemplo: Yo confeccioné la Factura Nº 16 Fincimex…

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 914 visitas
    • 2 seguidores
  23. Buenos días con todo, espero se encuentren bien de salud!. Favor quisiera ver si me pueden ayudar con lo siguiente. Tengo una data en excel con los siguiente criterios FECHAS DIFERENTES , CODIGO Y NOMBRE DEL PRODUCTO. Lo que quiero realizar es que si en la fecha 17-02 tienes cantidad x de códigos y si estos no se repite el día siguiente 18-02 que automáticamente se borre, esto con la finalidad de tener un control de a partir del 18 al 19 se repite 1 vez y no me considere 2 desde fecha 17-02 teniendo en cuenta que el producto en el 18-02 no aparece. Lo sombreado son los que se repiten . TABLA ELIMINAR.xlsx

    • 1

      Reacciones de usuarios

    • 6 respuestas
    • 466 visitas
    • 2 seguidores
  24. Buenos dias comuninidad Ayuda Excel, estoy realizando un poryecto, en el cual estoy detenido en lo siguiente: necesito pasar de un listbox1 del userform1, a otro listbox1 del userform2, para empezar; ya que necesito realidad pasar el valor del userform1 de 4 listbox, o sea del userform1 listbox1 listbox2 listbox3 istbox4 al del user userform2 listbox1, y el valor de este userform2 listbox a una celda "x" Espero me puedan apoyar con el codigo, para poder adaptarlo al proyecto ya que estoy hecho pelotas. Saludos buen dia.

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 2k visitas
  25. Started by JRGO,

    Hola buenos días compañeros del foro, me gustaría saber si alguien me puede ayudar a mejorar esta macro con dos cosas, la primera es que a pesar de tener fecha de vencimiento cuando uno se mete al panel de "fecha y hora" y al modificar la fecha se puede seguir usando y no es la idea, dos si aparte de la clave de administrador se puede colocar otra y se siga usando todo con normalidad, es decir todo lo que he venido trabajando antes de la fecha de vencimiento pero que no me deje seguir guardando hasta cambiar la fecha con la clave del administrador, y si la persona no tiene ninguna de las dos claves se cierre el archivo como ya lo hace, Gracias de antemano, …

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1k visitas
    • 1 seguidor

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.