El usuario Antoni, me creo una macro el año pasado que funcionaba para generar las dos columnas (código y precio) de todo el libro. intento configurar para este nuevo libro, y no logro que funcione. Aclaro que funciono con los tres libros anteriores a este ultimo. El libro original tiene 17 hojas, adjunto una muestra de 5 Hojas. Espero su ayuda! Gracias Lista100.xls

Tengo un libre en donde hay varias celdas con contenido alternado, es sobre equipos de futbol. Necesito un macro (o quizas se puede hacer mediante alguna función) en donde me convierta determinado texto en determinado hipervinculo. Ejemplo tengo celda a20 q dice "Futbol". Al activar el macro esa celda "Futbol" que sea un hipervinculo a una url

hola amigos:quisiera ayuda con el sgte formulario: en este ingreso los datos referentes a los productos que copio de la guia de despacho:fecha,cantidad,tamaño,nº guia,observaciones y los almaceno en la hoja de trabajo correspondiente, en este formulario de ingreso no es necesario que se me muestre el precio del producto, yo lo pongo en la hoja mediante una formula (ejemplo:=si(e211="52,5 x 45,9",c211*12.5,si(e211="73 x 60",c211*20,si(e211="44,5 x 40,6",c211*12,nd))), una vez que acabo de ingresar los otros datos. habra algun otro modo de hacer el calculo que es basicamente : cantidad*precio,el cual varia de acuerdo al tamaño del producto en el momento que doy ingreso a lo…

Buenas Noches, Pues bien, tengo el archivo adjunto, el cual guada como deseo con el boton correspondiente, pero al momento que quiero abrir, no se copia el valor en letras de la celda combinada C37, se podria corregir? Gracias por su apoyo! FACTURA MODEL OK 2.zip

Hola compañeros, tengo una hoja a la que asigno una macro para que me guarde un rango de celdas en una carpeta determinada y con el nombre de un rango de celda. Todo eso me lo hace bien, pero se desconfigura y pierde todo el formato. Si me podeis indicar como solucionarlo estaria muy agradecido. Adjunto hoja tal y como quiero que me la guarde y tambien la macro que le asigno. Gracias macro guardar hoja.txt Libro4.rar

Hola tenemos una macro que nos permite guardar la imagen de una URL ubicada en una celda en el la carpeta donde se encuentra el archivo...funciona perfecto en windows. Pero necesito que funcione en un equipo MAC...cuando ejecuto la macro me resalta las siguientes lineas DownloadFile = URLDownloadToFile(0&, _ sSourceURL, _ sLocalFile, _ BINDF_GETNEWESTVERSION, _ 0&) = ERROR_SUCCESS End Function y e…

Pues tengo la siguiente base (archivo adjunto), y necesito hacer un resumen asi como se muestra en el archivo hoja resumen pero no le encuentro entrada, alguna idea que me puedan dar, gracias. es de hacer una resumen por nombre y por talla pasando de columnas a filas repitiendo el nombre dependiendo de los materiales a usar, cabe mensionar que en este ejemplo solo van 4 maeriales pero en realidad son 25 y pueden ser mas segun los cambios que tengan los nombre de los productos estan en una base igual solo que con mas columnas. espero me entiendan y me puedan brindar ayuda. Salu2 Ejemplo Transponer datos.xlsx

Amigos como están, necesito que me ayuden con un problema, tengo que agrupar horas de trabajo de acuerdo a la cantidad y una fecha específica. Por ejemplo tengo a la persona: Andrés, él trabajo en las siguientes fechas: 21 enero 2014: entró a trabajar a las 8:00 horas y terminó a la 13:00 horas, total horas trabajadas (5) 21 enero 2024: (ese mismo día en la tarde entró a las 15:00 horas y salió a las 23:00 horas, total de horas trabajadas (8) Se considera el siguiente sistema para agrupar las horas normales y horas extras: - Normales hasta las 8 horas - Extras_1 = entre 8 y 10 horas - Extras_2 = mayor a 10 horas Entonces el día 21 enero 2014 Andrés trabajo 13 h…

Hola a todos: Mi consulta se refiere a que he leido y buscado mucho en el foro pero no encontre ninguna respuesta certera. necesito crear o tengo un libro nuevo desde cero sin nada adentro, en un rango de celdas introduzco con un formato que la solapa de Hoja soporte: ejemplo: 09-05-2013 ya que las barras no me las admite y no me interesa en realidad. bueno volviendo... en un rango ej: P1:P31 que serian 31 dias de algun mes o 30 de otros, que ese rango me genere 31 solapas de hojas cada una con una fecha correspondiente a todos los dias que yo ya habia precargado en el rango de celdas anterior, se entiende? es como si me hiciera el calendario completo de el mes en curso…

En lenguaje VBA : Seleccionar un excel por el usuario y buscar una palabra Facturas en la primera hoja excel 2. Hacer una busqueda desde la celda inferior donde esta Facturas hasta encontrar varios directorios de varios .pdf 3. Copie todos esos archivos .pdf en un directorio C:\facturas de manera automática Necesitaría modificar el ultimo bucle porque no para de hacer copias hasta que llega un punto de colapso total. Edito: Ya he podido hacerlo para dos pdfs , pero necesitaria hacerlo para un numero generico de archivos .pdf Edito 2: Ya lo he conseguido para un numero de veces n pero solo para un determinado de extensión . pdf o…

Hola amigo, tengo una macro que me inserta una cantidad de imágenes en mi archivo excel, pero quiero hacer dos pequeñas modificaciones: 1) que la cantidad de fotos (CantFotos) que inserto este vinculado en una celda de mi excel, y no que la tenga que modificar desde la macro 2)que me comprima cada imagen que inserto a 150pp esta es la macro: Sub InsertarImagenes() Dim PosX, PosY, X, J As Integer Dim CantFotos As Integer Dim Ruta As String 'le asigno valores a las variables, mismas que dependerán 'de cada proyecto: 'ruta de acceso a las imágenes Ruta = "\" 'cantidad de imágenes a cargar: CantFotos = 42 'margen izquierdo y superior que separará a cada imagen: …

