Worksheet_Calculate problem
 

I have a worksheet_calculate event. This event is fired when I open another
sheet which does not have any events (or even a new sheet). The problem is
that when the new sheet opens, it gives an error saying that this_particular
sheet is not found. It is obviously looking for this_particular sheet in the
new opened sheet. How to avoid this. I am looking for a code like:

Private Sub Worksheet_Calculate()

If Me.Name < Range("S2") Then Exit Sub

where Range("S2") has the filename of the original sheet where the above
event resides. The above checks for the sheetname, but I need the workbook
name. I need something like
Workbook.Name




--
- Mangesh
------------------------------------------
Office XP & Windows XP

Worksheet_Calculate problem
 

This works fine:

Private Sub Worksheet_Calculate()
fname = Range("S2")
For Each bk In Workbooks
If Trim(left(bk.Name, Len(fname))) < fname Then Exit Sub
Next

but then is a FOR...NEXT required. No direct way to get the workbook name?

Mangesh





"Mangesh Yadav" wrote in message
...
I have a worksheet_calculate event. This event is fired when I open
another
sheet which does not have any events (or even a new sheet). The problem is
that when the new sheet opens, it gives an error saying that
this_particular
sheet is not found. It is obviously looking for this_particular sheet in
the
new opened sheet. How to avoid this. I am looking for a code like:

Private Sub Worksheet_Calculate()

If Me.Name < Range("S2") Then Exit Sub

where Range("S2") has the filename of the original sheet where the above
event resides. The above checks for the sheetname, but I need the workbook
name. I need something like
Workbook.Name




--
- Mangesh
------------------------------------------
Office XP & Windows XP

Worksheet_Calculate problem
 

Me.Parent.Name

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Mangesh Yadav" wrote in message
...
This works fine:

Private Sub Worksheet_Calculate()
fname = Range("S2")
For Each bk In Workbooks
If Trim(left(bk.Name, Len(fname))) < fname Then Exit Sub
Next

but then is a FOR...NEXT required. No direct way to get the workbook name?

Mangesh





"Mangesh Yadav" wrote in message
...
I have a worksheet_calculate event. This event is fired when I open
another
sheet which does not have any events (or even a new sheet). The problem
is
that when the new sheet opens, it gives an error saying that
this_particular
sheet is not found. It is obviously looking for this_particular sheet in
the
new opened sheet. How to avoid this. I am looking for a code like:

Private Sub Worksheet_Calculate()

If Me.Name < Range("S2") Then Exit Sub

where Range("S2") has the filename of the original sheet where the above
event resides. The above checks for the sheetname, but I need the
workbook
name. I need something like
Workbook.Name




--
- Mangesh
------------------------------------------
Office XP & Windows XP

Worksheet_Calculate problem
 

Hi Bob,

Thanks very much.

Mangesh



"Bob Phillips" wrote in message
...
Me.Parent.Name

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Mangesh Yadav" wrote in message
...
This works fine:

Private Sub Worksheet_Calculate()
fname = Range("S2")
For Each bk In Workbooks
If Trim(left(bk.Name, Len(fname))) < fname Then Exit Sub
Next

but then is a FOR...NEXT required. No direct way to get the workbook
name?

Mangesh





"Mangesh Yadav" wrote in message
...
I have a worksheet_calculate event. This event is fired when I open
another
sheet which does not have any events (or even a new sheet). The
problem
is
that when the new sheet opens, it gives an error saying that
this_particular
sheet is not found. It is obviously looking for this_particular sheet
in
the
new opened sheet. How to avoid this. I am looking for a code like:

Private Sub Worksheet_Calculate()

If Me.Name < Range("S2") Then Exit Sub

where Range("S2") has the filename of the original sheet where the
above
event resides. The above checks for the sheetname, but I need the
workbook
name. I need something like
Workbook.Name




--
- Mangesh
------------------------------------------
Office XP & Windows XP

Worksheet_Calculate problem
 

Always a pleasure to help a helper Mangesh :-)

Bob


"Mangesh Yadav" wrote in message
...
Hi Bob,

Thanks very much.

Mangesh



"Bob Phillips" wrote in message
...
Me.Parent.Name

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Mangesh Yadav" wrote in message
...
This works fine:

Private Sub Worksheet_Calculate()
fname = Range("S2")
For Each bk In Workbooks
If Trim(left(bk.Name, Len(fname))) < fname Then Exit Sub
Next

but then is a FOR...NEXT required. No direct way to get the workbook
name?

Mangesh





"Mangesh Yadav" wrote in message
...
I have a worksheet_calculate event. This event is fired when I open
another
sheet which does not have any events (or even a new sheet). The
problem
is
that when the new sheet opens, it gives an error saying that
this_particular
sheet is not found. It is obviously looking for this_particular
sheet
in
the
new opened sheet. How to avoid this. I am looking for a code like:

Private Sub Worksheet_Calculate()

If Me.Name < Range("S2") Then Exit Sub

where Range("S2") has the filename of the original sheet where the
above
event resides. The above checks for the sheetname, but I need the
workbook
name. I need something like
Workbook.Name




--
- Mangesh
------------------------------------------
Office XP & Windows XP

Worksheet_Calculate problem
 

:)

Mangesh



"Bob Phillips" wrote in message
...
Always a pleasure to help a helper Mangesh :-)

Bob


"Mangesh Yadav" wrote in message
...
Hi Bob,

Thanks very much.

Mangesh



"Bob Phillips" wrote in message
...
Me.Parent.Name

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Mangesh Yadav" wrote in message
...
This works fine:

Private Sub Worksheet_Calculate()
fname = Range("S2")
For Each bk In Workbooks
If Trim(left(bk.Name, Len(fname))) < fname Then Exit Sub
Next

but then is a FOR...NEXT required. No direct way to get the workbook
name?

Mangesh





"Mangesh Yadav" wrote in message
...
I have a worksheet_calculate event. This event is fired when I
open
another
sheet which does not have any events (or even a new sheet). The
problem
is
that when the new sheet opens, it gives an error saying that
this_particular
sheet is not found. It is obviously looking for this_particular
sheet
in
the
new opened sheet. How to avoid this. I am looking for a code like:

Private Sub Worksheet_Calculate()

If Me.Name < Range("S2") Then Exit Sub

where Range("S2") has the filename of the original sheet where the
above
event resides. The above checks for the sheetname, but I need the
workbook
name. I need something like
Workbook.Name




--
- Mangesh
------------------------------------------
Office XP & Windows XP