Preguntas esperando respuesta
Actividad pública reciente
Ha valorado "Excelente" la respuesta
Imprimir desde macro en excel, seleccionando hojas.
Te dejo la macro con el bucle para recorrer la lista de la col R Sub Imprimir_Click() 'x Elsamatilde 'ae ejecuta desde la hoja activa = menu finx = Range("R" & Rows.Count).End(xlUp).Row For x = 2 To finx n = Range("S" & x) Sheets(Range("R" &...
Ha valorado "Excelente" la respuesta
¿Cómo modificar la siguiente macro?
Prueba esto: Sub listas() Application.ScreenUpdating = False Sheets("Generador").Activate Range("A8:A1000").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range("X1"), Unique:=True Sheets("Generador").Activate Columns("X:X").Select...
Ha preguntado en el tema en
Programación
y en 2 temas más
Se puede, ¿Comprimir una imagen que esta insertada en un control activex o control de imagen?
Tengo X cantidad de hojas, y en cada hoja incluye dos controladores de imagen Image1/Image2, quisiera comprimir todas las imágenes, ya que el archivo se vuelve demasiado pesado para trabajarlo. Las inserto mediante macro, si se pudiera que al...
Sin respuestas
Voto positivo a la respuesta
Una Macro para enviar email desde hoja excel usando gmail,com se puede o solo de outlook? Si me ayudan, gracias
Este es el código Sub SendMail_Gmail() 'Fuente: http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/337-enviar-correo-en-vb-con-microsoft-cdo.htm Dim Email As CDO.Message Set Email = New CDO.Message correo =...
Ha valorado "Excelente" la respuesta
¿Repetir macro en todas las hojas del libro?
. 30/09/16 Buenas, Gabriel Me parece que está faltando información para completar el procedimiento. Pero vamos aproximando una solución. La siguiente macro aplica a todas las hojas de tu libro: Sub PoneIMG() Directorio = ActiveWorkbook.Path &...
Voto positivo a la respuesta
¿Como puedo asignar una ruta para que todos los que den uso de mi archivo excel puedan ver las imagenes del picturebox?
Si están los PC conectados a una red, cambia las líneas: Ruta = "C:\Users\claudio.cisternas\Desktop\imagenes_araucania.jpg" LoadPicture("C:\Users\claudio.cisternas\Desktop\imagenes_araucania\PTAS_ANGOL.jpg") Por unidades que estén en red y todos...
Ha valorado "Buena" la respuesta
Copiar hojas y nombrarlas, según el total de valores únicos, después llenarlas con la información de otra hoja.
Espero te sirva esta macro. Solo tienes que tener en cuenta que en la Hoja Generador no tengas datos en las columnas X, Y, Z Sub listas() Application.ScreenUpdating = False Sheets("Generador").Activate Range("A7:A38").AdvancedFilter...
Ha empezado a seguir a 
Victor Rodriguez
Victor Rodriguez
Ha valorado "Buena" la respuesta
Ejecutar macro en todo el libro, excluyendo 3 hojas.
Te anexo la macro actualizada Sub prueba() Dim i As Byte Dim Celda As Range Dim Paso As Integer For i = 1 To ThisWorkbook.Sheets.Count Select Case Sheets(i).Name Case "Generador", "Auxiliar", "Boleta" 'En esta línea se ponen las hojas que se excluyen...
Ha cambiado su perfil.
- Ha cambiado su foto.