Que tal, Pues estoy creando una macro que busque informacion especifica sobre ciertos #Item, en otro libro, dado que cada #Item es una hoja especifica. hasta ahorita e llegado a esto, sin embargo, al momento de correr la macro no sucede absolutamente nada, espero me puedan apoyar en identificar el inconveniente, o si tienen alguna recomendacion sobre el codigo; aqui la macro: Sub RoundedRectangle2_Click() ' ' Keyboard Shortcut: Ctrl+m ' 'Declaracion de variables a utilizar Dim Var, Cef, Sabana, Vi As String 'Escribir variables con una mayuscula para detectar errores Dim V7, V8, V9, V10, V11, V12, V13, V14, V15, V16, V17 As String Dim Prueba As Worksheet Applicat…

buenas tengo esta macro: Sub ImpSeleccion() 'Impresion de seleccion With ActiveSheet.PageSetup .PrintArea = "" .Orientation = xlLandscape 'xlPortrait .PaperSize = xlPaperLetter 'formato carta .BlackAndWhite = False 'incluir colores o no .FitToPagesWide = 1 'reduce el tamaño de la hoja (ancho) .FitToPagesTall = 1 'reduce el tamaño de la hoja (alto) .CenterHorizontally = False 'centrar horizontalmente .CenterVertically = False 'centrar verticalmente End With[/CODE] esta macro imprime una seleccion de una hoja con estas caracteristias orientacion horizontal papel tamaño carta margen 1cm en blanco y negro aplico la macro a un boton, el as…

Hola buenas tardes: Tengo un archivo con una macro para imprimir archivos desde un listado en una hoja. de mi lista que tengo en la columna C indico en la columna D con la palabra Si, para que se imprima, si esta columna no tiene esta palabra no lo imprime. La macro me es útil. Pero mi actual necesidad es: Imprimir todos los archivos listados, pero si la columna D, está la palabra "X", no deberá ser impreso. Muchas gracias Consulta IMprimir.xlsm

Hola a todos! Gracias por su tiempo, mi duda es la siguiente. Tengo archivos de imagenes *.xps en la carpeta c:\ y quiero imprimirlos todos con una macro, hay alguna manera de poder imprimir el archivo desde excel? Gracias!

Buenas tardes, Tengo una macro que me combina por medio de marcadores algunos campos de excel a word hasta ahí todo perfecto, solo que quiero que al momento de ejecutar la macro me cargue los campos y automaticamente me lo mande a imprimir el documento en word sin guardar los cambios Espero haber sido lo mas claro posible Saludos,

