Encontré esta web y me gustó mucho, explico mi caso -use una macro, para que se genere una nueva pestaña y ahí se cree una tabla dinámica, basada en los datos de otra hoja, es decir la macro crea la pestaña y la tabla dinámica, para esto la macro también elimina cualquier pestaña que se llame "tabla dinámica" antes de crear la nueva, elimina la anterior y genera la hoja y la tabla dinámica nueva. -a su vez hay otra hoja (llamada “datos”) que tiene una columna donde use la formula buscarv, y la formula busca un dato en la pestaña que creo la macro automáticamente, la que se llama “tabla dinámica” =SI.ERROR(BUSCARV(B5,'tabla di…

Enviar Email masivo desde excel con Body distintos el problema que me sugiere es el siguiente. En fila F (Causa) a la hora de correr la macro esta siempre me da el resultado de la F2, ya que cada destinatario la causa es diferente, la macro va ligada con (asunto & Causa & con un mensaje de despedida). Gracias por adelantado. EnviarEmail.xlsm

Buenas tardes Agradeceré nuevamente de su ayuda Tengo un rango de valores que van cambiando, ya que están vinculado a una serie de operaciones. He confeccionado una fila auxiliar para que los errores de la fila anterior se conviertan en FALSO Lo que estoy buscando es: 1- una macro para borrar los datos de las celdas que dan error o 2-una macro para forrar los datos de la fila auxiliar con el texto FALSO Desde ya muchas gracias todos

Team, Un favor, me podrían ayudar asesorandome para mejorar una macro, en esta lo que he tratado de hacer es que me pase datos de varias hoja a una sola. 1.- La macro del archivo DatosDiscos.xlsm me importa archivos de TXT y me genera un libro nuevo que en este caso se llama ResultadoDatosDiscos.xlsm, por cada TXT hay una hoja con sus respectivos datos, misma estructura todos. Cada TXT correponde a un día de un determinado mes, en este caso solo adjunte 11, pero como puedo tener 30 o 31. 2.- La macro con la que quero que me ayuden es la que esta dentro de la hoja DatosDisco1 del libro ResultadoDatosDiscos.xlsm, esta macro lo que hace es copiarme por cada hoja, los dat…

Hola compañeros. Tengo en un directorio muchos ficheros excel, todos llevan un libro, todos tienen tres columnas NOMBRE, APELLIDOS Y EDAD, en ese directorio tengo 200 archivos excel todos con el mismo formato. pUES ese contenido de los excel, quiero tenerlo todo en un único excel, que tendrá el mismo formato, NOMBRE, APELLIDOS Y EDAD. que contendra 200 filas, porque son 200 excel, ¿Cómo podría hacerlo eso con una macro? Hola, intento aclarar a) La primera hoja representará la información que contiene el primero de tus 200 archivos (solo bastará que muestres no más de 10 líneas; El formato de mi hoja excel destino es destino.xls NOMBRE APELLIDOS EDAD, eso sería el …

Hola a tod@s de nuevo Como ya he dicho antes no tengo casi nada de idea de excel,asi que voy bastante perdido. Estoy trabajando en un libro para hacer escandallos de los trabajos que realizo, l que quiero hacer es copiar unas celdas que se repiten en todas las hojas y colocarlas en otra como una tabla y si se puede (que no lo se) despues de la tabla poner las imagens que inserto en cada hoja. he mirado en el foro y he visto un tema antiguo que pedía lo mismo que yo, he mirado la formula y como si viera chino,a si que os pido ayuda para ver si puedo conseguirlo. os adjunto un archivo de ejemplo para que veais la formula (es el modulo 5) para que me expliqueis lo que te…

Necesito crear una funcion que me obtenga el total de una columna en un listbox. Pero que yo le pueda pasar como parametros el formulario, el nombre del listbox y el numero de columna y me devuelva como resultado el total del listbox. No se si los parametros se deben pasar como texto y de que forma. Mas o menos con esta estructura. Les agradezco de antemano su ayuda. Public Function totalcol(ByVal columna As Integer, ByVal formulario As TextBox, ByVal control As TextBox) end function

Hola buenas tardes ojala haya alguien que me pueda ayudar, tengo un archivo en el cual tengo un Userform que realiza vaciado de datos en las celdas que indíco y asu vez cálculos. Pero al finalizar no me toma llamar Call Condicional_Else2, cada que pongo otra condición al finalizar no la toma en cuenta. cual será el problema en esta macro?. Saludos. Sheets("Factura Carta").Activate Range("C23:M36").Select Selection.ClearContents Range("C23").Select ActiveCell.Offset(0, 0).Value = UserForm14.TextBox2 ActiveCell.Offset(0, 2).Value = UserForm14.TextBox3 ActiveCell.Offset(0, 3).Value = UserForm14.TextBox4 Range("C24").Select ActiveCell.Offset(0, 0).Value = UserForm14…

Buenas tardes, Soy nuevo en este foro ya que me ha parecido muy interesante y me ha resuelto varias dudas, aunque tengo una de la que no sé como solucionarla. Verán, les adjunto un ejemplo de mi problema. Les explico, En una hoja excel tengo varios datos de clientes, el caso es que , como verán en el fichero adjunto, hay dos columnas, una con el numero asignado al cliente, y otra con la letra. La letra se asigna dependiento del valor del numero, la letra A se asigna si el valor del numero es entre 300 y 400. Y la letra H para números por debajo de 300. El caso es que puede haber errores como los resaltados en amarillo, y quisiera saber como hacer una subrutina en …

hola resulta que tengo una base de datos y quiero una macro que me copie todo el contenido y luego lo pegue en otra hoja, pero que lo haga por año, por ejemplo nombre año gabriel 1991 antonio 2000 eso que lo pegue en otra hoja así nombre año nombre año gabriel 1991 antonio 2000 ....... ........... asi me los agrupe por año, son muchos datos y quiero ver si asi es mas eficiente, porque tengo mas de 100 mil filas hacia abajo gracias ayuda con macros.rar

Hola. Saludos a todos. Tengo dos hojas una se llama saldos y la otra resumen. La hoja saldo la obtengo de un reporte web donde la paso a excel y le aplico filtros. En esta hoja sale información de saldos de varias cuentas ordenadas. Ejemplo de la 1 a la 100. Y cada linea con su saldo. En la hoja resumen necesito trasladar esos saldos pero no son todas la cuentas que salen en la hoja saldos. No se si me explico bien. En resumen es tralasra saldo de hoja saldo a la hoja resumen , pero filtrando las cuentas en la hoja saldo , por que no las necesito todas en la hoja resumen . El archivo es muy grande para subirlo. Agradezco ayuda o sugerencias

aqui con la insertidumbre y pues como propuesta de tema pero la verdad a nivel de codigo no tengo idea de como se haga, y es el como se podria hacer que al meter un texto en una celda se pueda distinguir de algun tipo de acronimo, que si por ejemplo tengo: AP/PGR/DDF/...etc etc me pueda distinguir AP/PGR/DDF/ y aasi lo pueda yo condicionar o que si por ejemplo meta el texto 44558/2012 me distinga que antes de 2012 que va un numero. espero haberme explicado, con la intencion de que este tema se amplie y pueda concretarse y poder cortar mas tela del mismo.

Me gustaría saber si es que se puede, que al arrojar distintos valores en una celda (ya que esta relacionada con distintos items, datos y numeros). Estos se copien en otra hoja u otras celdas, y que se sumen esos distintos valores que se van indicando en esa celda única. Ojala exista alguna solución, Saludos desde Concepción-Chile FINAL ensayo.rar

Hola amigos! Me encuentro una vez mas por este foro, requiriendo su ayuda generosa.... me encuentro con la siguiente dificultad: Necesito agregar a una planilla en formato "Hoja de cálculo habilitada para macros de Microsoft Office Excel (.xlsm)" un correlativo que al abrir el archivo se actualice automáticamente y que ademas al guardar el archivo me arroje por defecto un formato predeterminado... buscando por este foro me encontré con el siguiente código: Private Sub Workbook_Open() Range("I1") = Range("I1") + 1 'Anota en la celda I1 el numero de archivo a guardar Application.Workbooks("Sat").Save ' Salva el archivo para poder asignar numeros consecutivos Ruta = "C…

Hola a todos como podria hacer que este codigo busque tambien el nombre la celda en las subcarpetas despues de la carpeta "lista" Sub copiar_jpg() Dim Celda As Excel.Range With CreateObject("Scripting.FileSystemObject") For Each Celda In Range("b4:b13") .CopyFile ThisWorkbook.Path & "\lista\" & Celda, ThisWorkbook.Path & "\proyeccion\" & Celda End With End Sub[/CODE] gracias

Buen día muchachos! Tengo un gran conflicto (resulto de una manera que no quería y por eso estoy en búsqueda de sus conocimiento) a resolver. El tema es el siguiente, nosotros tenemos un formulario interno el cual debe tener una numeración correlativa y única, hasta ahora se venía haciendo de la manera más precaria (pero efectiva) que era la de llevar un listado y manualmente asignarle el número, lo cual lleva una pérdida casi absoluta de tiempo. Por eso, lo que estoy buscando es algo similar a lo que logro hacer usando Excel y Word, pero quiero solamente resolverlo en excel. El tema por ahora lo vengo manejando con una lista de "direcciones (números 1, 2, 3, 4, 5...)" en…

Buenas noches expertos, mi pregunta es si conocen como se puede tomar una foto desde un userform utilizando la webcam, es decir estoy tratando de crear un registro de usuarios y por el momento tengo un boton con el comando getopenfile para buscar el archivo, sin embargo me gustaria tomar la foto al instante en que registro un nuevo cliente. Muchas gracias en adelantado. Saludos.

Estimados Agradecere me puedan ayudar, necesito crear una macro que me realize un folio automaticamente, y que al momento de guardar quede con un nuevo nombre. Pero, que al reabrir un archivo maestro, no pierda el folio consecutivo. He leido varios foros pero no he podido sacar esta duda. desde ya gracias. RQ.rar

Existe alguna macro que desactive las opciones de una hoja o todo el libro de: Mover o copiar Eliminar Color de etiqueta. “Tal vez me escriban pero si con solo PROTEGER LIBRO todo eso se resuelve”; pues si lo hace pero hay un problema mis macros no funciona y no sé por qué no funciona, me salen errores y si lo guardo en solo PROTEGER HOJA todo funciona bien. Tal vez alguien tenga o sabe alguna macro. No permitir agregar nuevas hojas Deshabilitar eliminar hojas; estos 2 últimos si pille macros para que haga eso y funciona bien. Entonces faltaría deshabilitar estas opciones: Mover o copiar. Color de etiqueta. Recuerden que la opción de …

Buenas tardes Me podrian ayudar con esto. Me pidieron que hiciera un consolidado de varias hojas(6) de varios archivos en uno solo para realizar un grafica consolidada. El consolidado se llama Diagnostico zona 1 y los otros es de donde tomo la información. Lo hice manualmente mediante suma, esto se puede hacer mediante un macro? y que quede para una numero indeterminado de archivos . Anexo el ejercicio.( no me deja por el peso) http://www.mediafire.com/file/l6c4c6wiw9kbbc6/Grafica+consolidada.rar Muchas gracias por su ayuda.

Buenas tardes. Tengo en excel un macro con el que imprimo un ticket y tras imprimir el ticket automáticamente se abre el cajón portamonedas. El cajón portamonedas he logrado abrirlo a través de las propiedades de la impresora que es de la marca AV Pos modelo P-83. No obstante, me gustaría hacer una macro que abra solo el cajón portamonedas sin necesidad de imprimir. El cajón que tengo es el HS-410. ¿Hay alguna forma de hacer esto? Gracias.

Hola, ¿hay alguna macro o forma de automatizar este proceso? Estoy usando esta extensión gratuita de Email Extractor para conseguir correos electrónicos de los sitios web: https://chrome.google.com/webstore/detail/email-extractor/jdianbbpnakhcmfkcckaboohfgnngfcc El problema es que para hacer el scrape (en este caso copiar y pegar esos E-Mail ID's) tengo que visitar cada pestaña...¿hay alguna manera de configurar una macro para que visite cada pestaña/url de sitio web y copie y pegue los emails de cada pestaña/sitio web para no tener que hacerlo manualmente?

Buenas noches a todos, Llevo todo el dia buscando una solucion pero no la encuentro. Tengo un libro excel con muchos hoas como base de datos de registros de telefonia movil. En el primer sheet es donde se introducen los datos en celdas y con un commandbutton los graba a sus respectivos sheets dependiendo del tipo de registro. El tema es que quiero abrir el excel con un userform para hacerlo mas bonito y sencillo visualmente para que lo usen terceras personas, y todo lo tengo perfecto exceptuando cuando tiene que grabar los datos ya que no se como llamar al commandbutton situado en el primer sheet del libro desde el userform para que ejecute todos los procesos que este co…

Hola a tod@s, Tengo esta macro que funciona perfectamente, que renombra las hojas según el listado de nombres de la hoja "AA_Nombres": Sub renombra_hoja() Dim Hoja As Worksheet Dim Fila As Long Fila = 5 For Each Hoja In Worksheets Hoja.Name = Cells(Fila, 3) Fila = Fila + 1 Next End Sub ¿Se podría modificar la macro para que en vez de renombrar la hoja, pegue el nombre en la celda A2 (por ejemplo)?

Hola amigos Tengo este problema Tengo un rango que ordenar automáticamente. Pero no consigo que me ordene por los nombres. Me esta ordenando por la columna de las calificaciones. Estoy colocando Sort key1 pero ordena pero la columna 3 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 3 Then With Range("A:C") .Sort key1:=.Cells(1, 3), Header:=xlYes End With End If End Sub Saludos Calificaciones.xlsm