Save Excel using VBA

[smile_please]

Hi All,

I have an Excel file (For Eg; I have C:\Test.xlsx), In this file i need to insert a new sheet and save it.

Im able to insert a new sheet and save it, but when i open manually, the sheets are hidden. I need to goto View-> Unhide to view the sheets..

Is there any script to add a new sheet and it should be able to view when i open the file.

The script i used is:

Set C_WorkBook = GetObject("C:\Test.xlsx")
Set C_WorkSheet = C_WorkBook.Worksheets.Add
C_WorkSheet.Name = "ABC"
C_WorkBook.save
C_WorkBook.close


Thanks in Advance,
Bala

[Bob Phillips]

I don't see why it should be hidden, but ...

[vba]

Set C_WorkBook = GetObject("C:\Test.xlsx")
Set C_WorkSheet = C_WorkBook.Worksheets.Add
C_WorkSheet.Name = "ABC"
C_WorkSheet.Visible = xlSheetVisible
C_WorkBook.Save
C_WorkBook.Close
[/vba]

[smile_please]

Thanks for your reply..
But I used the above script, but still the sheet are hidden only..

[lucas]

If you add a sheet manually, is it hidden?

[mdmackillop]

Can you post your workbook to check for other code which may be causing this?

[smile_please]

If i add manually ths sheet is not hidden...

[Bob Phillips]

Without seeing the workbook, there is little we can offer I feel.