Muchas gracias a todos por su tiempo y su ayuda, tengo el siguiente codigo para abrir un archivo de RTF (word) e imprimirlo. Sub Abre_word_imprime_cierra() With CreateObject("word.application") .Visible = False With .Documents.Open("C:\Users\erick\Desktop\archivo.rtf", , , , "password") .PrintOut .Close False End With .Quit End With End Sub Quiero ver si me pueden ayudar con 2 cosas 1 Que imprima 4 paginas en una sola pagina. 2 Que imprima en automático todos los archivos *.rtf de la ruta C:\Users\erick\Desktop\imprimir\ Nota: Los archivo no estan protegidos Muchas gracias por su ayuda!!!

hola...mi gran agradecimiento a este foro ..hace unos dias recibi solucion a un tema y en esta ocasion los molesto con lo siguiente..necesito que me orienten a encontrar una macro que me valide 3 textbox y que en un listbox me envie el resultado de la busqueda que los llamaria desde una celda en la cual ya le he puesto la funcion SI.ERROR(BUSCARV..subo un ejemplo para que se den una idea. Desde ya muchas gracias validar textbox.xls

Hola a todos. soy nuevo en este foro, pido su ayudar para elaborar un formulario, que obtenga datos de una hoja llamado catalogo y que ademas me realice movimientos dependiendo de la cuenta seleccionada, espero sus opiones, y dejo aqui el archivo para que vean que contiene. de antemano mil gracias.. Libro3.xls Libro3.xls

Hola a todos. Tengo en un Excel datos por provincia (52 en total) que debo traspasar a una slide de powerpoint, que tiene una imagen del mapa y los 52 shapes creados y colocados en su posición para recibir esos datos. El problema es que no sé cómo hacer la copia directa de celda de Excel al shape con su nombre. Ejemplo: pasar celda A1 del Excel a la slide 2 del powerpoint, pero al shape que se llama “Alicante”. Hasta ahora tengo que recorrer la lista de shapes de esa slide y buscar el nombre por cada dato y eso complica el rendimiento, que pasa de 52 accesos directos a 52x52 con el proceso. ¿Alguien sabe como pasar una celda de Excel a un shape de una slide del que y…

hola quiero hacer una macro, en la cual pueda aplicar una formula CONCATENAR varios registros. a b c 1--- pedro martinez rodriguez =concatenar (a1;b1;c1) Como lo puedo hacerlo en una macro ya que son muchos registros. Gracias.

Buenas tardes. He logrado adaptar un filtro horizontal de columnas a mis necesidades a traves de una tabla dinamica. Con los campos texto no hay problema. El problema viene cuando lo que queremos filtrar son fechas. Por lo que veo .PivotItems adopta la fecha en formato ingles. en las columnas ha filtrar lo he solucionado conviertiendolas a texto: dim str as string:str = c.value: set pi= Set pi = .PivotItems(str) el problema es con el origen de la tabladinamica donde para que funcione tengo que añadir un ' a cada fecha y de esta manera convertirlas en texto He probado de todo.............incluso cambiar la tabla dias a un formato de fechas no …

Abrir un Libro2 al rellenar una celda en Libro1 Hola a todos Tengo un Libro_1, en la celda A1 tengo la ruta del libro que quiero abrir, es variable (libro2......), y quiero que se abra al rellenar la celda A2, tengo claro que esto se hace con una macro y tengo algunas ideas al respecto, pero no me funcionaron, alguien me podría pasar un código. gracias anticipadas y salud_2

Tengo un listado con información de personal, el cual debe actualizarse a su vez en una página web (de lo cual solo me encargo de avisar que debe hacerse). En mi archivo, en la columna E es donde quiero, que al completarse con el dato pertinente, se ejecute el msgbox con el mensaje de alerta, mi consulta es si conocen alguna macro para poder realizar esto. Si no soy lo suficientemente claro pido disculpas. Gracias de todos modos.

Buenos dias, Tengo un modulo en VBA que me coge una tabla y me la exporta a txt por Tabulaciones. Funciona perfectamente siempre que la tabla empiexe en la celda "A1". El problema es que cuando quier por ejemplo que la tabla empieze a partir de "C10" y lo indico en la fila que cuenta filas y columnas no funciona. El codigo que uso es el siguiente: Sub ASM() Dim NombreArchivo, RutaArchivo As String Dim obj As FileSystemObject Dim tx As Scripting.TextStream Dim Ht As Worksheet Dim i, j, nFilas, nColumnas As Integer NombreArchivo = "pedidos" RutaArchivo = "C:\IMPORTA_PEDIDOS\IMPORTA_ASM" &amp…

hola que tal¡?, me gustaria saber como puedo hacer para pasar un dato (que para este caso es la cadena de caracteres "POSITIVO") de una columna dada a otra que yo le especifique?? en este ejemplo tengo la columna negativo y la columna positivo dentro de la columna negativo debe de estar la palabra "NEGATIVO" y dentro de la columna de positivo debe estar la palabra "POSITIVO" pero resulta que tengo ese problema y quiero separarlos porque dentro de la columna negativo tambien existe muchos palabras "POSITIVO" y quiero quitarlo como le hago?. Saludos y gracias Copiar un dato de una columna a otra.rar

Buenas tardes amigos, los felicito x tan excelente foro. Necesito con caracter de urgencia la ayuda de ustedes, requiero una macro que se ejecute de acuerdo a algunas condiciones, en un rango de celdas si agrego en una celda la letra P se ejecute la macro 1, si escribo una letra R en cualquier celda del rango, se ejecute la macro 2, y si escribo una I, se ejecute la macro 3. Muchas gracias de ante mano.

Buenas tardes compañeros, tengo una consulta y no doy con la solución, por si alguien podría ayudarme. Quiero dar las gracias de antemano. Tengo un excel con un formulario creado en el que doy de alta un usuario con sus correspondientes datos, hasta aquí todo ok. Después tengo un campo BUSCAR, que busco cualquier dato introducido y cuando lo selecciono para modificarlo o verlo me tira un error , y por más que doy vueltas no doy con la solución. También tengo un botón "Generar listado" que me gustaría que al pulsar me cogiera el registro seleccionado y me lo mostrara en un txt para copiarlo a otro programa.(Saben con hacerlo, sería posible). Vuelvo a d…

Hola amigos, tiempo atrás solicite ayuda para una macro la que me permitiera imprimir archivos por lotes específicamente pdf, bueno me enviaron una macro estupenda y debo modificar un aspecto de esa macro, este programa consiste en elegir la ruta donde están los archivos a imprimir y los muestra en pantalla con checkbox uno por cada archivo, el usuario debe ir marcando cuales necesita imprimir, esto es lo que necesito modificar que haya una opción que permita marcarlos todos al mismo tiempo.

Hola buenas tardes para todos, resulta que Tengo un excel el cual esta conformado: en la primera hoja una lista, y n cantidad de hojas donde: n= personas que deben cumplir con ciertos criterios para pasar primera hoja= lista donde deben ir las personas que no cumplieron con ciertos criterios como mencione anteriormente en cada hoja se pone el nombre y cédula del individuo y se desglosa en los criterios que deben cumplir para pasar, por ejemplo: Credencial de la SVSP, cranet UT, etc... Cuando la persona no cumple con el requisito su calificación sera cero, y esta se debe reportar en la lista (situada en la primera hoja) con su nombre y cédula... Mi objetivo es qu…

Tengo un libro excel que cuenta con 31 hojas (días del mes) y una hoja resumen, he creado una macro para que en la hoja resumen me coloque el total de movimiento de un producto o servicio de todo el mes. pero no se por que motivo no me suma bien por dia el producto ej: dia 1 Dia 2 Resumen (así tiene que quedar) programación $200 programación $100 programación $550 Programación $250 reloj $200 Reloj $350 Reloj $150 No se que estoy haciendo mal, tener en cuanta que la macro es par 31 días. Le agradecería una solu…

Buenas, necesito ayuda con esta macro. La vengo usando hace ya años, pero de repente sale este error: "Error '1004' en tiempo de ejecución", pero no consigo saber a qué se debe. Además sólo pasa de vez en cuando. ¿Alquien podría echarme una mano? Sería en la hoja de presupuesto: creando capítulos y añadiendo partidas (es al crear nuevas partidas cuando falla). Muchas gracias por adelantado!! Estoy intentando subir el archivo en zip pero no me deja, ¿cómo lo podría subir?

Hola! Necesito hacer una columna donde cada celda sea un combobox, y que aparezca la opción de autocompletar. Encontré algo similar en este post: Sin embargo, la macro que comentan no me está funcionando. Me aparece el error 1004: "No se puede activar la aplicación de origen de este objeto." Alguien podría ayudarme? Gracias!

Buenas, me gustaría saber si es posible obtener el nombre o la información de un icono que está en un subitem de un listview. Como veis en la imagen que os adjunto, en el listview se carga los dias de un mes y cada día tiene asignado un icono cuyo nombre es el número.jpg y en el listimage el número se corresponde con su index. Al seleccionar una celda, me gustaría obtener el nombre o el index del icono que contiene. itemSel = ListView1.SelectedItem itemSel..SubItems(2).Icon.name o ActiveIcon,index o algo por el estilo

Sería posible mostrar todos los formularios de un libro en un listbox ? a ver si alguien me ilumina porque estoy totalmente nublado. Gracias

Hola foristas: después de saludarlos les pediría su apoyo para ayudarme a entender la lógica de un modulo que me hace falta en mi programa, no lo tengo diseñado de como podría funcionar... les explico Tengo un archivo que se llama Base y ese contiene varios campos... lo que quiero realizar es que en base al campo NOMBRE haga lo siguiente: a) Que genere un archivo en la ruta actual con el nombre encontrado en la columna NOMBRE del archivo Base Ese archivo solo contendría los datos de los campos de DOMICILIO y TAREA Y así hasta terminar con la lista pero el problema que tengo es el siguiente: La lógica que no acabo de descifrar es, que puedo tener nombres re…

