One way:

Const sNAME As String = "ParticularName"
Dim ws As Worksheet
On Error Resume Next
Set ws = Worksheets(sNAME)
On Error GoTo 0
If Not ws Is Nothing Then
MsgBox "Worksheet " & sNAME & " exists"
Else
MsgBox "Worksheet " & sNAME & " doesn't exist"
End If

In article <03312BAA-6265-4E08-A721-2AA79D8B43F9@microsoft.com>,
"Kaval" <Kaval@discussions.microsoft.com> wrote:

> Is there an easy way to find out if a sheet with a particular name already
> exists in a workbook?
>
> Thanks, Kaval