I'm creating an Excel workbook from VB6 that contains exported SQL Server data. The workbook can contain more than one sheet - when I'm ready to save it, how can I reposition to the first sheet? I've tried the following code, but when re-opening the workbook it opens to the last sheet created:

    Set oSheet = oWB.Worksheets(1)
    oWB.SaveAs (msExcelPath & msExcelFileName)

Any help would be appreciated. Thanks!

You can use either of the following

oWB.Worksheets(1).Activate

Or

 Set oSheet = oWB.Worksheets(1)
 oSheet.Activate

Cheers
Shasur

http://www.dotnetdud.blogspot.com

VBA Tips & Tricks (http://www.vbadud.blogspot.com)