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 dias expertos, tengo un libro de excel que estoy trabajando formularios la cual tengo dos, la dificultad es que en mi formulario de FormConsultar e puesto dos filtros con dos ComboBox la cual me funciona con solo texto pero tengo tambien numeros en el listado y la cual donde no me muestra cuando filtro con dicho numeros. Por favor si me pueden orientar que debo adjuntar que me muestre los datos. Adjunto el archivo. Reporte diario de trabajo Rev.xlsm

    • 0

      Reacciones de usuarios

    • 6 respuestas
    • 721 visitas
    • 1 seguidor
  2. Hello everyone my name is Maurizio and my problem is this again: On an Excel sheet In Cell (B13) I send the data directly from the web page, which in turn I would like to be able to take only its first data as I specified in the project. And you should transfer them to the Cells (L2:L3). Is all this possible? Thanks for all the help you want to give me about it. Greetings from A: Maurizio Meteo_Con_Form.xlsm

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 721 visitas
    • 1 seguidor
  3. Hola a todos: Soy nuevo en el foro, gracias de antemano por su ayuda. Estoy trabajando con plantillas de datos bioinformáticos muy extensas (60.000 filas) y busco una forma de aliviarme el trabajo Tengo dos columnas adyacentes. Columna A contiene nombre de genes (alrededor de 1000 genes, repetidos a lo largo de la columna en diferentes frecuencias hasta llegar a aproximadamente 60.000 filas), ordenados alfabéticamente. Para cada nombre de gen, una columna adyacente (columna contiene un nombre de secuencia asociada. Toda la información está en texto. utr|3OMYR000001|p-ras omy-miR-nov217-3p_3 utr|3OMYR000001|p-ras omy-miR-nov53-5p utr|3OMYR000001|p-ras omy-miR-n…

    • 0

      Reacciones de usuarios

    • 5 respuestas
    • 721 visitas
  4. Started by ensacamo,

    Hola a tod@s. Me está saliendo un mensaje que he tratado de buscar la solución por los foros y no doy con ello. Tengo un programa en una unidad de red. El fichero solo puede abrirse en modo lectura si ya está abierto en otro ordenador, pero esto es otro problema. El problema me surge cuando el primero que lo ha abierto cierra, y es que si trata de salir del programa el segundo operador, aparece el siguiente mensaje: Ya existe un archivo con nombre "xxx" en esta ubicación. ¿Desea reemplazar el archivo existente? Si No o Cancelar Tengo que decir que esto ocurre cuando pasa por la instrucción: ActiveWorkbook.Save Si pulso Si sale del programa salvando, pero si puls…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 721 visitas
  5. Hola a todos Necesito crear un filtrado de datos mediante combobox dependientes(ya lo he obtenido y funciona). Mi duda surge a la hora de poder visualizar esos datos. en un listbox. tengo 5 columnas, y la idea es que mediante el filtrado de los combobox, aparezcan los resultados de la quinta columna en el listbox (por ejemplo, si elijo en el ejemplo un pais, una tecnología y un cliente, deberán aparecer los cursos) Os adjunto el archivo donde aparece todo y el listbox sin funcionar (en vacio). Agradecería mucho si alguien me puede echar una mano, ya que ando bastante verde en estos temas. un saludo y gracias por anticipado COMBOBOX DEPENDIENTES.xls

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 720 visitas
  6. Buen día!! (ó buena noche dependiendo de donde me lean!!) En el adjunto el cual trabajo a diario necesito hacer copias del formato justo debajo (Indico con diferentes colores el encabezado y el cuerpo para que se entienda mejor, no llevan ningún color de fondo). El encabezado (A1:M1o) cambia mensualmente en "Compras correspondiente al mes de (Enero, Febrero, .....) de (2014, 2015....)" y el cuerpo( A11:M41) cambia dependiendo del número de facturas, en este caso la primera línea del encabezado cambia a subtotales, no siendo así en todos los meses. La copia debe ser idéntica en formatos, fórmulas, alto de fila y ancho de columnas. Cuál puede ser la forma de que se pregunte…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 720 visitas
  7. Generar una hoja nueva con contenido de otras hojas en ella. Edito todo el post: Por fin he logrado introducir dos fechas y que cuente los dias entre una y otra atendiendo a los colores. Ahora necesito colocar en otra hoja un boton para generar una hoja nueva, esta hoja tiene que crear con diversos datos, entre ellos, una copia del archivo adjunto. A ver si me podeis ayudar, un saludo. Libro1.xlsm.zip

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 720 visitas
  8. Started by mx_801,

    Hola a todos, tengo mi archivo de inventario lo que deseo es al presionar el boton Registrar del Userform1, la informacion del ultimo textbox (CANTIDAD), se suma a la celda de la hoja "INVENTARIO" en la fila cantidad vendida, es decir, el combobox es la que elije el productos, la opcion VLOOKUP, busca ese producto en la hoja "INVENTARIO" extrae la cantidad vendida y lo suma a la cantidad ingresada en el userform. Si es demasiado lo que pido, solo deseo ejecutar el comando VLOOKUP, que busque el producto y la cantidad, y esta cantidad grabarlo en una variable. yo podria avanzar con la suma. Muchas gracias INVENTARIO_FINAL_FINAL.rar

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 720 visitas
  9. Buen día Gente, Primero que nada agradecer a todos por la ayuda que me han prestado en este foro, ya que he encontrado mucha información valiosa para mi, MUCHAS GRACIAS GENTE POR SU TIEMPO Y COLABORACIÓN!!!! Bueno, necesito una ayuda con un tema, tengo un botón con el cual abro un archivo mediante un hipervinculo a este que se carga a un label, el tema es que no se como colocar que si el label esta sin informacion me salga un mensaje como "La imagen no esta cargada" y no me genere el error. Este el codigo del boton Dim url As String 'para abrir una pagina url = Label28 ActiveWorkbook.FollowHyperlink url [/CODE]

    • 0

      Reacciones de usuarios

    • 9 respuestas
    • 720 visitas
  10. Buenos días. Adjunto enlace al documento para que sea más fácil su comprensión (hay que habilitar las macros): Dropbox - Ejemplo TodoExpertos.xls Estoy intentando crear un documento excel que va asociado a un software de apuestas deportivas para que automáticamente lance órdenes de apuestas según se cumplan unos requisitos o no. Lo que me está dando problemas es una fórmula que está en Visual Basic (menú programador) que lo que hace es que cuando las celdas de la columna D (que son una cuenta atrás que funciona cuando está asociado al software) llegan al valor de la columna E (que escribo a mano, en el ej. son 600 segundos) se copien los valores de las columnas H y I …

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 720 visitas
  11. Started by Enid86,

    Buenas!! ? A ver quién puede ayudarme, tengo un libro con más de 100 hojas y quiero que se borre el contenido de todas, menos de dos hojas concretas ("GS" y "Macros") a partir de la celda A3. Me parece que debería ser muy sencillo, pero el código me da error 13 no coinciden los tipos (línea 5? Sub Botón4_Haga_clic_en() Dim hoja As Worksheet For Each hoja In Application.Worksheets If hoja.Name <> "GS" Or "Macros" Then hoja.Range("A3:G6000").Clear End If Next hoja End Sub He probado declarando las hojas que quiero proteger como worksheet y comparando con If hoja.Name <&g…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 720 visitas
  12. Hola, ¿Cómo podría ordenar una Tabla dinámica por fechas, respetando el orden de las columnas? Dispongo de una Tabla excel que tiene asociada una tabla dinámica. Desde la primera columna de la TD (formato texto) puedo ordenar de mayor a menor o de menor a mayor, pero no puedo ordenar por otra columna que no sea la primera. En concreto lo que necesito es poder ordenar por fecha (Campo 3) de la más reciente a la menos reciente, respetando el orden de las columnas. A través de macros lo he intentado, per no funciona: Sub OrdenarTD() With ActiveSheet.PivotTables("TablaDinámica1").PivotFields("Campo 3") .AutoSort xlAscending, "Campo 3" End…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 720 visitas
  13. Started by jhon fredy,

    hola expertos como puedo modificar el principio de este codigo con la idea de transpasar no solamente los dato de la columa B sino tambien los datos de la columna A,B,C Sub zero() Dim ultimaCeldaDatos As String 'hallar la ultima celda con datos de la columna B de la hoja estadistica ultimaCeldaDatos = Sheets("analisis").Cells(Rows.Count, 2).End(xlUp).Row 'copiando datos de columna B Sheets("analisis").Range("b5:b" & ultimaCeldaDatos).Copy Sheets("archivo").Select 'posicionando en la celda donde pegare los datos en la hoja archivo Sheets("archivo").Cells(2, Columns.Count).End(xlToLeft).Offset(0, 2).Select Selection.PasteSpecial Application.CutCopyMode = False …

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 720 visitas
  14. Started by karla12,

    Okayy, uhm, ¿alguien por favor me podría ayudar con una tarea, por favor? No sé nada de macros, lo único que tengo hecho fue por ayuda de una amiga, pero ella ya no sabe como hacer lo siguiente: Mi tarea es hacer una ficha de búsqueda de "biblioteca". Y lo que tengo que hacer es que en la hoja uno (inicio) escribiendo en las casillas de a lado o el autor, color, código, título, fecha (alguno de ellos, no escribir en todas), presione botón "buscar" y me dirija a la hoja 2 (base de datos), y seleccione lo que haya pedido. Estoy demasiado perdida. infooo..xlsm

    • 0

      Reacciones de usuarios

    • 3 respuestas
    • 720 visitas
  15. Hola de nuevo a todos. Sigo construyendo mis simulaciones genéticas. Quiero generar la forma en que se observa un carácter en un individuo a partir de la información que este contiene (disculpa @Antoni pero me resulta complicado ser conciso con este tema). Adjunto un archivo con un ejemplo de lo que quiero conseguir. https://1drv.ms/u/s!ArSI6ZjR1bGVlYRKJdj0eGq5jDa87Q Partimos de: Unos caracteres ya definidos (hoja naranja “Color_y_tamaño_flor_CL”). La definición de caracteres condiciona como se expresa el carácter y el código tendrá que buscar en la hoja de caracteres los diferentes parámetros de expresión. Esta definición implica: …

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 720 visitas
  16. Hola a todos. Soy nuevo en este foro, y quisiera consultar una duda que tengo: He escrito unas lineas de codigo para guardar una hoja de excel a pdf en una carpeta dandole un nombre segun el valor de unas celdas y necesito saber como hacer para que me salga un mensaje de error de si quiero duplicarla o no. Gracias.

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 720 visitas
  17. Hola estimados maestros, Buenos lo que quiero hacer es un reporte por N° Pedido junto con los items que contiene cada pedido. Primero: Ejecuto el Formulario (Form_Reportes) en lo cual Hago la Consulta según los criterios de Option Boton y me arroja al ListBox la Informacion de la Hoja "CONSOLIDADO" (lo cual contiene sumas Totales). Segundo: Al Oprimir el Boton "Imprimir" quiero que me genere todo los items del ListBox mas sus detalles (es decir que artículos está incorporado en el N° Pedido), para mas entendimiento a lo que requiero adjunto un Imagen. El problema viene en el Segundo punto, lo cual no encuentro la lógica de como hacer un reporte como l…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 720 visitas
  18. Started by gustav2704,

    Hola.Estoy intentando crear una macro que con una entrada como esta ( 01/01/2013) me diga a que mes hace referencia en una celda (enero, para este ejemplo) y en otra el año(2013). He intentando con sentencias como MONTH(), MONTHNAME(), pero no logre nada debido al formato en que lo ingresé (dd,mm,aaaa).Agradezco su colaboración

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 720 visitas
  19. Started by perezreina,

    Buenas tardes...ésto si que es un reto, llevo semanas dandome cabezazos contra el monitor, supongo pq seré muy torpe. a ver quien me puede ayudar. He creado una macro que introduce unos numeros de cartera en una ficha q desps me guarda en pdf.. el codigo es asi... Range("C1:E1").Select ActiveCell.FormulaR1C1 = "NÚMERO CARTERA" Range("C2").Select ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Documents and Settings\USUARIO\Desktop\pdf\NOMBRE ARCHIVO 00.pdf", Quality:= _ xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _ OpenAfterPublish:=False ...ésto se repetiria para cada numero y archivo por lo que es muy…

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 719 visitas
  20. Estimados Estoy trabajando en un formulario con cuadro combinado, el cual ya sé como desplegar una lista de valores. Mi duda es la siguiente como puedo bloquear cualquier texto que se escriba dentro del cuadro combinado (comboBox), que no corresponda a los valores de la lista seleccionada. Cualquier duda estaré atento a sus comentarios. Desde ya, muchas gracias por su ayuda.

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 719 visitas
  21. Invitado MARTHA PARRADO
    Started by Invitado MARTHA PARRADO ,

    Hola buenas tardes Me gustaría saber como puedo asociar una macro a una casilla que tiene el resultado de la formula Buscarv

    • 0

      Reacciones de usuarios

    • 1 respuesta
    • 719 visitas
  22. Hola a todos. Trato de explicaros lo que necesito. En la hoja tengo una celda donde voy a introducir una cadena de texto. Lo que necesito es una macro que compruebe si el texto de esa celda está en el nombre del documento. Imaginaros: Tengo en la celda 123456. Si el documento se llama 'Documento 123456 Provisional.xlsx', me tendría que salir un mensaje de 'OK'. Si en el nombre no estuviera esa cadena '123456' me tendría que salir un mensaje de 'Renombre el fichero con la el nº de documento'. No sé si para hacer esto sería con el Cells.Find... no sé, ando un poco perdido. El fichero adjunto es un poco simple, pero no se me ocurría que poner para hacerlo algo más compl…

    • 0

      Reacciones de usuarios

    • 2 respuestas
    • 719 visitas
  23. Saludos tengo un gran problema y es que debo hacer que un Userform de un libro1 con un spreadsheet en este Userform me envie unas filas a otro libro(libro 2).. por ahora es solo esto. Tengo el spreadsheet ya montado pero aun no el codigo porque no se que poner. adjunto el libro uno con el formulario y el spreadsheet en él y el libro 2 el cual recibira los datos organizados que esten dentro del spreadsheet. advierto que se podrian necesitar librerias que permitan mostrar el spreadsheet en el userform, aun no lo se, ya que desde el equipo de la empresa lo puedo ver pero desde el de mi casa no(supongo que es por eso) gracias Desktop.zip

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 719 visitas
  24. Hola a tod@s. Me adelanto dando las gracias por su tiempo en ayudarme en mi caso. Tengo una macro que extrae información de la página web de venta de autos el problema está en extraer ciertos secciones por ejemplo: details, features y specifications. <div class="tab-content" id="sections-contents"> <div class="tab-pane fade" id="details" role="tabpanel" aria-labelledby="details-tab" data-webm-section="features-tab-details"> <div class="tab-pane fade" id="features" role="tabpanel" aria-labelledby="features-tab" data-webm-section="features-tab-features"> <div class="tab-pane fade" id="specifications" role="tabpanel" aria-labelledb…

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 719 visitas
  25. Started by VanessaRodriguez,

    Hola a todos, Quisiera saber como puedo usar una macro, para sustituir el uso de formulas y solo copiar los valores. Adjunto un ejemplo con los datos a los que se quiere llegar, el ejemplo abarca tres meses; por favor si hay dudas estoy muy atenta. Gracias! Vane. Copia de Ejemplo_Macro.xls

    • 0

      Reacciones de usuarios

    • 0 respuestas
    • 719 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.