Estela Arias

Dante Amor respondió: Reviso el archivo y te envío una respuesta.

Dante Amor respondió: Y qué valor se suma en los totales por año, ¿el de la columna "C" Importe?

Dante Amor respondió: La macro para el progressbar Private Sub UserForm_Activate() 'Referencia: http://support.microsoft.com/kb/211736/es 'Mod.Por.DAM LProgress.Width = 0 principal End Sub Sub principal() 'Por.DAM Application.ScreenUpdating = False Set h1 =...

Dante Amor respondió: Te anexo la macro para los subtotales Sub subtotal() 'Por.Dante Amor Set h1 = Sheets("Estados de cuenta") c = "A" u = h1.Range("A" & Rows.Count).End(xlUp).Row ant = Month(h1.Cells(u, c)) fin = u + 1 wimporte = 0 On Error Resume Next For i = u To 17...

Dante Amor respondió: Me llegó esta pregunta y no sé si ya está contestada o quieras una nueva respuesta. Tal vez ayudaría si reviso tu macro y veo la posibilidad de optimizarla, claro, además de ponerle el cuadro de progreso. Si quieres que revise tu macro envíame tu archivo.