Hi all,
Im using some code from another application (access) to populate a range
with data, and save the sheet. However when I save it and open it, the sheet
i've worked on is Hidden. I can unhide this manually, and all else is in
order.

I used the sheet.visible property before saving but this does not work.

Any advice welcome.


Gerry Abbott


Code:
-------------------------------------------------------------
Private Sub Command2_Click()

Dim myWb As Workbook
Dim mySh As Worksheet
Dim i As Integer

Set myWb = GetObject("My file........")
Set mySh = myWb.Worksheets("ResCare")

For i = 1 To 10
mySh.Range("A" & i).Value = i * 10
Next i

myWb.Worksheets(1).Visible = xlSheetVisible
myWb.Save

Set mySh = Nothing
Set myWb = Nothing

End Sub
-------------------------------------------------------------