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 oshimate,

    Buenas tardes solicito de nuevo su apoyo. En este caso tengo el siguiente problema si en la columna ("f") esta el valor "0", verificar si el numero de la columna ("d") de la misma fila tiene en otra fila un numero mayor o igual a "1", si es así sustituir el valor "0" de la columna ("f") por el valor "99" y no tengo ni idea de como hacerlo. DISCUL UUSTEDES, ADJUNTO OTRO ARCHIVO ESPERANDO SER UN POCO MAS CLARO. COMO LES COMENTABA NO SE COMO ESTIPULAR ESTA CONDICION, SE LOS PUSE UN POQUITO MAS GRAFICO. LES AGRADESCO MUCHO SU APOYO. SALUDOS CORIDIALES. EJMPLO 112.xls

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 1.8k visitas
  2. Started by darwingcamacho,

    Buenas, me encuentro con el siguiente inconveniente: Tengo un archivo con diferentes hojas, las cuales quiero imprimir en PDF es un orden diferente, por lo cual cree un codigo para ello, donde puedo definir el orden de impresion segun se requiera, y asi mismo, seleccionar el rango de impresion. El problema que cuentro que es quiero que se genere un solo archivo PDF, con el codigo que desarrolle imprime N cantidad de archivos en PDF. Sub Imprimir() Dim Hoja As String Dim Rango As String Dim i As Integer Application.Dialogs(xlDialogPrinterSetup).Show For i = 1 To 5 Hoja = Worksheets("Print").Range("A" & i) Rango = Worksheets("Print").Range("B" & i) Workshe…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.8k visitas
  3. Started by MarcoB,

    Hola buenas, tengo una consulta alguien sabe algún código para crear una variable dentro de un for cambiando los nombres seria algo asi como col = 0 y = 10 For cell = 10 To 16 If Cells(y, 29) = True Then col = col + 1 ####criterio + col = dalomismo ## la idea es que se cree una variable llamada criterio1, criterio2, criterio3, hasta que termine el for End If y = y + 1 Next cell siento fallar en algo así pero no pude hacerlo se agradece cualquier ayuda, de antemano gracias

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.8k visitas
  4. Started by carluci,

    Cordial saludo, Señores, necesito de su valiosa ayuda para sacar adelante el siguiente proyecto. Trabajo en una empresa de vidrio en donde llevo el programa de producción en Excel y quisiera que en este archivo pudiera realizar lo siguiente. 1. Hacer simulación de corte. Una de las variables que manejo en la línea es realizar como mínimo 450 mt2 diarios, este metraje sale del producto que se lamina en la línea. 2. Al correr la macro que me simule los lotes que tengo que mandar a cortar para cumplir con el metraje obligatorio. 3. Que me sume por color las ordenes de serigrafía ( vidrio pintado) 4. Que me sume por color las ordenes con trabajo 5. Que me sume p…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.8k visitas
  5. Started by karras,

    Hola amig@s! Estoy intentado crear una macro que inserte una imagen en Excel pero que antes la comprima. Le he dado muchas vueltas a este tema pero no hay manera, lo único que he conseguido es lanzar la ventana de compresión de imágenes y pasarle los valores para que la comprima, pero esto a veces funciona y otras veces no... Set octl = Application.CommandBars.FindControl(ID:=6382) Application.SendKeys "%w~~" No se si hago algo mal... o hay otra forma mejor. Un saludo, gracias de antemano

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.8k visitas
  6. Hola a todos, tengo una macro que elabora una tabla dinámica con algunos datos, el problema que me surgió es que por ejemplo necesitaría copiar un rango de datos que es variable es decir siempre mi tabla dinámica comienza la hoja1 del libro1 en la celda A4 en adelante, eh visto códigos que muestran la ultima fila con datos : Range("A65536").Select Selection.End(xlUp).Select Yo necesito copiar de la antepenúltima celda hacia A4, y pegarla en otro libro2, hoja2, especificándole a que celda ira la información. Trate de hacer algo asi: Range("A65536").Select if Selection.End(xlUp).Select = "Total general" then selection.end(xlup).select - 1 selection.pasteSpec…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.8k visitas
  7. Started by Manuel TR,

    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

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.8k visitas
    • 1 seguidor
  8. Hola, veréis tengo una idea para ejecutar una macro que no se como resolverla. Me explico, tengo un libro con siete hojas de las que necesito eliminar, en cuatro de esas hojas, las filas en la que al menos una de sus celdas no tenga contenido. Hasta el momento lo vengo realizando con la macro: Sub EliminarRegVacios() ActiveSheet.Columns(ActiveCell.Column).SpecialCells(xlBlanks).EntireRow.Delete End Sub Pero el problema que me encuentro con esta macro es que tengo que ir hoja por hoja ejecutando la macro y mi idea es poder realizarlo en todas las hojas automáticamente de una sola vez. Además se da la circunstancia que una de las hojas no cumple la condición de …

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.8k visitas
  9. Started by lmorente,

    Buenas gente, a ver si me podéis ayudar. Tengo un código con el cual creo una barra de progreso para ver el estado de la macro en ejecución. Hasta aquí todo perfecto. El caso es que la primera vez que ejecuto la macro una vez abierta la excel, todo funciona correctamente, es en las ejecuciones posteriores que la macro va excesivamente lenta. Este es el código que da problemas: Do While LineaActual < UltimaLinea ContadorEscalones = ContadorEscalones + 1 Me.Caption = "Calculando precio " & ContadorEscalones & " de " & NumeroEscalonesPrecios frm_Progreso.lbl_ProgressBar.Width = frm_Progreso.lbl_ProgressBar.Width + PixelesPo…

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 1.8k visitas
  10. Hola a todos, He buscado para ver si había algo como lo que busco y si lo hay no lo encuentro. Lo que necesito es lo siguiente si el valor de la celda A1 esta entre 1 y 2 que la celda A2 cambie a verde. Se puede hacer. Muchas gracias

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.8k visitas
  11. Started by mvzdover,

    buenas tardes amigos¡¡¡ tengo un libro que diseñe en el que no ocupo las herramientas de excel ni la ventana solo las pestañas. hay manera de aplicar una macro para eliminar esta ventana. de manera que aparente un programa y no una hoja de excel. de antemano agradezco su ayuda.

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 1.8k visitas
  12. Started by pilili,

    hola a todos soy nueva en este foro, soy estudiante y necesito utilizar macros. estoy ejecutando macro y me he encontado con dos problemas. primero necesito exportar de un excel a otro datos especifos.... el excel de origen es variable ( pero tengo el inicio y la columna de fin ( no fila) y el de destino es el que se va actualizando con este otro excel y necesito agregarlo al final de este......... segundo problema mediante un texbox consulto un grupo con el cual debo buscar todos aquellos proyectos de ese grupo debo entregar los numeros de flujo y quiero colocarlos en una listbox o combobox espero me puedan ayudar, muchas gracias de antemano ! saludos ! no me d…

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 1.8k visitas
  13. Hola compañeros, Llevo un tiempo con un problema en el siguiente código, y no sé cómo solucionarlo. Private Sub Worksheet_Activate() Cells().Columns().Ungroup ' 1 Columns(4).Group ' 2 Columns(5).Group ' 3 Me.Outline.ShowLevels ColumnLevels:=1 ' 4 End Sub Me gustaría insertar un condicional en la primera sentencia tal que "If Cells().Columns().Group = True Then Cells.Columns.Ungroup", para de este modo ejecutar el resto de las sentencias (la segunda, tercera y cuarta) sin problemas. Pero esa instrucción me da problemas... En otras palabras, un evento tal que al activar la hoja, se agrupen la…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 1.8k visitas
  14. Started by Mauricio Herrera90,

    Hola Buenas Tardes, tengo un indice como el siguiente ejemplo Num Empleado Socio Jefe Inmediato 1664942 Marco Antonio Jesus Cordova 1664943 Luis Alberto Andres Sanchez 1664944 Jesus Fernando Philips McDonlal 1664945 Rosa Gomez Guadalupe Sanchez 1664946 Francisco Javier Guadalupe Sanchez 1664947 Eduardo Cantu Guadalupe Sanchez Y me mandan una achivo de excel con los el nombres de los socios , pero con el nombre del jefe incorrecto , como le puedo hacer para que exel compruebe con el indice si el nombre del j…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.8k visitas
  15. Started by manzano,

    Muy buen día, Tengo una macro la cual busca datos de una columna y concatena todos los números, exceptuando el "6011". El problema es que los concatena desde abajo hacia arriba, necesito que sea al veres. Adjunto el archivo, dentro hay un cuadro explicando como funciona.Plani.xlsm Si existe una formula que simplemente tome ese concatenado y lo haga al revés, seria perfecto! Saludos.

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 1.8k visitas
  16. Started by jamesj,

    Buenos días. Me gustaría saber si alguien saber cómo hacer en excell un contador de forma que al poner el número del dorsal de varias motos, vaya cronometrando y contando el número de vueltas que va dando. Gracias.

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.8k visitas
  17. Started by contread,

    Estimados, soy nuevo en el foro y estoy empezando a experimentar la utilizacion de macros y vba, la verdad me a servirdo mucho y me parece muy interesante. Ahora mismo estoy con un problema en la configuracion de una macro. La cuestion es que esta macro me importa de una carpeta ( que contiene varios archivos ".txt", los cuales dia a dia van cambiando de nombre) pero solamento me los importa si los tengo en mi maquina, lo que necesito es que me importe estos datos desde un servidor en comun que usamos en el trabajo. Por lo que tngo entendido el codigo "chdir" no sirve para importar datos desde una red o servidor. Me podrian ayudar con este problemita. Aca les dejo la mac…

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.8k visitas
  18. 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.8k visitas
    • 1 seguidor
  19. Hola buenas noches a todos/as. Desde hace mucho tiempo he buscado la manera de crear una macro que me solucione lo siguiente. En mi trabajo utilizo un aplicativo de internet explorer. Me muestra en una tabla hora a hora datos de ventas, asesores, etc, etc. Necesito que mediante una macro, se pueda copiar y pegar esta información a una hoja de un libro específico de excel. Cabe recordar que: - No puedo acceder a ninguna base de datos SQL o similar por permisos. - Necesito que solamente, me abra la pagina y me copie y pegue la información de ser posible. - Siempre la información de internet está bajo la misma estructura. Muchas gracias y espero que tenga solución

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.8k visitas
  20. Started by triton0020,

    Buenas, les comento : Necesitaria filtrar mediante textbox, tablas completas. *un textbox para buscar mediante legajo y uno para buscar mediante nombre, o sea la misma tabla pero con estas 2 opciones , y tenia en mente hacerlo estilo el Buscador GoogleII, que se encuentra en el foro, adjunto direccion . Les agregue nombre a cada tabla, usuario_01, usuario_02, usuario_03, y seguiria asi hasta con 80 tablas mas o menos. https://www.ayudaexcel.com/foro/macros-programacion-vba-10/solucionado-buscador-estilo-google-21519/. ADJUNTO ARCHIVO. Gracias de antemano Filtrar tabla completa.xls

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.8k visitas
  21. buenas tardes amigos , tengo un problema al realizar una macro que realice una tabla dinamica tengo los siguientes datos. Nombre Nombre_Concepto Año Mes Valor MONTES DEL CASTILLO JAIRO ASIGNACION BASICA-SUELDO 2002 1 1225174 MONTES DEL CASTILLO JAIRO AUXILIO DE TRANSPORTE 2002 1 34000 MONTES DEL CASTILLO JAIRO AUXILIO DE ALIMENTACION 2002 1 50848 MONTES DEL CASTILLO JAIRO PRIMA ANTIGUEDAD EMP.PUBL 2002 1 67385 MONTES DEL CASTILLO JAIRO PRIMA TECNICA 2002 1 263412 MONTES DEL CASTILLO JAIRO AJUSTE FONDO SOLIDARIDAD 2002 1 16809 cuando grabo la macro para que me cree la tabla dinamica me genera el siguiente error agradezco cualquier ayuda para solucionar e…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 1.8k visitas
  22. Started by muyayito,

    Buenas exceler's. Me preguntaba si hay alguna forma de ocultar el reborde de la celda activa (no se como se llama) en un libro en concreto, mediante vba, en opciones, etc. Gracias por adelantado

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 1.8k visitas
    • 2 seguidores
  23. Started by meduvilla,

    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

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.8k visitas
  24. Tengo un formulario form aplicativo excel , que se habre ejecuta el formregistration y pide algunos datos para registrar un usuario lo tipico , luego se da click en camera y se habre otro userform que muestra la webcam en vivo para luego darle en capture y tomar la foto al usuario que se carga en el userformregistration como vista previa , y luego regresar y darle click en salve al formulario userformregistration, donde la imagen del usuario se guarda en una carpeta donde se tiene este excel form, guardado y los datos se guardan en las celdas del libro sheets1 junto con un dato de la foto en letras, en la celda GAMBAR,, necesito que este aplicativo me deje tomar 2 …

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.8k visitas
  25. Hola: He perdido el hilo de esta consulta. Se trata de indicar por medio de autoformas las características de un producto en un catálogo de precios. Si alguien lo recuerda, le rogaría me lo indicase. Gracias. Saludos EJEMPLO.rar

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 1.8k 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 sergio@ayudaexcel.com

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