Actividad pública reciente
Ha valorado "Excelente" la respuesta
Transferir archivo muy pesado
¿Yahoo acaba de ampliar considerablemente la capacidad de envío de archivos?.. pero no alcanza con lo que vos necesitas (pasó a 10MB) Sé que hay empresas o usuarios que tienen una cuenta de servidor, pero desconozco direcciones para ello. Te sugiero...
Ha valorado "Excelente" la respuesta
Condicionar celda actual
¿Cómo estás? Si ya tenés una rutina y solo querés incorporar las instrucciones para la evaluación, estas serían: 'aquí las instrucciones de tu macro '............................ If activecell.Value = "ART" then 'aquí todas tus instrucciones else...
Ha valorado "Excelente" la respuesta
Inmovilizar pantalla
Gusto en saludarte: Te envío algunas instrucciones, que si bien no te inmovilizan la pantalla, te quitan las barras de desplazamiento y la de encabezados para que apliques aquellas que necesites. Los eventos en esa hoja serán Activate (cuando se...
Ha valorado "Buena" la respuesta
Crear botón
Más fácil, meete a las preferencias de excel y dile que no te pregunte cuando vas a cerrar los archivos, punto y suerte.
Ha valorado "Excelente" la respuesta
Función celda
La macro que te adjunto coloca un texto en la celda que selecciones o la limpia en caso de contener algún valor. Está diseñada para el rango A2:A10 y la colocarás en la hoja donde quieras que se ejecute. Alt+F11 para llamar al Editor, doble clic en...
Ha valorado "Excelente" la respuesta
Macro que seleccione áreas para imprimir
La instrucción para establecer un área de impresión es: ActiveSheet.PageSetup.PrintArea = $A$1:$D$20 Ahora, si la macro tiene que distinguir el área, lo que va a hacer es lo mismo que hacemos cuando presionamos las teclas Ctrl+Fin (buscar la última...
Ha valorado "Buena" la respuesta
Pegar nombre
Dame un poco más de tiempo ya que por este momento estoy muy ocupado.
Ha valorado "Excelente" la respuesta
Defenir nombre
El pedacito que te sirve es el siguiente: Range("K6").Select If Range("K7").Value <> "" Then Range(Selection, Selection.End(xlDown)).Select ActiveWorkbook.Names.Add Name:="Cargos", _ RefersToR1C1:="=Hoja2!" & Selection.Address(ReferenceStyle:=xlR1C1)...
