Whenever you have a task to automate, you can usually go down the VBA route. Maybe later you add some features here-and-there, making your VBA code more powerful. Color = vb White End If i = i 1 Next cell ' offset i to alternate column coloring i = i 1 Next repeat Msg Box "Total time was: " & (Timer - start Time) End Sub Before moving on, let’s get a better understanding of why this is taking so long. Color = vb White End If i = i 1 Next cell ' offset i to alternate column coloring i = i 1 Next repeat Msg Box "Total time was: " & (Timer - start Time) Application.And usually when you write your code, you’re just trying to get things to work. But after a while you notice your code is beginning to get very slow when it runs. I mentioned that the issue is that the screen is constantly updating, which is causing the code to run slowly. The code runs much faster when there’s less real estate to update on your screen. Screen Updating = True End Sub Now the code runs at 1.4 seconds for me, which is a huge improvement.Second, resetting Screen Updating to True is a wise practice to cover your bases.If for example the macro errors out or is interrupted before it completes, Screen Updating would still be off while Excel is running.Range For repeat = 1 To 30 For Each cell In r cell. Value Mod 2 = 0) Then ' if i is even, color the cell white cell. Range For repeat = 1 To 30 For Each cell In r cell. Value Mod 2 = 0) Then ' if i is even, color the cell white cell.
In my workbook, I have an input form on a separate sheet to enter invoices into database (sheet "frm Bien Nhan"). Value = a 'Xoa form phan cong nhiem vu Sheets("frm Phan Cong Nh Vu"). Clear Contents 'Kiem tra xem bien nhan hien tai da duoc phan cong hay chua If Sheets("frm Phan Cong Nh Vu"). Value = "N/A" Then 'Neu chua phan cong thi chuyen sang sheet phan cong Sheets("frm Phan Cong Nh Vu").
It is provided as is, for anyone who may still be using these technologies, with no warranties or claims of accuracy with regard to the most recent product version or service release.
Summary: Tables and lists are an integral part of Microsoft Excel.
Here’s why: First, no matter what the help files may say, or what you may have heard, Screen Updating does not always reset itself, including where User Forms and User Defined Functions are concerned.
Part of the confusion about this topic comes from versions 2000 and before, when it was not necessary to set Screen Updating back to True. Code writers who did not reset Screen Updating to True before 2002 had to go back to their macros and do so.