Buenos días a los integrantes de este foro, en esta ocasión recurro a Uds, para que brinde su apoyo en como mejorar la siguiente macro que describo a continuación, dicha macro permite exportar dicha información a una plantilla en diseñada Word, pero mi problema esta en dicha tabla no solamente puede contener 6 filas sino muchas en la sentencia: Worksheets("TELECREDITO").Range("A1:D7").Select y lo que se requiere es dicha tabla que está en Excel exporte la cantidad de filas que contenga a la plantilla del archivo Word en forma automática y que el siguiente párrafo del archivo Word no sea alterado para lo cual adjunto imagen, también quisiera saber como puedo q…

La macro que estoy haciendo tiene dos listas en la columna a y otra en la columna b. con los nombres del rango de la columna "b", se van a crear unos libros con los nombres de esa columna, ese rango es nombrado como "sec_operativo". cuando se crea la hoja se va a copiar unas tablas dinamicas la cual se llena con informacion de los nombres de la columna "a", y tiene un nombre distinto, pero equivalente al de la columna b. es decir; cuando se crea el libro "san_pedro", en la tabla dinamica se debe filtrar colocando "58 - san pedro" deberia salir asi: sale asi: y me sale este error esta es la…

Buenos dias, Les rogaria me pudieran ayudar en esta duda. Tengo algunos excel en xls que los tenia en otro ordenador (que si los abre), al pasarlos a otro con office 2010 no se abren ni cambiando el archivo a xlsm. me dice que el formato de extension no es valido.Les adjunto uno de ellos. agradeciendo de antemano su ayuda- Luis Buscador2.xls

Buenas tardes! A ver si alguien sabe ayudarme... ? Si tenemos una columna, cuyas celdas siempre contienen "C" o "D", ¿cómo puedo localizar la última "C" de la columna? Si: - La última "C" no tiene por qué coincidir con la última fila. - No podemos saber cuántas filas, ni cuántas "C" o "D" habrá. Es decir, que hay que evaluar todas las celdas de una columna, cuyo número de filas es desconocido y seleccionar la celda cuyo valor sea C y no haya más celdas después con C, aunque sí puede haber anteriores celdas con ese mismo valor. Gracias!

Buenos días, Les comento que hace unos meses un usuario me realizo una macro, la cual hasta ahora me ha funcionado de maravilla. El problema que presento ahora es el siguiente, descubrí que si no hay datos en la Columna M la macro no realiza el proceso. Hoy utilizare esta misma planilla, pero en la columna M no existirán datos. Alguien puede revisar la formula y ver la forma de modificar eso, las otras columnas seguirán intactas, solo la M es la que ya no tendrá datos. Concatenar valores Vba_GP.xlsm

