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. buenos días, Tengo el siguiente macro. Es para copiar una hoja y dar nombre de acuerdo a una lista. Sin embargo, cuando agrego un nombre mas en la lista me da erro. Alguien me puede ayudar? Sub Copia() Dim C As Range Application.ScreenUpdating = False For Each C In Range("A2", Range("A" & Rows.Count).End(xlUp)) Sheets("Molde").Copy , Sheets(Sheets.Count) With ActiveSheet .Range("A5") = ? .Name = Left(C.Offset(, 1), 31) End With Next C Application.ScreenUpdating = True End Sub Ejemplo Copiar Hoja.xlsm

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 4.6k visitas
  2. Hola a todos mi consulta es como cambiar la ruta para cargar las imagenes desde la hoja fotos del libro ,que actualmete lo hacen a travez de un vinculo a una carpeta de escritorio. adjunto proyecto copia.xlsm

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 3.7k visitas
    • 1 seguidor
  3. Started by jhonleonardo,

    buenas noches estuve mirando en el foro y encontre muchas temas relacionasdos pero no encontre lo siguiente , cuando se utiliza un lector de codigo de barras el automaticamente gener el numero ya sea en una celda , texbox , xombobox etc , mi idea es hacer un inventario y lo que necesito es que cuendo el me coloque el numero en un texbox ya activo , el automticamente lo registre , es como si le diera un enter automatico ya que la idea es hacer un inventario raipdo que lea solo codigos y los valla colocando en colomna , lo que me pasa ahora es que los coloca en fila porque no tiene un enter manual ni automatico Posdata , tome un ejemplo que encontre de inventario para hace…

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 19.1k visitas
  4. Hola Estimados del foro , estoy buscando información y a la vez tratar de solucionar un inconveniente con mostrar una imagen donde detalle mi problema: tengo un formulario: (controles listbox,image)y una carpeta donde están todas las imagenes (miles de imagenes).,cuando yo selecciono en el listbox un codigo concatenado ejemplo ("200085-41257"), deseo que me muestre la imagen que esta alojada en la carpeta "imagenes2021" ,pero aqui viene el problema las imagenes que estan en la carpeta no tienen el mismo nombre del listbox la imagen se extrae de una web y viene de la siguiente forma : codigo+zona+fecha ejemplo "200085-41257-20210215.PNG" mi pregunta es como po…

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 1.6k visitas
  5. Started by mariosnash,

    Buenas, estoy buscando ayuda para hacer que mi hoja de excel vaya eliminando filas (con los registros mas antiguos) a medida que se agregan nuevos registros. Tambien podria usar algun criterio de eliminacion como un rango de fechas, por ejemplo mantener las filas que correspondan al mes actual o del año actual. Desde ya muchas gracias, saludos

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 1.1k visitas
  6. Started by vivasamcooke,

    Hola a tod@s. Mi nombre es Carlos, programador durante más de 20 años y que dejó de serlo (profesionalmente) hace 10... La verdad es que hasta ahora poco me había tocado lidiar con EXCEL, pero ser el tuerto en el país de los ciegos de mi trabajo me ha llevado a tener que hacer "cositas" para facilitar el trabajo y la extracción de información de ficheros EXCEL. El caso es que tengo que buscarme la vida para que los usuarios introduzcan una serie de datos (alrededor de 40 por fila) para guardarlos en otra hola del mismo libro. a través de un formulario, userform o a base de controles activeX o de formulario. Muchos de los datos están relacionados con tablas …

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 900 visitas
    • 2 seguidores
  7. Started by manzano,

    Buen dia, Necesito ayuda con una macro, la cual concatena unos números con un guion. Necesito que en el resultado final reemplace el guion por una coma. Trate de hacerlo grabando y usando buscar>reemplaza, funciona, pero al pegar el código en la macro solo lo hace con la primera celda, a las demás les quita el guion y fusiona los números Dentro del archivo hay un cuadro explicando mas fácil. Saludos!. Guion x coma.xlsm

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 4k visitas
  8. Started by Klaussbarbie,

    Buen dia tengo esta duda, quiero crear un docuemento en el cual al imprimr me cree una nueva hoja , y esta a su vez lleve un correlativo. para ser mas claro, digamos que el nuemer 0001 lo tengo en la celda B2 y al agregar una nueva hoja me aparesca el 0002 , pero a la vez nescesito que en donde dice Hoja1 tambien aparesca el numero de la celda en este caso 001 y asi sucesivamente.

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 2.8k visitas
  9. Started by ezealvarez12,

    Hola, tengo un problema. Necesito exportar a travez de una macro los datos de una tabla de excel a una tabla de access (ambas tablas tienen las mismas columnas). He buscado codigos para poder hacer el procedimiento pero como soy novato no soy capaz de adaptarlo a mis necesidades. Lo que necesitaria es un codigo base que me sirva de estructura para exportar cierto rango de celdas de una hoja de excel a una tabla de access, donde yo tenga que cambia la ruta de conexión y el nombre de las tablas. desde ya muchas gracias.

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 13.7k visitas
  10. Started by karrakilla,

    Buenos días No se si este es el hilo correspondiente ya que no se si se puede hacer sin Macros o userform... Necesito insertar una foto de grandes dimensiones en horizontal, pero que la foto este dentro de un recuadro de la hoja y mediante scroll, conseguir ver toda la imagen, sin tener que hacer la hoja tan grande como la foto. ¿creéis que seria posible?, llevo toda la mañana intentando cosas y no doy con ello... Un Saludo

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 2.6k visitas
  11. Estimados foristas, Requiero su acostumbrado apoyo para lo siguiente. En el adjunto verán tres hojas. Lo que necesito es que conforme se vayan registrando datos en las hojas "COMPAS" o "VENTAS" las filas ingresadas se copien automáticamente en la hoja "KARDEX". Además, de ser posible, que se pueda ordenar por fechas, de la más antigua a la más reciente. Será posible este desarrollo? Muchas gracias por su soporte, Saludos. José. PRUEBAN.xls PRUEBAN.xls

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 1.9k visitas
  12. Started by loku17es,

    He hecho un programa para cálculo de instalaciones de fontanería, y más o menos iba bien, hasta que decidi darle "mayor funcionalidad", permitiendo que en una hoja, el usuario, al introducir el nombre de la instalación se creara una hoja para la misma. Además introduje protecciones de hojas, para de este modo, evitar que los ususarios, de forma accidental borraran alguna formula de la hoja. Como consecuencia, no se que ha pasado, y el insertar líneas o borrarlas, se convierte en un auténtico suplicio, llegando a 30 segundos.. y solo es introducir una línea (con vba). Tengo el fichero acabado, y con un ejercicio, no se si alguna alma caritativa lo puede hechar un vistazo…

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 2.6k visitas
  13. Started by takeo,

    Buenas Tardes a toda la comunidad de AyudaExcel quisiera saber si me podrian ayudar con un problema que tengo recien estoy comenzando a ver el Excel y me estan pidiendo un macro para agregar Columnas despues de un tipo de contenido en una celda por ejemplo [TABLE=class: grid, width: 500] [TR] [TD]PEPE[/TD] [TD]TOTAL[/TD] [TD]MARIA[/TD] [TD]TOTAL[/TD] [TD]WENDy[/TD] [TD]TOTAL[/TD] [/TR] [/TABLE] entonces lo que me piden es que con la macro busque todas las celdas que tienen el valor "TOTAL" y agregue 2 columnas en blanco despues para que quede asi [TABLE=class: outer_border, width: 500] [TR] [TD]PEPE[/TD] [TD]TOTAL[/TD] [TD](vacio)[/TD] [TD](vacio)[…

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 1.7k visitas
  14. Buenas tardes Escribo por que necesito ayuda con un tema que me esta rompiendo la cabeza. Necesito crear una lista despegable, donde el usuario pueda elegir varias provincias, y después en función de los que eligió en antes, se muestren las ciudades relacionadas, donde el usuaria también pueda elegir mas de una ciudad. Adjunto excel para clarificar mejor mi pregunta. Gracias!!!!! Excel Ayuda.rar

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 3.2k visitas
  15. Started by Gian Franco Schiaffino I.,

    Hola: Soy nuevo en este foro y necesito ayuda urgente. Cuando se exportan datos de un programa a excel, algunas fechas de desconfiguran. Algunas llegan con un formato dd-mm-aaaa 0:00 (Ej: 12-05-2013 0:00), las cuales al darles formato de fecha se reparan. Pero hay otras fecha que llegan con formato general y de la forma mm/dd/aaaa 12:00:00 AM (Ej: 4/23/2007 12:00:00 AM) y al darles formato fecha, no son reconocidas por excel y de forma manual se debe borrar el 12:00:00 AM y cambiar el orden de la fecha para que excel la reconozca y la coloque con el formato deseado, que es dd-mm-aaaa. Se adjunta un archivo excel con un extracto de las 2 columnas con fechas y cuál es e…

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 1k visitas
  16. Started by estepanuno,

    Hola a todos,esta macro me da problemas de compilacion,alguien me podria indicar la solucion? La intencion es que solo me borre las filas que sean diferentes a la condicion Gracias a todos Sub Macro1() ' ' Macro1 Macro ' Macro grabada el 21/11/2012 por Paco ' ' Dim Rango As Range, Fila As Long, ÚltimaFila As Long Application.ScreenUpdating = False ÚltimaFila = 1 For Fila = ActiveSheet.UsedRange.Row To ÚltimaFila Application.StatusBar = "Procesando fila " & Fila & " / " & ÚltimaFila If (Range("I" & Fila).Value <> TRANSPORTES Y LOGISTICA SORIA, S.L.) Then en esta linea me da el error If Rango Is…

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 1.8k visitas
  17. Started by dff1403,

    Buenas Noches, Me gustaria puedan apoyarme con el siguiente adjunto, en el cuento con un userform, en el cual completo todos los datos y van a sus respectivas columnas, y si selecciono un combobox este debe ir debe ir en la fila "L" pero no se como hacerlo . Por otro lado, este combobox tiene los mismos nombres que las pestañas por lo que al seleccionar deberan copiarse también automáticamente a sus respectivas pestañas siendo solo las columnas J, I, A, C, G,H, de la hoja Ordenes siempre en la primera fila vacía que se encuentre. Agradezco su amable atención, GENERAL ORDENES 2014 - EJEMPLO (1).zip

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 1.4k visitas
  18. Started by jcjones,

    Buenos días Forista, tengo unas tablas en las cuales deseo colocar unas imágenes dependiendo de los números que tenga esta tabla para luego imprimirlas. No se si se pueda definir el tamaño de la imagen al pegarla Anexo archivo con ejemplo. P.D. Es un juego Loteria.rar

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 2.3k visitas
  19. Started by cvwm67,

    Buenos Días. Me gustaría muchísimo que me pudiesen ayudar. Estoy realizando, se puede decir programa, que agregue compras, que reste inventarios a su vez de que pueda registrar actividades y que registre reservas de inventario donde no se si pueda conectar, de que a cada día que pase, se resten los días y si pasan 7 días, la cantidad se devuelva al inventario. Está ultima parte no es tan importante como a que si reste los inventarios. Para la parte de registrar actividades lo he podido lograr, pero para la parte de restar inventarios y que con cada vez que yo ingrese una nueva cantidad, el automáticamente se reste de la cantidad que había anteriormente. Ejemplo (había…

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 1.9k visitas
  20. 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
  21. Started by Khalel,

    Buenos días. Tengo una macro programada para que ejecute una actualización de los datos. El problema es que, dependiendo de los datos, a veces salta un mensaje de error y hasta que no se pulsa aceptar en el mensaje de rror, no continua calculando. Hay alguna forma de hacer que "pulse" el aceptar de forma automática? Gracias.

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 1.5k visitas
  22. Started by MarianoCruz,

    Hola buenas tardes: Tengo un archivo que me funciona para revisar mis archivos que me llegan constantemente, estos tiene por default un nombre y yo debo revisar cada uno y poner un nombre final. Los archivos los en listo en una hoja de la siguiente manera, a partir de la fila 4: En columna A: La ruta hasta la carpeta donde se encuentra el archivo En columna 😄 Nombre del archivo con extensión En columna N: La ruta completa Manualmente ingreso en la columna G el nombre de mi nuevo archivo (Sin extensión) En la columna J Se encuentra mi nombre nuevo y su extensión. (con formula) Este nuevo nombre lo asigno con una macro que funciona así: N…

    • 3

      Reacciones de usuarios

    • 12 respuestas
    • 1.4k visitas
    • 2 seguidores
  23. Started by sretamalb,

    Hola Buenas Noches, Tengo un problema ya que estoy haciendo scraping a una página la cuál contiene sólo eventos Class para descargar la información y no me permite descargar nada queda la hoja en blanco. He probado con todos los class y aún así no puedo obtener la descripción y URL de los productos que es lo que ando buscando. Alguien me podría ayudar a obtener dicha información. Adjunto el archivo. Muchas Gracias.Prueba.xlsm Prueba.xlsm

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 2k visitas
    • 1 seguidor
  24. Hola, mi nombre es Santiago y soy nuevo en el foro. Quisiera por favor pedir ayuda con este tema que me tiene muy trabado: Tengo una lista de nombres de nombres de cuentas de usuarios de un sitio web. Por ejemplo: mica_99 o Zeta_Florchu o CARP_12Mauro Paralelamente, yo mismo creé una lista de 1030 nombres y sobrenombres de mujer (columna B de Excel). Ejemplo: Maria o Florencia o Florchu o Micaela o Mica Lo que quiero hacer identificar si cada una de las celdas de la columna A contiene dentro de sí alguno de los valores presentes en la columna B (es decir, en un rango de valores). Pensé en lo siguiente: =SI(ESNUMERO(ENCONTRAR(B1;A1));"Correcto"; "Incorrecto") Esa f…

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 7.3k visitas
  25. Started by Alfonso5597,

    Hola estimados amigos De nuevo recurro a ustedes para ver si me pueden ayudar en este problema, les explico, tengo un albun de imagenes, al que le he puesto un escroll, este no he conseguido que funcione, me recorre la pagina, y me busca el registro, pero no consigo que me visualice la imagen, el libro lo subo sin imagenes por que si no no se abre Muchas gracias por su ayuda, un cordial saludo Prueba

    • 0

      Reacciones de usuarios

    • 12 respuestas
    • 1.5k visitas
    • 2 seguidores

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.