Excel se queda en blanco, debo liberar la memoria?
ola buen día!!!
Tengo un código que usted muy amablemente me proporcionó, al principio me funcionaba bien... Pero ahora cada ves que lo ejecuto se demora mucho tiempo y luego se atora, y tengo que cerrar el programa y reiniciarlo para que reaccione!. Será que tengo que liberar la memoria???? Hay algún código para hacer eso?? O usted que me sugiere??
agradezco mucho tu apreciable ayuda! Saludos!
pd. Adjunto el código que ejecuto:
Sub CREAREPORTE()
'Por.DAM
Sheets("CAPTURA").Activate
MiReporte = Range("O7")
Set l1 = ThisWorkbook
Sheets(Array("REPORTE MENSUAL", "BITACORA DE RECIBOS")).Copy
Application.DisplayAlerts = False
Sheets("REPORTE MENSUAL").Cells.Copy
Sheets("REPORTE MENSUAL").Select
Range("A1").Select
Range("A1").PasteSpecial Paste:=xlValues
Sheets("BITACORA DE RECIBOS").Cells.Copy
Sheets("BITACORA DE RECIBOS").Select
Range("A1").Select
Range("A1").PasteSpecial Paste:=xlValues
ActiveWorkbook.SaveAs Filename:=MiReporte & "REPORTE MENSUAL.xlsx", _
FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
l1.Activate
MsgBox "COPIA TERMINADA", vbInformation, "COPIAR"
End Sub
1 Respuesta
son mil filas que se copian, pero aun tengo muchas sin datos... por eso se me hizo muy extraño!
cambie la parte que me dijo, y parece ser que si accedió a ejecutarse, se lo agregué a ambas hojas!
tienes alguna idea de porque sucede esto???
Agradezco nuevamente tu valiosísima ayuda!
Si, es por falta de memoria o del procesador de tu compu.
