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. Tengo una tabla dinamica que contiene dos columnas A=Ciudad B=Cantidades. Quiero que al dar doble click a cualquiera de estas celdas (B4:B30) de despliegue normalmente el showdetail de la tabla, pero que a partir de ahi se ejecute el siguiente macro. que no es nada mas que quitar columnas innecesarias. espero me puedan ayudar ub Macro5() ' ' Macro5 Macro ' ' ActiveCell.Offset(0, 50).Columns("A:F").EntireColumn.Select Selection.Delete Shift:=xlToLeft ActiveCell.Offset(0, -16).Columns("A:O").EntireColumn.Select Selection.Delete Shift:=xlToLeft ActiveCell.Offset(0, -6).Columns("A:E").EntireColumn.Select Selection.Delete Shi…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 930 visitas
  2. Started by jeladio,

    Buenas tardes he estado intentando utilizar la api de whatsapp para poder enviar un mensaje a un usuario si necesidad de guardar su numero en nuestros contactos, y funciona parcialmente, desde chrome el problema es que los numeros telefonicos los puede poner en el navegador pero al insertar el mensaje (que los recoge de dos textbox) deberia insertar la frase completa con espacios y todos pero no lo hace asi, sino al lllegar a la primera palabra abre otra nueva ventana de whatsapp en el navegador y lo que yo quiero es que funcione con la frase completa, el codigo base es este y el ejamplo esta en el adjunto https://api.whatsapp.com/send?phone=1234567890123&text=Hol…

    • 0

      Reacciones de usuarios

    • 8 respuestas
    • 6.3k visitas
  3. Ciao a tutti Mi chiamo Maurizio e il mio problema è questo: sul foglio Excel denoinato (Calcoli) ho alcuni risultati che inserisco nelle mani delle partite della lega di calcio (inglese) Ora vorrei: Ad esempio, nelle colonne J3: L500, devi inserire una formula che mi indichi quanti giochi hai vinto, legato e perso la squadra che ha giocato in casa nelle ultime 5 partite giocate. Tenendo conto che i dati dovrebbero essere presi dal foglio (Database_Results) che si inserisce qui il manuale grazie a Saluti da A.Maurizio -------------------------------------------------- -------------------------------------------------- ---------------------------------------------…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 641 visitas
    • 1 seguidor
  4. Started by cristian9209,

    Buenas Noches Ya que mi conocimiento de macros no me da para tanto, necesito su ayuda con el siguiente caso; espero me puedan entender es muy complejo de explicar. Tengo en hoja1 una base de datos, y en los encabezados hay unos que nos indican la vigencia (Fecha inicio y fecha fin) de cada fila. Asi mismo el valor que tiene cada una en el periodo total de vigencia. Por ejemplo en la fila dos la fecha es desde 01/07/2017 hasta 01/07/2021 lo que nos da una vigencia de 4 años y tiene un valor total de 1000. Lo primero que necesitaría es que en la hoja2 me lleve los mismos datos de la linea 2 de la hoja 1 y para el ejemplo antes dicho nos inserte la misma informació…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 819 visitas
  5. Started by SANTUY,

    Saludos, un favor grande me ayudan se desarrollo unas macros en excel 2016 pero no se ejecutan en versiones anteriores como excel 2013. Se que existe una opción para que se habilite o des habilite la compatibilidad de ejecutar las macros en cualquier versión. El problema que no me acuerdo. Por favor me ayudan. Gracias

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 2.4k visitas
  6. Hola a todos, mi nombre es Maurizio Y mi problema es este: en un Modilo creé una función para formatear las líneas con colores a gusto. Y esta es la función que utilicé: -------------------------------------------------- ----------------------------------------------- Opción explícita Dim X tan largo Dim Y tan largo Sub Ovale1_Click () Para X = 2 To Sheet1.Range ("A" & Rows.Count) .End (xlUp) .Row Step 2 Para Y = 3 a Sheet1.Range ("A" & Rows.Count) .End (xlUp) .Row Step 2 Sheet1.Range ("A" & X & ": I" & X) .Interior.Color = RGB (102, 255, 255) Sheet1.Range ("A" & Y & ": I" & Y) .Interior.Color = RGB (255, 192, 0) …

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 659 visitas
    • 1 seguidor
  7. Buenas Tardes a todos Tengo tres listados, los cuales he de comparar entre ellos. Los dos primeros listados que llamaremos ( lista A y lista B ) a comprar tienen dos columnas ( la primera con ID y otra con números decimales), y el objetivo es poner en las dos columnas de color verde a todas aquellos registros que sean iguales y los que no son iguales se pongan en rojo, y aquellos registros que no estén en el otro listado, se quede en blanco sin hacer nada. Luego necesito que se compare los listados de ( Lista C ) con la lista A. Os dejo un ejemplo de los listados, agradezco de antemano vuestra ayuda. A ser posible necesito otra macro para …

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 746 visitas
  8. Started by Leopoldo Blancas,

    Buenas Noches a Todos, Pido su apoyo para obtener el "Nombre" de la hoja activa por medio de VBA. Necesito obtener el Nombre de la IZQUIERDA del nombre de la Hoja en el Editor de VBA. Por ejemplo: Si estoy en la hoja "Listas" quiero Obtener el nombre "Hoja2", ya que en ocasiones borran Hojas, etc. Subo imagen para mayor comprensión.

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 14.2k visitas
    • 1 seguidor
  9. hola amigos de excel mi idea es que tengo un formulario que lo que hace es resaltar aquellos numeros que estan repetidos en dos hojas y quisiera enviar esos numeros a la ultima hoja del libro llamada comparacion de acuerdo a la columna que tiene el encabezado donde se realizo la respectiva comparacion y tener un mejor analisis les agradezco su colaboracion muchas gracias comparar.xlsm

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 708 visitas
  10. Started by reinaldo.cordero18,

    Buen día amigos!!, estoy haciendo un macro para crear historiales de trabajos a ciertos equipos o maquinas, me ha ido bien pero me he encontrado con un problema al momento de ingresar la fecha de ejecución ya que en el textbox "FECHA DE EJECUCION" se introduce como DD/MM/YYYY pero al momento que esos datos se guardan en la hoja seleccionada ya sea MAQUINA 1 ó MAQUINA 2 me aparece como MM/DD/YYYY me gustaria que me ayudaran a poder corregir esta inversión que vba le hace a la fecha y si es posible colocar algún calendario en FECHA DE EJECUCION en lugar de usar un TextBox, muchas gracias por su ayuda. Saludos. PREGUNTA EN FORO.xlsm

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1k visitas
    • 1 seguidor
  11. Started by mmaayyaa333,

    Buen día , con un gran problema que no he podido resolver, tengo un userform y necesito guardarlo en PDF tengo office 2016 a 64 bits, quisiera saber si esto es posible?, gracias.

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.9k visitas
    • 1 seguidor
  12. Started by Maku,

    Quisiera hacerles una pregunta que lleva un par de días rondándome la cabeza. La otra vez preparé un archivo que llevaba un montón de comentarios que contenían imagen. Se incluir y delimitar el tamaño de esos comentarios, mi pregunta es: existe la posibilidad de hacer que se añadan las imágenes por medio de pegado (o arrastrando la imagen) sin necesidad de tener dicha imagen en el ordenador. Me refiero a la opción "copio imagen" "pego imagen". Lo que vendría a ser añadir un comentario para dummies, o para vagos... depende de como se mire. El problema me surge al pensar en un archivo que va a ser utilizado por una persona para la que sé que descargar imagen, inserta…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 1.7k visitas
  13. Started by kairon269,

    Hola amigos... Motiva este tema me ayuden a resolver mi dilema... nececito lanzar una macro al pulsar enter sobre una celda seleccionada... Estoy realizano un formulario para cargar datos, que seran registrados en otra hoja.. la idea es que al llegar a la ultima celda de carga del formulario y darle enter, automaticamente ejecute la macro de registrar los datos cargados en el formulario en la otra hoja que contiene una planilla.. actualmento lo hago con un boton, pero para ello debo tomar el mouse y hacer click en el boton y deseo evitar ese paso y asi agilizar la carga... Agradecere muchisimo su ayuda como siempre.. Abrazos y exitos a todos.

    • 0

      Reacciones de usuarios

    • 9 respuestas
    • 18.8k visitas
    • 1 seguidor
  14. Hola a todos: Pues eso, tengo una función que funciona si la llamo desde una macro, pero no funciona como fórmula en una celda. Parece fácil, ¿No?, pues no, el detalle es que la función obtiene múltiples resultados y no doy con la sintaxis de la fórmula. La solución es fácil, utilizar tantas funciones como resultados, pero se me ha metido en la cabeza utilizar solo una. Quizás no se pueda hacer lo que pretendo. Paz y amor Ejemplo Fórmula.xlsm

    • 0

      Reacciones de usuarios

    • 17 respuestas
    • 3.1k visitas
    • 1 seguidor
  15. Started by iramos3,

    Estimados podrian revisar la macro que efectua busqueda con filtro. Registro anticipos y adelantos.xlsm

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 1.8k visitas
    • 1 seguidor
  16. Started by viejo,

    Buen Dia tengan grandes expertos de la programacion, acudo a ustedes para ver si me pueden auxiliar respecto a un tema que aparentemente esta muy sencillo pero por mas que le doy vueltas no logro que me salga, espero su valiosa colaboracion para poder terminar esa parte que me hace falta, les explico brevemente pues se trata del registro de 3 campos en una hoja mediante formulario el cual en su parte de inicialize hace o realiza un numero consecutivo, mi problema radica aqui en hacer que ese consecutivo se haga deacuerdo a un formato el cual es el siguiente: 34-07-00-000020-A en el formato lo que quiero que vaya cambiando es lo que esta con negritas, (osea 34-0…

    • 0

      Reacciones de usuarios

    • 30 respuestas
    • 2.5k visitas
    • 1 seguidor
  17. hola.. buenas tardes a todos los master del Excel por esta Milton nuevamente solicitando ayuda (para facilitar mi laburo) bueno les informo que estoy intentando (sin resultado) formulario de las colaciones del personal (es mensual) y la idea es : que al ingresar la Fecha en un Textbox complete los demas textbox segun el menu de la fecha ingresada (imagino que es con funcion buscar) si me pudieran ayudar con esto, agradecido .. atte Milton Villarroel Minuta 2018 v2.xlsm

    • 0

      Reacciones de usuarios

    • 14 respuestas
    • 1.7k visitas
    • 2 seguidores
  18. Buenas tardes antes que nada agradecer por el tiempo que se toman en ayudarnos a todos con las dudas que tenemos bueno mi problema es el siguiente tengo una base de datos con códigos y descripciones y tiempo lo que deseo es sacar los subtotales de los codigos osea si tengo 3 codigos a20 me saque los subtotales y al mismo tiempo me coloque al costado los encabezados y los codigos EN SI AL INICIO ESTA ASI : A B C COD DESC TIEMPO A10 AUT 2 A A10 AUT 3 A A10 AUT 4 A A20 CTR 2 A A20 CTR 3 A A20 CTR …

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 861 visitas
    • 1 seguidor
  19. Qué tal, Os preguntaréis qué hace este preguntado algo así... pues es que me ha surgido una duda la diseñar un formulario. Tengo varios controles agrupados (listbox, textbox y commandbutton). Veo que en propiedades, si selecciono el grupo, puede activarlo/desactivarlo, pero... No hay nombre de grupo para seleccionarlo en tiempo de ejecución. Si lo desactivo en propiedades, al lanzar el formulario aparecen todos los controles incluidos desactivado (normal, lo he hecho en propiedades ), pero no encuentro manera de hacerlo en tiempo de ejecución, porque no tiene nombre asignado. Ya sé que con un marco lo puedo hacer, pero me ha surgido esta curiosidad. ¿Alguna…

    • 0

      Reacciones de usuarios

    • 13 respuestas
    • 2.2k visitas
    • 1 seguidor
  20. Started by gonzalo.valle,

    Estimados, Necesito vuestra ayuda con una macro. Básicamente necesitaría una macro que busque en el rango B2:B, el texto "Completar con Documento UUID". Si lo encuentra, me devuelva un MsgBox que diga "Ingresar Documento UUID". Y si no encuentra, que termine la macro, para que luego siga con otra que ya tengo armada. Adjunto planilla con ejemplo. Muchas gracias Gonzalo Ejemplo para Macro.xlsm

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 732 visitas
  21. Started by mp5,

    Buenas tardes, Necesito que alguien me ayude a generar una macro en la que si cumple dos condiciones me dé un texto en otra celda. Pongo un ejemplo, Una condición es que del dato que hay en la celda A1 (04E100011EF) compruebe el “1000” y la otra condición es que del dato que hay en la celda B1 (2497 Prueba macro) compruebe la palabra “prueba” y si cumple esas dos condiciones me ponga “correcto” en la celda C1 y si no cumple esas condiciones ponga lo que pone en la celda B1. Gracias. Un saludo

    • 0

      Reacciones de usuarios

    • 10 respuestas
    • 1.2k visitas
    • 1 seguidor
  22. Buenas noches: Tengo un formulario para dar de alta a entidades. Al introducir los datos de cada una quiero que se les de un id; sin embargo, me da el siguiente error: cuando grabo un registro nuevo me "machaca el que tenía registrado y me asigna siempre el Id 1 y así sucesivamente, de tal forma que va eliminado los registros y solo queda el último???? Me puede alguien echar una mano y decidme dónde esta el error??? Dejo el enlace con el archivo. https://drive.google.com/open?id=1W4TnIlIZem36J9qmELBccHvfzgBCsd1V Muchas gracias!!!

    • 0

      Reacciones de usuarios

    • 15 respuestas
    • 2k visitas
    • 1 seguidor
  23. Started by sretamalb,

    Hola a todos, Alguien sabe como se puede hacer que en un formulario cada que vez que llegue el día 01 de cada mes, me reinicie el contador y comience desde el número 1? Gracias ojalá me puedan ayudar. Saludos,

    • 0

      Reacciones de usuarios

    • 14 respuestas
    • 2.7k visitas
    • 2 seguidores
  24. Started by chilaquil,

    Buenos dias expertos: Solicitando su ayuda con un pequeño problema el cual explico brevemente Tengo una macro que abre un numero determinado de archivos con un bucle con la instruccion Worksheet.open extrae infromacion y cierra dichos archivos mi problema es que cuando alguno de estos archivos trae formulas relacionadas con otros archivos al momento de abrirlo la macro me envia el sig mensaje y se detiene hasta no dar clic en actualizar o no actualizar, pudiera haber una manera de que no aparezca dicho mensaje o que se pueda dar clic automaticamente al abrirlo para que no se interrumpa el proceso. PD no considero necesario adjuntar algun archivo …

    • 0

      Reacciones de usuarios

    • 4 respuestas
    • 4k visitas
    • 1 seguidor
  25. Started by Lis Chu,

    Buenos Dias Por favor me pueden ayudar ya que tengo el siguiente codigo para buscar pero me sale error, por favor su apoyo. Dim ult As Integer Dim datoBusqueda As String Dim ncontrato As Long ult = transRowRng.Rows.Count datoBusqueda = TextBox1.Text If datoBusqueda = "" Then MsgBox "Búsqueda cancelada", vbInformation, "Mensaje" Exit Sub Else ncontrato = Val(datoBusqueda) For j = 1 To ult If Cells(j, 2) = ncontrato Then cont = 1 fila = j TextBox2.Text = Cells(j, 3) End If Next j End If If cont = 0 Then MsgBox "Contrato no encontrado", vbInform…

    • 0

      Reacciones de usuarios

    • 7 respuestas
    • 1.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.