LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 22,906
Default Select All Sheets and clear Interior Cell colours

Sub clear_color()
Application.ScreenUpdating = False
Dim n As Single
For n = 1 To Sheets.Count
Sheets(n).Cells.Interior.ColorIndex = xlNone
Next n
Application.ScreenUpdating = True
End Sub


Gord Dibben Excel MVP

On Mon, 21 Mar 2005 14:16:45 -0800, "ExcelMonkey"
wrote:

How do you select all sheets in VBA to clear interior
colours. When I record it looks like this. However I
want to avoid using sheet names like this.


Sheets(Array
("Sheet1", "Sheet2", "Sheet3", "Sheet4", "Sheet5","Sheet6"
, "Sheet7", "Sheet8", "Sheet9")). Select
Sheets("Audit Results").Activate
Cells.Select
Selection.Interior.ColorIndex = xlNone


 
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
colours in spread sheets Llanelli lad Excel Discussion (Misc queries) 2 March 16th 09 11:00 PM
How to select Formula cells with red interior? [email protected] Excel Discussion (Misc queries) 15 August 12th 06 09:19 PM
How do you select the colours on Microsoft excel colour pallets? [email protected] Excel Discussion (Misc queries) 1 May 11th 06 12:27 AM
Can't get sensible clear colours in Excel 2003 chrisco Excel Worksheet Functions 1 September 22nd 05 04:44 PM
Excel 2003 font colours and cell colours bretta Excel Discussion (Misc queries) 1 April 17th 05 03:45 AM


All times are GMT +1. The time now is 04:18 AM.

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

About Us

"It's about Microsoft Excel"