macro question
Is there a way to rewrite this so that it doesnt take so much memory
and processing time to work ? Sub scalp_line1_button_click() Range("b3:m3").Copy Sheets("CLOSED").Cells(Rows.Count, 1).End(xlUp) _ .Offset(1, 0).PasteSpecial Paste:=xlPasteValues Range("b3:d3").ClearContents Range("f3:h3").ClearContents Range("j3:k3").ClearContents Range("m3:m3").ClearContents End Sub ' Thanks scott |
macro question
Scott,
If that, by itself, takes more than an eye-blink, I'd be surprised. Do you have other workbooks open? Or a lot of formulas in a big workbook? Then perhaps you can turn the calc mode to manual before the routine, and reset it after. HTH, Bernie MS Excel MVP "scott23" wrote in message m... Is there a way to rewrite this so that it doesnt take so much memory and processing time to work ? Sub scalp_line1_button_click() Range("b3:m3").Copy Sheets("CLOSED").Cells(Rows.Count, 1).End(xlUp) _ .Offset(1, 0).PasteSpecial Paste:=xlPasteValues Range("b3:d3").ClearContents Range("f3:h3").ClearContents Range("j3:k3").ClearContents Range("m3:m3").ClearContents End Sub ' Thanks scott |
All times are GMT +1. The time now is 10:59 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com