Buenos días; Ayer me surgió un pequeño problema en la macro que estoy montando, os comento para ver si me podéis ayudar. Al intentar hacer una consulta sql de un Excel nuevo ( sin guardar ) me está dando error en la ruta ( al no estar guardado no tiene ruta ) y no sé cómo ponerlo. Esto es lo que he puesto pero sin éxito. Excel_Nuevo = ActiveWorkbook.Name RutaExcel = "Data Source=" & Workbooks(Excel_Nuevo).Path & "\" & Excel_Nuevo & ";Extended Properties=""Excel 12.0;HDR=Yes;""" Adjunto excel. Gracias y un saludo, Libro3.xlsm

buenas noches, soy sonia y tengo una gran duda necesito vuestra ayuda. estoy haciendo una calculadora de primas, y he hecho una macro para que vacie las celdas y a su vez devuelva el valor 0 a las celdas borradas. hasta ahi bien, pero cuando pongo un nº en dos celdas determinadas (C20 y C21) la formula que esta en la celda N4 no calcula, para que haga el calculo tengo que poner yo misma en las celdas C20 y/o C21 un 0. no se si me he explicado bien..... adjunto fichero. Gracias! calcu_precartera.xlsm

Buenas noches, estoy haciendo el código de una macro y pese a que estoy consiguiendo que "funcione" no estoy contento con el código. En la macro "SumaSiFrutaVendedor" la columna de la fruta es dinámica y nos podemos encontrar que en ocasiones haya 3 productos como 10 diferentes. Me gustaría conseguir que cuando inserto la línea del "sumIfs" sea dinámica y se adapte al rango de la cantidad de frutas diferentes, lo estoy pensando, pero no veo como ahorrar líneas de la macro... Estoy empezando con el vba y ando perdido cualquier ayuda será bienvenida para seguir aprendiendo. Saludos PruebaVendedor.xlsm

Ando Atrapado En Mi Proyecto De Control De Almacén en un pequeño error de que no puedo mostrar mas de diez columnas en mi listbox y no se como solucionar ese error lo deje comentado en el listBox programación dejo el archivo para ver si alguien me puede apoyar y pues si el archivo les sirve os dejo como obsequio INVENTARIO.xlsm

Hola a todos; Corregirme si me equivoco o se puede mejorar la macro que adjunto. La idea es que yo solo pueda seleccionar un número limitado de imágenes. Para ello he añadido (aparte de las imágenes) dos TextBox, uno funciona como contador y otro como límite de imágenes a seleccionar. -Cuando llego al límite marcado ya no me deja seleccionar más (el límite para la prueba he puesto 5 pero se puede cambiar) -¿Qué pasa si quiero cambiar la imagen seleccionada porque no me gusta?. Pues hacemos clic derecho con el mouse y la nos la descuenta y así podemos seleccionar otra /s siempre y cuando no pasemos el límite establecido. Para este caso he us…

Estimados buenas tardes, Estoy con un combobox cargando datos de tabla de access. Si agrego Fields(0) , Fields(1), como esta pensado en el algoritmo que copio a continuación , los carga en filas diferentes de esta manera 3 Dato1 4 Dado 2 2 Cuando 3 es el Id de Dato 1 y 4 es el Id de Dato2 La idea es que al seleccionar el nombre se obtenga el valor del Id correspondiente en una variable Esto es a efectos de obtener el id para agregar datos en otra tabla Aguardo su ayuda Muchas gracias Private Sub CargoComboAccess() Dim cn As Object Dim datos As Object Dim consulta…

Buenos días!!! Me estoy volviendo majara porque no veo el error. En el archivo que he subido, en la macro modificar, me sale error de compilacion en la siguiente línea: Fila = WorksheetFunction.Match(Sheets("Datos").Range("A2"), Sheets("Datos").Range("A1:A" & UF), 0) La cosa es que funciona todo perfecto!!!!! y si toco lo más mínimo deja de funcionar y ya tengo la cabeza a reventar.... Es para dar un pequeño cursillo a mis compañeros (los datos de la BD son ficticios no pasa nada...) y claro...que me salga un error no queda bien...pero es que no veo qué está mal!!! Si me podéis ayudar y me explicáis el error os lo agradecería!! …

Buenas tardes estimados, tengo la siguiente macro donde quiero que al seleccionar el checkbox1 me ejecute el primer procedimiento de lo contario siga al siguiente procedimiento, pero me esta tomando el valor en la casilla de adicion del segundo procedimiento. Agradezco me puedan orientar gracias. Sub Dedicion() dim sh1, jh2, jh3, jh4, jh5, jh6 as Worksheet If sh1.CheckBox1.Value = True Then Set jh5 = Workbooks.Open("\\10.7.10.1\calidad\RegCalidad 2024\Molienda de Cemento y Empaque\Base datos Cementos producido 2024.xlsx", ReadOnly:=True) Set jh6 = Sheets("MEZCLA ADICION") jh6.Activate jh6.Cells(4, "A").Select JFila = ActiveCell.Row …

Buenas noches al foro, Os pido ayuda con un codigo que he encontrado y que no soy capaz de poder csmbiarlo para que me sirva. Os explico, el codigo que os muestro me realiza la siguiente operacion, me copia lo que tenga en la hoja 1 el la celda E2 en la hoja 8 en la colunma c y luego lo que tenga de la hoja 1 desde E11 a E 58 en la hoja 8 debajo de lo ultimo escrito en la columna C, hasta hay practicamente correcto( digo practicamente porque de E11 a E58 existen una serie de campos vacios que me gustaria que los obviara pero no se como), pero para el siguiente registro me vuelve a copiar todo el nuevo registro en la hoja 8 en la columna C a partir de la ultima celda va…

Hola que tal soy nuevo en este foro y estoy muy frustrado porque no se la manera de crear una BD para realizar conteos ciclicos. Les voy a explicar mas a detalle: Cuento con una lista de 17,228 productos los cuales necesito realizar una macro para realizar aleatoriamente conteos ciclicos, por ejemplo los productos con un valor de $0.01 a $250.00 les asigne la letra C, los productos con un valor de $251.00 a $1,000.00 les asigne la letra B y los productos con un valor de $1,000.00 a 10,000. Productos A realizar conteos mensuales B realizar conteos trimestrales C realizar conteos anuales Lo que necesito es que me vaya dando aleatoriamente y sin duplicados X numero de…

Hola, amigos Nuevamente estoy aquí en el foro para pedirle un favor, en este link hay un archivo que no es de mi autoria, sin embargo vale la pena que algunos de nuestros expertos en macros pueda corregir el error que presenta, aunque no se si es muy complicado, sin embargo luce bastante atratactivo, ojala puedan echarle un vistazo, y si tiene la oportunidad cargarlo ya corregido, de antemano agradezco cualquier ayuda que puedan prestarnos. https://skydrive.live.com/redir.aspx?cid=b9962751c075a6a6&resid=B9962751C075A6A6!1460&parid=B9962751C075A6A6!148&authkey=!AFWMmKjcoDSOohk

Hola amigos, espero estar siguiendo bien las normas del foro. Les explico, tengo un listado de "datos importantes" en una de las hojas del archivo Excel. En la otra tengo simplemente la hoja de entrada de datos por parte del usuario. La idea es que ingresará los datos en X rango, es decir, es arbitrario ese rango, pero lo importante sería poder comparar lo que ingrese el usuario, con los valores en la lista de "Datos importantes". De tal forma que si el usuario ingresa un dato considerado importante, la celda en la que lo ingrese se pinte de cierto color, y además aparezca un message box avisándole que es un dato importante. Esto lo quiero hacer porque el listado real es…

Hola Tengo un problema con un archivo de excel, la extensión es xls y cuando lo intento abrir me sale este error <?xml version="1.0" encoding="UTF-8" standalone="yes"?><recoveryLog xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main"><logFileName>error049200_02.xml</logFileName><summary>Se han detectado errores en el archivo "C:\Lina\Universidad\Semestre VII\Fundamentos de procesos\Trabajo final\Secadero.xls"</summary><additionalInfo><info>Este libro ha perdido su proyecto de VBA, los controles de ActiveX y todas las demás características relacionadas con la programabilidad.</info></additionalInfo>…

Buenas noches a todos, Necesito ayuda, estoy haciendo un excel en VB para hacer presupuestos y me quedado encallado en lo siguiente... Estoy metiendo unos CODIGOS, DESCRIPCIONES, CANTIDADES, PRECIO COSTE, MARGEN, PRECIO DE VENTA, ETC.. en un ListBox. Cada cierto tiempo he de ir sumando (Con un Boton) en otra fila el total hasta ese punto (TOTAL PARTIDA), luego sigo añadiendo artículos y le vuelvo a dar en añadir PARTIDA, pero no consigo sumar desde la ultima fila que ponia TOTAL PARTIDA hasta la ultima que añadi. OS adjunto una imagen para que os hagais una idea y el código. Gracias Un saludo. Private Sub CommandButton7_Click() Dim i As Byte, tot As Currency For …

He estado revisando varias páginas por internet y, si entiendo bien, no es posible exportar de forma directa contenido web a excel (o al menos no siempre). Lo que planteo en este post es diseñar una macro que me permita acceder al enlace indicado en el archivo adjunto donde he de introducir unas claves. Elegir la opcion de exportar a un excel y que se copie sin problema. Adjunto un archivo en formato zip con el diseño de la página porque al hacerlo del modo normal se vuelcan una serie de campos ininteligibles. Agradeceré cualquier opcion que puedan darme. Buenas noches turnos_word[1].rar

Excel 2010 se pone lentisimo al ejecutar macro Buenos dias, amigos. He creado una macro en Excel 2003 para imprimir en PDF tomando como nombre del archivo el valor de una celda (es un correlativo), la cual funcionaba maravillosamente, sin embargo, acá en el trabajo hicieron unos cambios y le instalaron a mi PC el Office 2010 y ahora en el nuevo excel (2010) trato de correr esta macro y se tarda muchisimo, incluso el programa deja de responder y despues de 10 a 15 min es que funciona la macro, quisiera saber por qué es esto y que me den alguna sugerencia o recomendación para resolver este problema. Nota: La macro con problemas es la que se ejecuta al presionar el boton …

Buenos días; Me acaba de surgir un problema en la macro que estoy haciendo y por mas que lo he dado vueltas no he conseguido solucionarlo, a ver quién me puede echar una mano. Tengo varios datos que tengo que transformar en fecha los datos son como el siguiente " 18/04/13/ 0", primero reemplazo “/ 0” por nada y luego quito el espacio que tiene al principio, una vez realizado esos 2 pasos ya tiene el formato de fecha, si lo hago sin macro el Excel solo me pone “18/04/20132, pero si lo hago desde la macro se me queda así “18/04/13” y con el símbolo de error para que elija entre convertir en xx en 20xx o en xx en 19xx. Como podría hacerlo con una macro??. Muchas gracia…

Buenos días quisiera que me ayuden a actualizar una tabla dinámica mediante una macro, o sea que cuando inserte una nueva fila al final del origen de datos, que es una tabla, me actualice la tabla dinámica, obvio que agregando esa fila. Espero que puedan ayudarme Agradezco su ayuda de antemano. Saludos Ejemplo.xls

Soy nuevo en esto de las macros asi que Vamos a ver si me explico: Necesito que al aplicar la macro, busque los archivos cuyo nombre se encuentran en las celdas A1, A2, A3, A4... (por ejemplo) y el directorio sea fijo, y las copie a otro directorio fijo. Como variable solo estarian los contenidos de las celdas, en las que tendriamos que poner el nombre del archivo con la extension. de antemano se los agradesco mucho.:smug:

Buenos dias, Adjunto el fichero el cual contiene una macro, lo que hace es que a partir de los datos que tengo, meta una fecha de inicio y una fecha de fin filtrando asi el campo vencimiento de contrato, y que estos datos se me copien en otra pestaña para realizar una serie de cualculos (pestaña informe). Mi problema viene que si ejecuto la macro y pongo: FECHA INICIO: 28/09/2012 FECHA FIN: 28/12/2013 La persona del ejemplo la cual tiene dos tramos, una vez me pone su fecha de vencimiento de contrato el 12/08/2013 y si la ejecuto otra vez me sale 08/12/2013, si la vuelco a ejecutar vuelve a la primera fecha y asi todo el rato. No se pq pasa esto en la otra fec…