ladynoc

paramisolo respondió: El codigo para el boton insertar sería este: Private Sub CommandButton3_Click() Range("C9").Select Selection.EntireRow.Insert If TextBox1<>"" Then Range("C9").FormulaR1C1 = TextBox1 TextBox1=Empty Else MsgBox "error inserte el campo que falta" Exit...

paramisolo respondió: Si claro podemos hacer una cosa que mientras se esta ejecutando la macro el nombre del botón cambie para que veas que esta ejecutando y cuando termine vuelva a poner su nombre de origen: Sub Macro() 'Seleccionamos el botón cuyo nombre queramos...

paramisolo respondió: Vuelves a hacerte un lío con los valores le estas diciendo que si la celda esta de color rojo la oculte, Hidden=True significa Oculta=Sí De todas formas tanto lío para esto, si utilizas la macro que te puse marcas donde empieza y donde termina en el...

paramisolo respondió: Esta macro te pide el nombre al guardar el libro el directorio va en la macro la pones a tu gusto y listo: Sub Auto_Close() NombreArchivo = InputBox("¡Escriba el nombre del Archivo", "Guardar Libro", 1) ChDir "C:\" ActiveWorkbook.SaveAs Filename:= _...

paramisolo respondió: Para que funcione la macro correctamente yo al abrir el libro mostraría todas las filas, y después que recorra el rango y que oculte las que te interesen, así no tienes problemas si alguna de tu color está oculta. >Un saludo >Julio