Checking if Worksheet variable is inizialized

[hammaway]

I am trying to figure out a way to check if a Worksheet variable has been inizialized/assigned.
I am returning an object Worksheet from a function, and I need to handle errors.
What happens is that if an error occurs, the worksheet is not assigned and the variable that is supposed to get the value when calling the function raises an error "Object variable or With block variable not set"

Dim readSheet As Worksheet
readSheet = getWorkSheet(fileName)

Function getWorkSheet(path As String) As Worksheet
    Dim wb As Workbook
    
    On Error GoTo handleOpen
    Set wb = Workbooks.Open(path, ReadOnly = False)
    getWorkSheet = wb.Worksheets(1)
    wb.Close savechanges = False
    Exit Function

handleOpen:
    wb.Close savechanges = False
    'I need to handle the getWorksheet variable not inizialized here
    
End Function

 

[Fluff]

Hi & welcome to MrExcel.
I am surprised that even runs as there are a number of errors, try

Function getWorkSheet(path As String) As Worksheet
    Dim wb As Workbook
    
    On Error GoTo handleOpen
    Set wb = Workbooks.Open(path, ReadOnly:=False)
    Set getWorkSheet = wb.Worksheets(1)
    wb.Close savechanges:=False
    Exit Function

handleOpen:
    wb.Close savechanges:=False
    'I need to handle the getWorksheet variable not inizialized here
    
End Function

and

        Dim readSheet As Worksheet
Set readSheet = getWorkSheet(fileName)

 

[hammaway]

Hi & welcome to MrExcel.
I am surprised that even runs as there are a number of errors, try

Function getWorkSheet(path As String) As Worksheet
    Dim wb As Workbook
   
    On Error GoTo handleOpen
    Set wb = Workbooks.Open(path, ReadOnly:=False)
    Set getWorkSheet = wb.Worksheets(1)
    wb.Close savechanges:=False
    Exit Function

handleOpen:
    wb.Close savechanges:=False
    'I need to handle the getWorksheet variable not inizialized here
   
End Function

and

        Dim readSheet As Worksheet
Set readSheet = getWorkSheet(fileName)

Hi, thanks for the support.
Any advice on how to handle non initialised Worksheet variables?

 

[RoryA]

Your function isn't going to do you a lot of a good as you can't use a worksheet variable if the parent workbook is closed.

 

[hammaway]

Your function isn't going to do you a lot of a good as you can't use a worksheet variable if the parent workbook is closed.

I agree. I am asking how do I check if the variable has been initialized or not (= parent workbook opened and worksheet variable assigned) so I can avoid trying to manupulate a variable that doesn't exist.

 

[RoryA]

For a case like this you have to use an error handler. But why have you written a function that can't possibly ever work?