ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   On Error Goto ignored (https://www.excelbanter.com/excel-programming/320169-error-goto-ignored.html)

Fred Smith

On Error Goto ignored
 
I wanted to determine whether a sheet existed in the active workbook. So I
used:

On Error Goto NoPerfSheet
Sheets("Performance").Select
On Error Goto 0

However, Excel always stopped at the Sheets command, with a Subscript out of
range error.

I knew there would never be more than two sheets in the workbook, so I got
it working by using:

IF Sheets.Count = 1 Goto NoPerfSheet

However, I'm why the On Error statement was ignored.

What conditions causes VBE to ignore On Error?

--
Thanks,
Fred
Please reply to newsgroup, not e-mail




Robin Hammond[_2_]

On Error Goto ignored
 
Fred,

something like this

Function SheetExists(strName As String) As Boolean
Dim shName As Worksheet
On Error Resume Next
Set shName = Sheets(strName)
On Error GoTo 0
SheetExists = Not shName Is Nothing
End Function

Robin Hammond
www.enhanceddatasystems.com

"Fred Smith" wrote in message
...
I wanted to determine whether a sheet existed in the active workbook. So I
used:

On Error Goto NoPerfSheet
Sheets("Performance").Select
On Error Goto 0

However, Excel always stopped at the Sheets command, with a Subscript out
of range error.

I knew there would never be more than two sheets in the workbook, so I got
it working by using:

IF Sheets.Count = 1 Goto NoPerfSheet

However, I'm why the On Error statement was ignored.

What conditions causes VBE to ignore On Error?

--
Thanks,
Fred
Please reply to newsgroup, not e-mail






Fred Smith

On Error Goto ignored
 
That's a workaround I hadn't thought of, and I could see using it sometime.
Buy why was my On Error Goto ignored?

--
Regards,
Fred
Please reply to newsgroup, not e-mail


"Robin Hammond" wrote in message
...
Fred,

something like this

Function SheetExists(strName As String) As Boolean
Dim shName As Worksheet
On Error Resume Next
Set shName = Sheets(strName)
On Error GoTo 0
SheetExists = Not shName Is Nothing
End Function

Robin Hammond
www.enhanceddatasystems.com

"Fred Smith" wrote in message
...
I wanted to determine whether a sheet existed in the active workbook. So I
used:

On Error Goto NoPerfSheet
Sheets("Performance").Select
On Error Goto 0

However, Excel always stopped at the Sheets command, with a Subscript out
of range error.

I knew there would never be more than two sheets in the workbook, so I
got it working by using:

IF Sheets.Count = 1 Goto NoPerfSheet

However, I'm why the On Error statement was ignored.

What conditions causes VBE to ignore On Error?

--
Thanks,
Fred
Please reply to newsgroup, not e-mail








Robin Hammond[_2_]

On Error Goto ignored
 
Don't know. Easier to build the function once and use it lots of times
though.

Robin Hammond
www.enhanceddatasystems.com

"Fred Smith" wrote in message
...
That's a workaround I hadn't thought of, and I could see using it
sometime. Buy why was my On Error Goto ignored?

--
Regards,
Fred
Please reply to newsgroup, not e-mail


"Robin Hammond" wrote in message
...
Fred,

something like this

Function SheetExists(strName As String) As Boolean
Dim shName As Worksheet
On Error Resume Next
Set shName = Sheets(strName)
On Error GoTo 0
SheetExists = Not shName Is Nothing
End Function

Robin Hammond
www.enhanceddatasystems.com

"Fred Smith" wrote in message
...
I wanted to determine whether a sheet existed in the active workbook. So
I used:

On Error Goto NoPerfSheet
Sheets("Performance").Select
On Error Goto 0

However, Excel always stopped at the Sheets command, with a Subscript
out of range error.

I knew there would never be more than two sheets in the workbook, so I
got it working by using:

IF Sheets.Count = 1 Goto NoPerfSheet

However, I'm why the On Error statement was ignored.

What conditions causes VBE to ignore On Error?

--
Thanks,
Fred
Please reply to newsgroup, not e-mail










Earl Kiosterud[_4_]

On Error Goto ignored
 
Fred,

Your code runs as it should on my XL2002.

On Error GoTo NoPerfSheet
Sheets("Performance").Select
On Error GoTo 0
Exit Sub
NoPerfSheet:
MsgBox "NoPerfSheet"

--
Earl Kiosterud
mvpearl omitthisword at verizon period net
-------------------------------------------

"Fred Smith" wrote in message
...
I wanted to determine whether a sheet existed in the active workbook. So I
used:

On Error Goto NoPerfSheet
Sheets("Performance").Select
On Error Goto 0

However, Excel always stopped at the Sheets command, with a Subscript out
of range error.

I knew there would never be more than two sheets in the workbook, so I got
it working by using:

IF Sheets.Count = 1 Goto NoPerfSheet

However, I'm why the On Error statement was ignored.

What conditions causes VBE to ignore On Error?

--
Thanks,
Fred
Please reply to newsgroup, not e-mail







All times are GMT +1. The time now is 06:47 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com