Dante Amor respondió:
Van todas las macros Private Sub CommandButton1_Click() 'Por.Dante Amor 'Mostrar solamente las filas que tienen "ES" Application.ScreenUpdating = False u = ActiveSheet.UsedRange.Rows(ActiveSheet.UsedRange.Rows.Count).Row Rows("9:" &...
Dante Amor respondió:
Para que funcione de manera automática, pon la siguiente macro en los eventos de tu hoja. Private Sub Worksheet_Change(ByVal Target As Range) 'Por.Dante Amor If Target.Count > 1 Then Exit Sub If Not Intersect(Target, Range("C2")) Is Nothing Then...