Activate first sheet : Worksheet « Excel « VBA / Excel / Access / Word

Home
VBA / Excel / Access / Word
1.Access
2.Application
3.Data Type
4.Data Type Functions
5.Date Functions
6.Excel
7.File Path
8.Forms
9.Language Basics
10.Math Functions
11.Outlook
12.PowerPoint
13.String Functions
14.Windows API
15.Word
16.XML
VBA / Excel / Access / Word » Excel » Worksheet 




Activate first sheet
 
Sub GotoFirstSheet()
  Dim i&
  For i = To Sheets.Count
    If Sheets(i).Visible And TypeName(Sheets(i)) <> "Module" Then
      Sheets(i).Select
      Exit Sub
    End If
  Next i
End Sub

 














Related examples in the same category
1.Select Entire Sheet
2.Get Worksheets count in a Workbook
3.Get Worksheet name
4.changes the value of the Name property of the first worksheet in the first workbook of the Excel application:
5.Gives indexes of sheets
6.Inserts a new sheet after each sheet
7.Loop through all worksheets in workbook and reset values in a specific range on each sheet.
8.Group sheets together
9.Reference worksheet across worksheet
10.Determines if a given worksheet name exists in a workbook
11.Activate last sheet
12.Reference a worksheet from a workbook
13.Safely Deleting Worksheets Using the DeleteSheet Function
14.Using a Function to Check for the Existence of a Code Name
15.Using the Parent Property to Obtain a Reference to an Object's Parent Object
java2s.com  | Contact Us | Privacy Policy
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.