The color of the selected tab is the same color as the worksheet when is has
no coloring. This is a Windows setting, not an excel setting. If you change
the background color for your windows in your windows settings, then you can
alter the tab color of the selected sheet. If you want what is currently
white to be red, then you can do it. <g>
--
Regards,
Tom Ogilvy
"Helge V. Larsen" wrote:
> We are closer - but not at all close to the target.
>
> What you suggest will only bring colour to the UNDERSCORE of the active
> sheet's tab.
> I am interested in colouring the WHOLE tab of the active sheet!
>
> Helge
>
> "Joel" <(E-Mail Removed)> wrote in message
> news:9FC880BF-1799-4A8B-9460-(E-Mail Removed)...
> > If you add this code into the ThisWorkbook VBA sheet it will underline the
> > active sheet in Red and make all other tabs white
> >
> > Private Sub Workbook_SheetActivate(ByVal Sh As Object)
> > For Each ws In Worksheets
> >
> > If ws.Name = ActiveSheet.Name Then
> > Sheets(ws.Name).Tab.ColorIndex = 3
> > Else
> > Sheets(ws.Name).Tab.ColorIndex = xlNone
> > End If
> > Next ws
> > End Sub
> >
> > "Helge V. Larsen" wrote:
> >
> >> Perhaps I was not clear.
> >>
> >> Let us suppose that all tabs are blue. Then I want the colour of any
> >> sheet
> >> tab to turn RED when the sheet is activated.
> >>
> >> Helge
> >>
> >>
> >> "Joel" <(E-Mail Removed)> wrote in message
> >> news:383D093F-578B-4039-B83D-(E-Mail Removed)...
> >> > Thsis simple macro will turn all tabs red
> >> >
> >> > Sub Macro1()
> >> > '
> >> > ' Macro1 Macro
> >> > ' Macro recorded 8/8/2007
> >> > '
> >> >
> >> > '
> >> > For Each ws In Worksheets
> >> >
> >> > Sheets(ws.Name).Tab.ColorIndex = 3
> >> > Next ws
> >> > End Sub
> >> >
> >> >
> >> > "Helge V. Larsen" wrote:
> >> >
> >> >> When a sheet is activated, its tab turns WHITE with a coloured
> >> >> underscore.
> >> >> The underscore colour is equal to the tab colour when the sheet is not
> >> >> active.
> >> >>
> >> >> I want to control the colour of the active tab, for instance I would
> >> >> like
> >> >> to
> >> >> make it RED instead of white. The active tab colour (e.g. red) should
> >> >> not
> >> >> be
> >> >> individual, but common to all sheets. Is it in some way possible ?
> >> >>
> >> >> (I use Excel 2003.)
> >> >>
> >> >> Helge
> >> >>
> >> >>
> >> >>
> >>
> >>
> >>
>
>
>
|