Buenas tardes, tengo esta macro que encontré en SanGoogle y la adapté a mi proyecto el cual funciona al 100% lo unico que al imprimir en A4 este lo hace en vertical y necesitaria que esta lo haga en horizontal, gracias por adelantado si alguno de los maestros me adaptaria dicha macro. Private Sub CommandButton5_Click() Application.ScreenUpdating = False Application.DisplayAlerts = False On Error Resume Next 'Elimina hoja y crea hoja dando el mismo nombre que la eliminada Sheets("DFSHJFDUYDAYRAIUY544TTTOMYDUTGD").Delete ActiveWorkbook.Sheets.Add After:=Worksheets(Worksheets.Count) ActiveSheet.name = "DFSHJFDUYDAYRAIUY544TTTOMYDUTGD" …

Muy buenas Gente! Me he topado con un problema que no puedo solucionar. Resulta que en el archivo adjunto tengo un boton para imrimir una hoja que le agrege un pie de pagina con una macro. En la vista previa de impresion los pie de pagina estan en su lugar, pero cuando activo el comando para imprimir, en la hoja impresa salen los pie de pagina todos juntos en el centro de la hoja. Sinceramente no se que hacer. Tal vez un experto tenga la solucion. Gracias de antemano. Un saludo grande.- Libro1.xls

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 buenas noches: En una hoja donde listo mis archivos necesito mandarlos a imprimir celda x celda En la columna B tengo listado los archivos con su ruta completa. Ruta y nombre del archivo. Me gustaría poder imprimir estos sin necesidad de abrir cada uno de ellos. ya que previamente hice una revisión. Tengo una macro, que me había funcionado en otro archivo, pero no puedo aplicarlo aquí. Esperando que me puedan ayudar. Muchas gracias Mario Imprimir Rutas con archivo.xlsm

Hola estoy tratando de imprimir el archivo de Word anexado con una Macro a ambas caras y 2 páginas por hoja, el siguiente codigo lo he sacado con la grabadora de macros. Si me funciona pero solamente cuando la estoy grabando, posteriormente utilizando solo el codigo ya no funciona. Alguien que me ayude? Gracias. Sub Macro1() ' ' Macro1 Macro ' ' Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _ wdPrintDocumentWithMarkup, Copies:=1, Pages:="", PageType:= _ wdPrintAllPages, Collate:=True, Background:=True, PrintToFile:=False, _ PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _ …

Buenas noches a todos. Abro este post para ver si a alguien le ocurre lo mismo y ha encontrado solucion. Despues de googlear no he encontrado nada. Resulta que tengo macros que me imprimen hojas con una impresora conectada en red, pero esta misma mañana la han cambiado y han puesto otra impresora que te pide una contraseña para imprimir, para que quede constancia de quien imprime cada cosa y demas. Es un engorro cada vez que imprimes algo meter la contraseña, hasta.aqui no se puede hacer nada. Me he bajado las instrucciones de la multifuncion y nada. Entonces mi consulta es si hubiera alguna forma de poner en la macro la contraseña para que imprima del tiron, si algui…

Buenos dias , quisiera saber si es posible mediante la funcion grabar macros realizar una macro utilizando el autofiltro de excel para poder imprimir listados actualizados un determinado dia o si hay otra manera. ejemplo que con un boton me imprima las personas que estan al dia. o vencidos o por vencer.adjunto un archivo con diferentes estados con filtrar como ejemplo muchas gracias consulta macro filtro.xlsx

Buenas tardes gracias por este espacio. Solicito su ayuda para una macro que imprima solo las celdas que contienen datos. Tengo un botón que me ayuda a realizar un filtro avanzado y me trae los datos que quiero buscar, pero al realizar en el otro botón la impresión para paso a PDF me las convierte todas y solo quiero que se muestre en el PDF las que se consultaron. Tengo el siguiente código en el botón de impresión. pplication.ScreenUpdating = False If MsgBox("¿Desea Convertir a PDF?", vbQuestion + vbYesNo) = vbYes Then Dim HResumen As Worksheet Dim Ruta As String Dim Titulo As String Set HResumen = Worksheets("Resumen") …

Hola buenas noches, un cordial saludo y agradecimiento anticipado a todos aquellos que participan con sus aportes, gracias a ello estamos aprendiendo y avanzando en este tema de las Macros que todavía no dominamos.... Hoy deseo presentarles una Macro para imprimir varias hojas de excel (con rangos ya definidos), desde un formulario con varios CheckBox.. La idea es que al seleccionar diferentes Checkbox en el formulario, me imprima las hojas correspondientes, al mismo tiempo que guarde en la carpeta llamada "C:\RRHH", Y en un solo archivo en PDF.... La Macro estaba funcionando perfectamente, ahora me está saliendo el "ERROR, que la carpeta en mención …