• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

workbook crash when saving

Afarag

Member
Dears,

kindly i need your help in solving a trouble in shared workbook as this sheet have an "user form" for authorization level option. when saving this workbook in any PC, the workbook has been crashed without saving.

i noticed when deactivate the authorization level option the problem is go away. but i can't give up this option, as it required

there is a solution for this problem

this problem is happened in office 2013 only

Gratefully,
 

Attachments

  • All New Attrition (Final).xlsm
    772.7 KB · Views: 8
Hi,

Tested with Excel 2013 32 Bit

The file shall enter into error possibly due to a missing link
I could see the hidden sheets and I saved them to a new file xlsm
The error no longer occurs
 
Hi,

sorry i can't get exactly how can i solve this problem, the file is saved already with XLSM.
could you please clarify how can i save the hidden sheets to a new XLSM file

Thanks a lot,
 
Hi,

After opening the file to run the macro: Sub Mostra_Sheet
With the following code you can discover hidden sheets

Code:
Option Explicit

Sub Mostra_Sheet()
  Application.DisplayFormulaBar = True
  ActiveWindow.DisplayWorkbookTabs = True
  Application.EnableEvents = False
  Dim objSheet    As Object
  Dim szType      As String
  Dim wb          As Workbook
  Set wb = ActiveWorkbook
  On Error Resume Next
  With wb
    For Each objSheet In ActiveWorkbook.Sheets
      szType = TypeName(objSheet)
      If szType = "Worksheet" Then
        Sheets(objSheet.Name).Visible = xlSheetVisible
      End If
    Next objSheet
  End With
  Application.EnableEvents = True
  'Clean up variables
  Set wb = Nothing
End Sub

Now copy the individual cards on a new sheet
 
Back
Top