PC Review


Reply
Thread Tools Rate Thread

Automate Tab Color

 
 
=?Utf-8?B?Qm9i?=
Guest
Posts: n/a
 
      20th Aug 2007
hello-

I'd like to make a macro that changes all tabs to red when the file is Saved
As somethings else. Once they are "reset" in a save as mode, they are free
to be changed manually, I just would like to have a script that defaults a
new file to red tabs.

Does anyone on this list have any suggestions of a short script?

regards,
-b o b
 
Reply With Quote
 
 
 
 
=?Utf-8?B?Sm9lbA==?=
Guest
Posts: n/a
 
      20th Aug 2007
Add code to thisworkbook page in VBA window

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _
Cancel As Boolean)

For Each ws In Sheets
Sheets(ws.Name).Tab.ColorIndex = 3
Next ws
End Sub


"Bob" wrote:

> hello-
>
> I'd like to make a macro that changes all tabs to red when the file is Saved
> As somethings else. Once they are "reset" in a save as mode, they are free
> to be changed manually, I just would like to have a script that defaults a
> new file to red tabs.
>
> Does anyone on this list have any suggestions of a short script?
>
> regards,
> -b o b

 
Reply With Quote
Reply

Thread Tools
Rate This Thread
Rate This Thread:

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

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


Similar Threads
Thread Thread Starter Forum Replies Last Post
color transition (color changes from dark color to light color) color transition Microsoft Powerpoint 2 21st Nov 2009 12:21 PM
How to automate with vb6 - can automate two lines but no more :-( =?Utf-8?B?UGhvZW5peDFfdWs=?= Microsoft Powerpoint 1 14th Aug 2006 04:34 PM
Automate font color change of Reply emails in the InBox View =?Utf-8?B?Q0FHaXJs?= Microsoft Outlook Discussion 0 20th Jan 2006 06:09 PM
Can I automate flag color? =?Utf-8?B?UlY=?= Microsoft Outlook Discussion 0 4th Oct 2005 08:45 AM
Automate bar chart color based on value postive or negative =?Utf-8?B?a2F0aHk=?= Microsoft Excel Misc 1 31st Aug 2005 09:35 PM


Features
 

Advertising
 

Newsgroups
 


All times are GMT +1. The time now is 12:22 AM.