Buenas tardes, Creo que el título de mi tema es un poco confuso, pero la consulta es la siguiente, tengo un userform en Excel que me envía la información a una tabla en Access, hasta ahí funciona todo de maravilla, pero que pasaría si por ejemplo en la columna [Cantidad] de Access, en la fila 15, quiero sumarle la cantidad que ya está ahí mas la cantidad que digité en el userform? por ejemplo, en Access tengo una columna [Cantidad] con los siguientes valores ID Cantidad 1 5 2 12 3 15 entonces desde un textbox en un userform en excel, si yo digito 7 y quiero que esa data se sume a la celda con ID 2, el resultado final obtenido…

Buenas, estoy intentando crear con una macro a partir de un excel un txt con ancho de campos específico. Necesitaría que las anchuras de las columnas fuera: Columna C:10 Columna C:50 Columna C:5 Columna C:10 Columna C:150 Columna C:150 Se que si doy formato especial al campo y lo pongo del tipo 000000000 te lo coge, pero la gente que lo usará es un poco manazas y preferiría que fuera por programa por si tocan formatos. Muchísimas gracias. Adjunto ejemplo. Cualquier tema me comentais. Muchas gracias

Hola, tengo un Useform VBA, que contiene: un ComboBox, cuatro TextBox, y dos CommandButton con una variable que seleccionando de una lista con el ComboBox me almacena los datos en los 4 TextBox los CommandButton me sirven a través de una macro para filtrar la lista que tengo en la hoja de la cual coge los datos el ComboBox. Quisiera saber si hay un código para que el Combobox me extrajera esos datos filtrados al pulsar el CommandButton en vez de toda la lista como me está ocurriendo. Pd. tengo un archivo ejemplo pero es .xlsm y no sé si sería correcto enviarlo. Gracias.

