Hola a todos!!! Necesito mostrar una tabla en un listview, en la cual cada item (cada fila) tenga un color de fondo diferente. Para el color de la fuente he usado algo como Listview1.ListItems(1).ListSubItems(1).ForeColor = vbRed y funciona perfecto, pero ahora necesito cambiar el backcolor. Alguna idea? Desde ya les agradezco mucho su tiempo.

Soy nuevo en esto de las macros, me he puesto con el grabador y aquí estoy haciendo lo que puedo. La cuestión es que he hecho unas macros, que más o menos me funcionan, pero siempre viene una parte que desconoces. Quisiera escribir en la siguiente linea vacia, ¿como se lo tengo que decir a la macro? Tengo en una hoja el problema que siempre que voy allí me manda al principio de la hoja. Que se puede hacer para corregir éste problema, para que me envié donde está el último dato. Como no puedo subir el archivo porque es muy grande, os pongo la macro para que me digais. Gracias y un saludo a todos. Pablo Sub MacroIberdrola() ' ' MacroIberdrola Macro ' ' Sheets…

Hola al abrir el archivo me sale un error: "Excel found unreadable content in "nombre del archivo.xlsm. Do you want to recover the contents of this workbook? If you trust the source of this workbook, click Yes" Pulso yes, el archivo se abre y aparece una ventana con el siguiente error: "Repaired Records: Drawing from /xl/drawings/drawing3.xml part (Drawing shape)" En este archivo no tengo ningún gráfico. También les comento que este workbook realiza un proceso, y luego graba una planilla por cada cliente (en total por ahora son 54) en otra carpeta. los archivos con error son estos que generó. Podrían decirme como solucionarlo. Gracias!!!

Buenos dias, estoy necesitando ayuda con la solucion de este problema. Tengo una subrutina que hace varias cosas, y ala final quiero que me imprima el formulario para que quede un registro en PDF, alguien seria amable de ayudarme con ese problema? Desde ya muchas gracias

Estimados, utilizo en siguiente código VB para cambiar dinamicamente una imagen asociada a un shape cuando una celda cambia de valor. "Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address(0, 0) = "B1" Then _ Me.Shapes("logo").Fill.UserPicture "C:\logos\" & Target & ".jpg" End Sub" el tema es que ademas utilizo un plug-in que refresca los datos desde un webservice, sin embargo al actualizar los datos el modulo no me cambia la imagen, a menos que se edite el campo en el cual se encuentra el "target" y luego enter, como información adicional, el target y el shape que hace referencia a la imagen se encuentran en una hoja que hace refe…

Hola, Tengo una macro para quitar la letra "h", por favor me podrian indicar como puedo hacer para quitar cualquier tipo de letra o caracter que encuentre en el rango de la tabla y solo deje los numeros? Gracias Borar Letra H.xlsm

Necesito ayuda al copiar y pegar de una hoja a otra con rango variable, modificando un valor. aca en este sitio encontre una forma de hacerlo que funciona por Gerson Pineda-El Catracho , pera ademas de lo que hace la macro necesito saber de que hoja se copio, bien sea agregando una columna que diga "Banco1" o "Banco2" o "Banco3", en la hoja que recibe los datos "TotalBancos"o bien modificando en mi caso una celda especifica. Sub TotalBancos() Sheets("Banco1").Select copiar_pegar_Banco Sheets("Banco2").Select copiar_pegar_Banco Sheets("Banco3").Select copiar_pegar_Banco end sub Sub copiar_pegar_Banco() Dim col, ulf Applicatio…

BUenas noches, por favor su apoyo con esta consulta, quiero redondear decimales de una formula al momento de hacer una macro en excel por ejemplo n*3*0.7, supondiendo que n es igual a 5, el total me sale 10.5, ahora le pongo delante Int(n*3*0.7) y me 10, pero quiero que se redonde a 11, como puedo hacer para que cuando el decimal es mayor o igual a 5 se redonden al mayor, esto lo estoy poniendo como parte de un programa en vb. Gracias

