Modify ↓

Opened on Sep 7, 2009 at 11:27:44 AM

Closed on Oct 22, 2009 at 1:47:38 AM

#1168 closed Bug (Fixed)

_ExcelBookOpen error on workbooks with hidden sheets

Reported by: frubi Owned by: Valik
Milestone: 3.3.1.4 Component: Standard UDFs
Version: 3.3.0.0 Severity: Blocking
Keywords: Cc:

Description

_ExcelBookOpen will run into an error, if the first sheet of the workbook is hidden. If you try to select it, the COM interface throws an error.

It can be fixed by testing, if the sheet is visible
Out:

.ActiveWorkbook.Sheets(1).Select ()

In:

For $xx = 1 To .ActiveWorkbook.Sheets.Count
	If .ActiveWorkbook.Sheets($xx).Visible == $xlSheetVisible Then
		.ActiveWorkbook.Sheets($xx).Select ()
		ExitLoop
	EndIf 
Next

And some additional constants are needed

Const $xlSheetHidden = 0
Const $xlSheetVisible = 1
Const $xlSheetVeryHidden = 2

Greetings
frubi

Attachments (0)

Change History (2)

comment:1 by Valik, on Oct 17, 2009 at 12:48:32 AM

Severity: None → Blocking

comment:2 by Valik, on Oct 22, 2009 at 1:47:38 AM

Milestone: → 3.3.1.4
Owner: changed from Gary to Valik
Resolution: → Fixed
Status: new → closed

Fixed in version: 3.3.1.4

Modify Ticket

Action
as closed The owner will remain Valik.

Add Comment
E-mail address and name can be saved in the Preferences .
Attachments ↑ Description ↑
 
Note: See TracTickets for help on using tickets.