Buenas tengo un archivo que guarda la hoja en pdf y la envia por email, funciona perfectamente en office 2010 Sub envio_mail() 'envio correo pdf Application.ScreenUpdating = True ActiveSheet.Unprotect Password:="" Dim npres, cliente, Email, rutapdf, LIBRO, ArchivoPdf As String Dim ProgCorreo, CorreoSaliente As Object With Application .ScreenUpdating = False .EnableEvents = False .DisplayAlerts = False End With Set npres = Range("J5") Set cliente = Range("g10") Set Email = Range("g15") rutapdf = "C:\SkyDrive\Documentos\presupuestos\" ArchivoPdf = Range("F7") Set ProgCorreo = CreateObject("Outlook.Application") Set CorreoSaliente = ProgCorreo…

hola amigos de excel estoy realizando una pequeña macro para realizar la receta de l lugar donde trabajo, pero no he podido realizar una consulta múltiple de tablas para actualizar los saldos de los producto en la receta de acuerdo al mes y al año espero me puedan ayuda saludos. 1. Es validar las preparaciones que se van actualizar a. En la base de datos de Access hay una tabla que se llama “BDPREPARACIONES” b. se valida en las dos últimas columnas estén chechkeadas que son “RESETA” Y “RESETAESTANDAR”, si estas dos columnas están chekeadas se prosigue a la actualización. 2. Luego consulto la receta que esta asociada a la preparación de la siguiente manera: En l…