ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Worksheet Delete method's dialog box (https://www.excelbanter.com/excel-programming/408496-worksheet-delete-methods-dialog-box.html)

xlmaven

Worksheet Delete method's dialog box
 
The Microsoft documentation states that the delete method for a
worksheet object issues a boolean False if a user clicks Cancel on the
dialog box that gets generated warning that data may be lost if the
worksheet is deleted. How can the return value from this dialog box
be examined in VBA? I get compile errors when I try examine
worksheetname.Delete directly.

Jim Thomlinson

Worksheet Delete method's dialog box
 
So you are deleting a sheet through code. When the code executes the user
confirmation dialog shows and the user decides whether to delete the sheet or
not.

After this is complete why not just check for the existence of the sheet
with a function something like this...

Public Function SheetExists(SName As String, _
Optional ByVal Wb As Workbook) As Boolean
'Chip Pearson
On Error Resume Next
If Wb Is Nothing Then Set Wb = ThisWorkbook
SheetExists = CBool(Len(Wb.Sheets(SName).Name))
End Function
--
HTH...

Jim Thomlinson


"xlmaven" wrote:

The Microsoft documentation states that the delete method for a
worksheet object issues a boolean False if a user clicks Cancel on the
dialog box that gets generated warning that data may be lost if the
worksheet is deleted. How can the return value from this dialog box
be examined in VBA? I get compile errors when I try examine
worksheetname.Delete directly.


xlmaven

Worksheet Delete method's dialog box
 
On Mar 28, 11:24*am, Jim Thomlinson <James_Thomlin...@owfg-Re-Move-
This-.com wrote:
So you are deleting a sheet through code. When the code executes the user
confirmation dialog shows and the user decides whether to delete the sheet or
not.

After this is complete why not just check for the existence of the sheet
with a function something like this...

Public Function SheetExists(SName As String, _
* * * * * * * * * * *Optional ByVal Wb As Workbook) As Boolean
'Chip Pearson
* * On Error Resume Next
* * If Wb Is Nothing Then Set Wb = ThisWorkbook
* * SheetExists = CBool(Len(Wb.Sheets(SName).Name))
End Function
--
HTH...

Jim Thomlinson



"xlmaven" wrote:
The Microsoft documentation states that the delete method for a
worksheet object issues a boolean False if a user clicks Cancel on the
dialog box that gets generated warning that data may be lost if the
worksheet is deleted. *How can the return value from this dialog box
be examined in VBA? *I get compile errors when I try examine
worksheetname.Delete directly.- Hide quoted text -


- Show quoted text -


Jim,

Thanks for your reply. My concern is more fundamental--I am just
curious about how to get at the boolean value that the documentation
states is returned by the delete method.

Jim Thomlinson

Worksheet Delete method's dialog box
 
Since you do not directly spawn the dialog you would need to get a handle to
it somehow. IMO that is more work than it's worth.
--
HTH...

Jim Thomlinson


"xlmaven" wrote:

On Mar 28, 11:24 am, Jim Thomlinson <James_Thomlin...@owfg-Re-Move-
This-.com wrote:
So you are deleting a sheet through code. When the code executes the user
confirmation dialog shows and the user decides whether to delete the sheet or
not.

After this is complete why not just check for the existence of the sheet
with a function something like this...

Public Function SheetExists(SName As String, _
Optional ByVal Wb As Workbook) As Boolean
'Chip Pearson
On Error Resume Next
If Wb Is Nothing Then Set Wb = ThisWorkbook
SheetExists = CBool(Len(Wb.Sheets(SName).Name))
End Function
--
HTH...

Jim Thomlinson



"xlmaven" wrote:
The Microsoft documentation states that the delete method for a
worksheet object issues a boolean False if a user clicks Cancel on the
dialog box that gets generated warning that data may be lost if the
worksheet is deleted. How can the return value from this dialog box
be examined in VBA? I get compile errors when I try examine
worksheetname.Delete directly.- Hide quoted text -


- Show quoted text -


Jim,

Thanks for your reply. My concern is more fundamental--I am just
curious about how to get at the boolean value that the documentation
states is returned by the delete method.



All times are GMT +1. The time now is 03:01 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com