Hi,
though I can't remember the toolbar having ever appeared
automatically, you might use a windowselectionchange event
to get that functionality.
See:
http://word.mvps.org/faqs/macrosvba/AppClassEvents.htm
plus in the class module:
Option Explicit
Public WithEvents oApp As Word.Application
Private Sub oApp_WindowSelectionChange(ByVal Sel As Selection)
If Selection.Information(wdWithInTable) Then
Application.CommandBars("Tables and Borders").Visible = True
Else
Application.CommandBars("Tables and Borders").Visible = False
End If
End Sub
--
Greetings from Bavaria, Germany
Helmut Weber, MVP WordVBA
Win XP, Office 2003
"red.sys" & Chr$(64) & "t-online.de"