| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
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 |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
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 |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
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 |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
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 |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
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 |
|
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
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 |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| worksheet_calculate code | Excel Discussion (Misc queries) | |||
| worksheet_calculate | Excel Discussion (Misc queries) | |||
| worksheet_calculate | Excel Discussion (Misc queries) | |||
| Worksheet_Calculate event problem | Excel Programming | |||
| worksheet_calculate **help** | Excel Programming | |||
![Mangesh Yadav[_4_] is offline](https://www.excelbanter.com/images/SultanThemeVB3R/statusicon/user_offline.gif)
Linear Mode
