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

    Tengo la siguiente fórmula con la intención que detecte los cambios en las celdas y registre la fecha en la columna B El problema es que me inserta la fecha en cuanto pincho la celda, y solo quiero que la inserte cuando haga algún cambio. No sé que hago mal. uf = Range("C" & Rows.Count).End(xlUp).Row If Not Application.Intersect(Target, Range(Cells(8, 3), Cells(uf, 59))) Is Nothing Then Range("B" & Target.Row) = Date Range("BH" & Target.Row) = Target.Address Gracias.

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 600 visitas
    • 1 seguidor
  2. tengo esta macro y lo único que necesito es que una celda se desbloquee SÓLO cuando en esa misma celda apareza lo siguiente "Ingrese la Agencia" este texto aparece debido a que en dicha celda hay una fórmula que consiste en un buscar y si consigue error coloca "Ingrese la Agencia" entonces hasta ahora llevo lo siguiente, el problema ela macro que realicé, excel no la reconoce automáticamente es decir cuando cambio en la celda b12 aparece "ingrese la agencia" no se desbloquea la celda b12 esto es lo que tengo por favor espero su ayuda urgente muchas gracias! la primera macro la tengo ubicada en el objeto hoja presupuesto no se si debe estar allí o en el módulo tampoco se…

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 600 visitas
  3. Started by Tiburcio,

    Buen Día Tengo 5 archivos de excel con infromación diferente pero tienen en común la información de diferentes escuelas ej. Escuela 001, Escuela 002 etc. Podría hacer una macro en la cual de los 5 archivos de excel, en una hoja nueva de excel si yo pongo escuela 001 me salga toda la información de la escuela que esta contenida en los 5 archivos de excel ?? Gracias

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 600 visitas
  4. Amigos del Foro Buenas tardes por aquí dando vueltas de nuevo, espero puedan ayudarme. si no es molestia. y me regalen un poco de su valioso tiempo Al dar clic en la celda que tenga la palabra "actualiza Equipo". Me almacene algunos datos en la hoja histórico según el modelo de la hoja. Y y luego me guarde la lectura del kilometraje de ese neumático en la celda correspondiente en este caso serian la celda de la columna "AA". y finalmente me limpie los datos de la celdas. N,O,P,Q,R,S,T,U,V,W,AF,AG,AH,AI,AJ. Y así sucesivamente con todas las filas que tienen la palabra "actualiza equipo". por ejemplo doy clic en la celda AL6, me almacena los datos determinados en la h…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 600 visitas
  5. Started by Gonzalo Uribe,

    Estimados, No conozco mucho de programación y necesito una macro para modificar una tabla dinámica (informe que llega de una determinada forma) con los filtros y etiquetas de fila y columna que que yo estime conveniente. En resumen me gustaría dejar fija una macro en la cual se modifique la tabla dinámica según me interesa. Me podrían ayudar? Muchas gracias!

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 600 visitas
  6. Started by lionlangs,

    Hola a todos, mi nivel de excel es de usuario, así que no consigo organizar de forma manual un formato de liga y necesito ayuda. A ver si alguien puede ayudarme. La idea es la siguiente: - Somos 8 amigos y queremos jugar partidos de tenis de dobles. Queremos jugar de tal forma que todos vayamos con todos de compañero y juguemos contra todas las posibles combinaciones de parejas. Claro está sin que haya repeticiones. Alguien puede ayudarme? Muchas gracias y un saludo

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 600 visitas
  7. Started by Leonardo Briceño,

    Buenos días amigos de Ayuda Excel, La siguiente macro me da el error 91 en tiempo de ejecución, Variable de objeto o bloque With no establecido. Me resalta en amarillo la fila que está aquí en negrita y letra grande Sub EnviarDatosCostosProductosNacionalesAPreciosProductosYServiciosA() Application.ScreenUpdating = False Dim ult, ult1 As Long Dim rng As Range ult2 = Sheets("COSTOS PRODUCTOS NACIONALES").Range("A" & Rows.Count).End(xlUp).Row ult3 = Sheets("COSTOS PRODUCTOS NACIONALES").Range("B" & Rows.Count).End(xlUp).Row ult = Sheets("PRECIOS PRODUCTOS Y SERVICIOS").Range("A" & Rows.Count).End(xlUp).Row + 1 ult1 = Sheets("…

    • 1

      Reacciones de usuarios

    • 2 respuestas
    • 600 visitas
    • 1 seguidor
  8. Hola a todos, es mi primer tema en el foro. En el Libro1 tiene un formulario que simula una factura, el cual, en la columna “Código” del artículo posee varios Combos. El usuario al seleccionar el primer combo (ComboBxCod1), coloca una cantidad X en la columna Cantidad (TextBxCant1) que al momento de “Guardar”, me resta al saldo disponible de la columna “Cantidad” hoja “ARTICULOS” del Libro2, así que de esa manera arroja el resultado efectuado por el código de la macro que adjunté, hasta este punto funciona bien. El problema es: los otros combos y no sé cuál es la instrucción para estas variables que esté relacionado con varios textboxs para poder restar la cantidad d…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 600 visitas
  9. Started by JuanZu,

    Buenos días a todos En mi proyecto tengo una hoja de DATOS y otra hoja de FICHAS. En la hoja DATOS se recogen todas las facturas. Cuando se seleccione, en la hoja de FICHAS (desde un ComboBox) un Cliente, se deberían volcar los datos respectivos a ella. Saludos Angel.zip

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 599 visitas
  10. Buenos días, Tengo el siguiente código: Sub Copiar_NCAGT() 'MODULO11copia ndagt Application.ScreenUpdating = False Range("S2").Copy Windows("Caja Jesus 2016.xlsm").Activate Sheets("BOLETOS").Select Range("AA2").PasteSpecial xlPasteValues Application.CutCopyMode = False Range("AA2").Select Range("AA2").Copy Range("AA3:AA" & Range("I" & Rows.Count).End(xlUp).Row).Select ActiveSheet.Paste 'ActiveSheet.PasteSpecial xlPasteAll Application.CutCopyMode = False End Sub Bueno este código lo tengo en mi libro NOTAS DE COBRANZA y lo que hace es copiar de mi hoja ND celda S2 el valor a mi otro libro Caja Jesus 2016 a la celda AA2…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 599 visitas
  11. Started by Jewison,

    Quien me da un codigo para poder crear una carpeta en el Escritorio, pero que no tenga que poner mi direccion de escritorio, es decir: C:\User\Fulanito\Desktop, porque si lo quiero pasar a varios amigos no podran guardarlo, necesito un codigo en el que yo le de a un boton con un macro, y se guarde en la carpeta especifica y que esa carpeta si no existe que se autocree. pero lo necesito sin dar mi direccion como les dije anteriormente Ayuda.rar

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 599 visitas
  12. Started by Suret,

    Buenos dias amigos mios, porfavor como seria una macro en excel que me empieze a numerar celdas: 1ro: Que la macro pida Prefijo, ejemplo: Item 2do Que la macro pida Numero inicial, ejemplo: 78.00 3ro que la macro pida una constante, ejemplo: 0.02 4to empezar la numeracion en un celda cualquiera: Celda C4= Item 78.00 Celda B5= Item 78.02 Celga G10= Item 78.04 y asi susecivamente, hasta finalizar con un esc.

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 599 visitas
    • 1 seguidor
  13. Started by fuchsvta,

    Que tal tengo la siguiente situación, se me entrega un archivo de excel al cual hay que migrar hacia un formato txt, este reporte que esta en excel hay que estar migrandolo al menos 1 vez por semana por lo cual es demasiado el tiempo que se le invierte al hacerlo de forma manual, se puede realizar una macro para que automatize este proceso? Del archivo resultante en txt se requiere quede de la siguiente forma. D555555555555555550000000149798400000034334000000099000 . D541523100000000330000000230004840000034334000000100000 . detallo el formato de arriba [TABLE=width: 500] [TR] [TD]#[/TD] [TD]Nombre del campo[/TD] [TD]Long[/TD] [TD]Tipo[/TD] [TD]Valor[/TD] [TD…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 599 visitas
  14. Started by j.salas,

    Buenas tardes, Use el grabador de macros para que actualice automáticamente una tabla relacionada, me mostró este código: ActiveWorkbook.Connections("Consulta - Grupos").Refresh Lo puse en un módulo para que al hacer click en un botón me ejecute ese módulo, pero me lanza un error: y no me permite actualizar, que podría estar sucediendo? o hay algún otro código que me permita actualizar una tabla relacionada específica? lo mismo para actualizar una tabla dinámica relacionada específica. Muchas gracias

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 599 visitas
    • 1 seguidor
  15. Started by fdbchp,

    Adjunto un archivo en zip de vocabulario. En él hay varias hojas: la primera contiene el vocabulario general y las otras contienen el vocabulario según el tipo de palabras. He creado varios módulos (uno por hoja) para clasificar las palabras por categorías pero para ir más rápido quisiera hacer una macro que ejecutase todas los módulos de forma secuencial siendo el último el de "quitar filtro a la hoja vocabulario". ¿Alguien puede ayudarme? Gracias aleman 2013-14.zip

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 598 visitas
  16. Estimados, es mi primer post en este foro y desde ya agradezco enormemente su ayuda. No se programar en ningún lenguaje, pero algo "entiendo" (ya se poner "Hola Mundo" con VBA jeje). Necesito su ayuda con lo siguiente: 1) Tengo un listado diario de precios de acciones, pero solo necesito usar el precio del útlimo día hábil del mes (lunes a viernes). Luego haré análsis en función de los precios mensuales (medias, desviaciones, etc). 2) Diferentes proveedores me pasan los precios con su correspondiente fecha en diferentes formatos: -- subo excel con un modelo indicativo -- Ejemplo: a) uno me pone formato: MM / DD / AA y otro me pone DD / MM / AA separan los decim…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 598 visitas
  17. Hola, estoy intentado realizar una gráfica, que al obtener los datos cada vez sea distinta, en este ejemplo llega hasta el M13, pero en ocasiones cogerá menos datos, por ejemplo el D13. ActiveSheet.Shapes.AddChart.Select ActiveChart.ChartType = xlColumnClustered ActiveChart.SetSourceData Source:=Sheets("Hoja1").Range("B12:M13") Para poder variar el numero de la fila he intentado usar cells pero me da error y no se como usar cells en este caso, os pongo lo que he realizado. i=13 ActiveChart.SetSourceData Source:=Sheets("Hoja1").Range(Cells(12, 2), Cells(13, i)) Supongo que será algo bastante fácil, pero no doy con la tecla. Un saludo y gracias

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 598 visitas
  18. Buenos dias, expertos por necesito una ayuda con un formulario llamado UserMov no me esta mostrando la consultas desde la fecha del 2 de enero hasta la fecha, pero desde 1 de enero atras me consulta muy bien; no muestra ningun error solo borra la lista, ¿ cual sera la falla del sistema ya que he revisado y no encuentro un error alguna.Por favor ayudenme cual es la razón con la que no me muestra los datos desde las fechas indicada. Adjunto el sistema desde el googledrive ya es supera las megas maximas al foro. Usuario: admin Contraseña: admin https://drive.google.com/file/d/17Jvu_HeldTNMHcpS6wUTUWa2wt1S24F0/view?usp=sharing

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 598 visitas
  19. Started by jeaa,

    Buenos dias, expertos tengo una archivo que lo trabajo de forma manual; en la hoja "TARIFARIO" primero filtro en la columna K, luego filtro en la columna C, y los registros filtrados comparo con los datos de la hoja "REDUNDANTE", entonces copio lo que lo corresponde y lo pego debajo de los datos filtrado, eso es la rutina hasta terminar todo. Ahora la pregunta es que si habra una macro que me ayude a realizar esos procesos para optimizar mi trabajo, la idea seria filtra lo que corresponde y ejecutar la macro. Por favor me puden ayudar si habria dicho codigo estare egradecido desde ya. Adjunto el archivo. REALIZAR MACROS.xlsm

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 597 visitas
  20. Started by espinoar,

    Hola amigos quisiera me ayudaran con este formulario para ingreso de un kardex de almacen de antemano les Agradesco su ayuda. Gracias Almacen General Inco Peru Base.rar

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 597 visitas
  21. Started by jeladio,

    Hola estimados amigos tengo la necesidad de generar un numero serial no repetitivo para ponerle como Id de algunos documentos que necesito guardar y lo quisiera hacer por medio de la fecha hora minutos y segundos para que por medio de ellos no quede la posibilidad de que se genere algún repetido el macro que estoy aplicando es el siguiente: range("a1")= Left((Now * 24 * 10000000), 10)[/CODE] pero quisiera saber si lo estoy haciendo bien o si al alguna otra manera de poder hacerlo para que no se repita dicho numero, una cosa importantes es que no quiero punto decimal entre ellos. saludos y desde ya muchas gracias

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 597 visitas
  22. Started by romu055,

    hola amigos, tengo la siguiente macro( es la primera que hago estoy en fase de pruebas) en la cual quiero que de un archivo se seleccione una columna y la pegue en otro archivo, hasta ese punto todo mas o menos fácil, pero hay veces que la columna tiene menos filas que la anterior y no se que debería de indicar para que cada vez que ejecute la macro, si tiene menos filas, borre las anteriores y siempre se quede la columna con las que se han copiado en ese momento. no se si me he explicado, adjunto la macro creada Sub pruebascorreos() ' ' pruebascorreos Macro ' PRUEBA COLUMNA ALBARAN ' ' Acceso directo: Ctrl+Mayús+P ' Windows("Libro1").Ac…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 597 visitas
    • 1 seguidor
  23. Started by Cesar Osorno,

    Buen dia, en mi trabajo ocupamos una macro que se creo en office 2010 y a la hora de querer correrla en office 2013 nos muestra un error de codigo oculto: Thisworkbook Ya estuve checando y encontre la "solucion" de deshabilitar el complemento de convercion a euro pero no me da resultado. Tambien descargue el office 2010 pero ya tampoco me deja correr la macro. Que puedo hacer?

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 597 visitas
  24. bnas tardes, please, su ayuda en el adjunto file. regards, grafico1.rar

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 597 visitas
  25. Hola a todos necesitaria,como podeis ver en el libro de ejemplo que acompaño,un macro que me copiara el resto de las filas pero que esa en concreto me la separar por el signo+ y que me la fuera copiando consecutivamente gracias a todos por vuestro tiempo Prueba .xls

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 597 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.