Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.misc
nc nc is offline
external usenet poster
 
Posts: 119
Default Speed up macro

Hi

I have noticed the macro below is slow, is there any changes I can make to
speed it up.

Private Sub Worksheet_Activate()

Application.ScreenUpdating = False
Rows.Hidden = False
Set rng = Range("a9:a100")
r1 = rng.Find(".", , xlValues).Row
r2 = rng.Find("Funding Council Grants").Row - 3
Rows(r1 & ":" & r2).Hidden = True
Cells(1, 1).Select
Application.ScreenUpdating = True

End Sub
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
how do I email amacro? leo Excel Worksheet Functions 24 August 9th 06 02:47 PM
error running a paste macro Redskinsfan Excel Worksheet Functions 1 August 7th 06 08:02 PM
link to combobox legepe Excel Discussion (Misc queries) 4 July 26th 06 04:45 PM
Editing a simple macro Connie Martin Excel Worksheet Functions 5 November 29th 05 09:19 PM
Speed up macro rn Excel Discussion (Misc queries) 3 February 21st 05 01:25 PM


All times are GMT +1. The time now is 04:03 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"