Alguien tiene un ejemplo de como alinear a la derecha una cantidad numerica en una columna de listbox. Gracias de antemano por su ayuda

https://ayudaexcel.com/foro/topic/8996-abrir-abrir-y-guardar-link-internet/ Buenos días, El archivo adjunto (Autoria, Juan alias nvr)abre un link de internet y se guarda en una carpeta. pero el link que esta en el archivo adjunto no abre, tampoco se guarda me da error. Echenme un cable, que esta mal en el link. Saludos, César DescargarArchivos3-nvr.xls

Que tal, he estado buscando en muchos foros pero no he logrado dar con lo que necesito nadamas sale el de convertir fecha en numeros. Lo que necesito es pasar los numeros de las horas y los minutos.. por ejemplo 02.40 = dos horas con cuarenta minutos Como es el codigo si alguien me puede ayudar.. Se los agradezco mucho

Gente, Buenas noches, Primera vez que escribo, hace un tiempito que estoy registrado. Les comento a ver si pueden brindarme una ayuda, en mi trabajo somos 3personas que trabajamos con el mismo tipo de planilla de excel, mismascolumnas, etc, son tres libros excel. Vamos cargando los datos de cadaexportación que realizamos, cada persona en su planilla. La idea sería hacer una macro que busque cada fila del libro(por número de orden, factura, el que fuese mejor) y la compare con un libro general,si existen diferencias entre ellas que actualice y sino existe que agreguela fila al último. Lo que queremos lograr es que al terminar el día ejecutaresta macro y estos datos …

buenas tardes, quisiera saber si hay algun codigo para hacer un userform siempre visible, osea que este siempre sobre todo. gracias

Hola a todos! Ojala puedan ayudarme. Necesito comparar 2 celdas y pintar de rojo en una de ellas las diferencias encontradas. Adjunto el archivo. Muchas gracias a todo de ante mano. Saludos Caracteres_Dif.rar

Buenas, es mi primer mensaje así que espero expresarme bien y que se me entienda. El problema es el siguiente: Tengo una plantilla excel en el servidor, cuando un usuario se conecta desde un php, copio la plantilla, relleno sus datos y se descarga. Ahora me interesaría que unos rangos de celdas estén bloqueados, así que he estado buscando en temas relacionados y he probado varias formas pero no consigo hacerlo. La macro para hacer esto la he puesto en la hoja correspondiente y el código es el siguiente: Private Sub worksheet_activate() ActiveSheet.Unprotect Dim UltCol As Integer Dim UltFil As Integer UltCol = Cells(3, Cells.Columns.Count).End(xlToLeft).Column…

Mi pregunta no se si tiene respuesta. He creado un libro excel con varias hojas y dentro de cada hoja hay varias paginas (ajustadas a la impresora) Yo querria una macro para que me imprimiera solamente las paginas de cada hoja que cumplan esa condicion es decir, en cada pagina de cada hoja hay una fecha y quiero imprimir solo las que cumplan esa condicion dada. Muchas gracias

Hola Estimados. En esta oportunidad le escribo para ver si de casualidad alguien de ustedes me podria faciliar un plan de mantenimiento de algun equipo en donde la planificacion este hecha en excel. Gracias de ante mano

Hola amigos, buenos dia: Tengo un userform donde doy de alta a los artículos, pero quisiera ver si se puede colocar un control de Imagen donde con un CommandButton se pudiera insertar la imagen en el control Imagen y al dar guardar a la alta la imagen se guarde en la carpeta imagen. Dejo la macro que tengo hasta ahorita para su análisis y apoyo. Private Sub Imagen1_Click() If TextBox1 <> 0 And TextBoxId <> "" Then VerImagen.RenglonImagen = TextBox1 Set VerImagen.ImageAltas.Picture = FormaCodigos.ImagenPrincipal.Picture VerImagen.Top = FormaCodigos.Top VerImagen.Left = FormaCodigos.Left VerImagen.Show End…

