thanks thats magic
thanks thats magic
This should work as well
![]()
Option Explicit Private Sub ListBox1_Click() Sheets(ListBox1.Value).Visible = Not Sheets(ListBox1.Value).Visible Sheets(ListBox1.Value).Activate End Sub
Hope that helps.
RoyUK
--------
For Excel Tips & Solutions, free examples and tutorials why not check out my web site
Free DataBaseForm example
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks