Modify ↓
Opened 15 years ago
Closed 15 years ago
#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 Changed 15 years ago by Valik
- Severity changed from None to Blocking
comment:2 Changed 15 years ago by Valik
- Milestone set to 3.3.1.4
- Owner changed from Gary to Valik
- Resolution set to Fixed
- Status changed from new to closed
Guidelines for posting comments:
- You cannot re-open a ticket but you may still leave a comment if you have additional information to add.
- In-depth discussions should take place on the forum.
For more information see the full version of the ticket guidelines here.
Note: See
TracTickets for help on using
tickets.
Fixed in version: 3.3.1.4