Hola, Lo siento por las molestias pero me paso algo muy extraño. Resulta que tengo una plantilla guardada en un PENDRIVE y voy trabajando sobre ella en casa y en el trabajo cuando puedo. Ayer lo tenia bien y trabaje en casa sobre pequeños detalles y hoy al abrir el documento, la macro "ENVIAR mail" me indica este error: Se ha producido el error’-2147024772(8007007b)’ en tiempo de ejecución: No se guardo el documento La macro que me habéis ayudado en conseguirla es la siguiente: Sub PdfMail() Dim Archivo As String, Destinatario As String Dim Asunto As String, Cuerpo As String Dim OutlApp As Object, H1 As Worksheet '-- Applica…

Tengo una pequeña aplicación en Excel 2007 donde requiero actualizar tablas dinámicas mediante código de macro, (lo he realizado en otros archivos y no tengo problemas, solo que aqui no se porque me genera el error). La Base de Datos esta en la pestaña BD, la cual descargo de una hoja de google docs alimentada por google forms, (puse una copia de la BD original con el formato tal cual se descarga) pego la base de datos en la hoja BD y corro un modulo llamado INICIO (aqui hay varios cálculos, formatos etc), aparte yo tengo una Tabla dinámica en la hoja Rep1... la cual quiero actualizar mediante código... En los módulos tengo uno que se llama TablasDinamicas es la sub lla…

Buenos días a todos y todas. En la hoja de Excel en la estoy trabajando, necesito algo que no consigo hacer yo mismo. Cuando pulse entre o tabulador, la selección debe desplazarse a una celda concreta, y no hacia abajo o a la derecha (sé que se puede configurar desde excel). Buscando por internet, creo haber dado con una posible solución, gracias a la colaboración de un "experto en un foro". De hecho el tema aparece como "solucionado". El caso es que aún teniendo el código no sé cómo aplicarlo, porque habla de eventos y macros (no sé muy bien cuál es la diferencia). El código está en el archivo adjunto. Agradecería ayuda. Muchas gracias. Desplazamiento.rar

Hola buenos días, me dirijo a ustedes para ver si me pueden ayudar con un sistema de prestamos que estoy haciendo, en el cual coloco el nombre de la persona el monto, la cantidad de cuotas, y el interés mensual. La idea es que al poner la cantidad de cuotas (que nunca van a superar las 12 cuotas), se calculen y se ingresen en las casillas de cuotas, y al lado de cada cuota esta la celda de Pagado o Pendiente que si esta pagado se borre el contenido de esa cuota y si esta Pendiente lo deje. espero que no este muy complicado Gracias. Adjunto archivo. cuotas.xls

Buenas tardes Necesito que alguien me ayude con lo siguiente: Tengo un reporte de una diversidad de personas y quiero juntarlos todos en uno solo, son 5 personas y cada uno tiene 30 reportes, por ende hablamos de un promedio de 150 libros, los cuales los quiero juntar con una MACRO en un solo archivo y por consiguiente en un solo libro (pestaña). Cabe resaltar que los datos dentro cada libro son iguales en cuestion de formato, solo varia la informacion. Espero me puedan ayudar Gracias

La consulta en esta ves es, que si se podría crear varias áreas de impresión en una misma hoja o en varias hojas de un libro y cada una de estas tenga un nombre para que al momento de hacer una macro solo sea necesario nombrarla en un commandbutton para imprimir cualquiera de estas, según se requiera.?? En la web solo encuentro que si se selecciona un área y se pulsa control se puede seleccionar otra área, pero ,... como las identificaría a cada área de impresión para el propósito antes mencionado?? Gracias anticipadas por la respuesta

saludos a todos los del foro. nuevamente pidiendo de su apoyo, se trata de lo siguiente: en el anexo lo tome como apoyo para un desarrollo pero no puedo cambiar el filtro a otra columna, el archivo trabaja sobre la columna g, y lo que quiero que trabaje en la columna w, o en alguna otra que yo le indique dentro de la macro, de antemano gracias. lista con maccro Solido.zip