Excel: SheetExists()

16 Mar

Excel VBA does not provide a method to checking if a worksheet exists or not. A simple function below provides one such solution:

Public Function SheetExists(ByVal SheetName)

Dim wsTestSheet As Worksheet

On Error Resume Next
Set wsTestSheet = Sheets(SheetName)

If wsTestSheet Is Nothing Then

SheetExists = False


SheetExists = True

End IfSet wsTestSheet = Nothing
On Error GoTo 0

End Function

Leave a comment

Posted by on March 16, 2007 in Scripts



Leave a Reply

Fill in your details below or click an icon to log in: Logo

You are commenting using your account. Log Out /  Change )

Google+ photo

You are commenting using your Google+ account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )


Connecting to %s

%d bloggers like this: