+ Reply to Thread
Results 1 to 2 of 2

Macro Enabled Worksheets are always asking to save on exit ??

  1. 01-21-2022, 05:51 PM #1
    mdlitalien
    mdlitalien is offline
    Registered User
    Join Date
    01-21-2022
    Location
    Texas, USA
    MS-Off Ver
    Office 16
    Posts
    2

    Macro Enabled Worksheets are always asking to save on exit ??

    Hello all,

    So I can't find this issue anywhere. I have a Macro-Enabled workbook that when opened and immediately closed asks "Would you like to save changes?" even though nothing was changed. I've seen help articles about this explaining the number of reasons that this could be happening. (1) Volatile functions - I do have a few, although that doesn't seem to be the issue (more on this later). (2) Formula's with links to another workbook - I have made sure there are none. (3) Linked Pictures - There are None (4) Iterative Formulas - I have made sure there are none (5) Charts getting data from other workbooks - There are none (6) VBA Code that updates the workbook - again, I don't think that I have any.

    It seems like this issue occurs for any Macro-Enabled workbooks I open. Even older spreadsheets that this never happened are experiencing this issue.

    Solutions I've tried:
    - I have a few functions that call "Today()". I removed all of them and the issue still persisted.
    - Next I deleted all Macro's and saved the file as a standard (non Macro-Enabled) sheet. Once I did that step, the workbook stopped asking to save every time it was opened and closed.

    So the problem definitely seems to be with the Macros. What is even weirder, is that if the Macro-Enabled Workbook is Open, and then I open and close the Non-Macro Enabled version, then it starts asking me if I want to save the Non-Macro Enabled version. I tried deleting and rebuilding the macros too...no luck.

    Any ideas?

    I'm using Office 16
    Windows 11

    Thanks to anyone who spends any time helping me with this. It's greatly appreciated.

    Mark L
    Last edited by mdlitalien; 01-21-2022 at 06:00 PM.
    Reply With QuoteRegister To Reply
  2. 01-21-2022, 05:54 PM #2
    mdlitalien
    mdlitalien is offline
    Registered User
    Join Date
    01-21-2022
    Location
    Texas, USA
    MS-Off Ver
    Office 16
    Posts
    2

    Re: Macro Enabled Worksheets are always asking to save on exit ??

    Here are the basic Macros I am using, all of which run without any errors:
    _____________________________________________
    Sub ClearDebts()
    '
    ' ClearDebts Macro
    '
    Range("B4,B5:I43,G4:I4").ClearContents
    Range("B4").Select
    '
    End Sub
    _____________________________________________
    Sub DEBTS100LTV()
    '
    ' DEBTS100LTV Macro
    ' Copies Paid Off Debts to 100% LTV Cash Out Details on Calc
    '

    '
    ' just a cool code to activate scrolling. leaving here, might delete later... ActiveWindow.SmallScroll Down:=15
    Sheets("Debt").Range("M44").Copy
    Sheets("Main").Range("C25").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    Sheets("Debt").Range("N44").Copy
    Sheets("Main").Range("D25").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    Sheets("Debt").Range("O44").Copy
    Sheets("Main").Range("C26").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    Sheets("Debt").Range("P44").Copy
    Sheets("Main").Range("D26").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    Sheets("Debt").Range("Q44").Copy
    Sheets("Main").Range("C27").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    Sheets("Debt").Range("R44").Copy
    Sheets("Main").Range("D27").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False

    End Sub
    _____________________________________________
    Sub DEBTS90LTV()
    '
    ' DEBTS90LTV Macro
    ' Copies liabilites from debts to 90% LTV Cash Out Details on Calc
    '
    Sheets("Debt").Range("M44").Copy
    Sheets("Main").Range("G25").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    Sheets("Debt").Range("N44").Copy
    Sheets("Main").Range("H25").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    Sheets("Debt").Range("O44").Copy
    Sheets("Main").Range("G26").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    Sheets("Debt").Range("P44").Copy
    Sheets("Main").Range("H26").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    Sheets("Debt").Range("Q44").Copy
    Sheets("Main").Range("G27").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    Sheets("Debt").Range("R44").Copy
    Sheets("Main").Range("H27").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
    '
    End Sub
    _____________________________________________

    Sub ClearQuickApp()
    '
    ' ClearQuickApp Macro
    '
    Range("D2").Select
    Selection.ClearContents
    Range("H2").Select
    Selection.ClearContents
    Range("L2").Select
    Selection.ClearContents
    Range("O2").Select
    Selection.ClearContents
    Range("D3").Select
    Selection.ClearContents
    Range("H3").Select
    Selection.ClearContents
    Range("O3").Select
    Selection.ClearContents
    Range("D5").Select
    Selection.ClearContents
    Range("H5").Select
    Selection.ClearContents
    Range("L5").Select
    Selection.ClearContents
    Range("O5").Select
    Selection.ClearContents
    Range("O6").Select
    Selection.ClearContents
    Range("D7").Select
    Selection.ClearContents
    Range("E9").Select
    Selection.ClearContents
    Range("J9").Select
    Selection.ClearContents
    Range("O9").Select
    Selection.ClearContents
    Range("D11").Select
    Selection.ClearContents
    Range("K11").Select
    Selection.ClearContents
    Range("N11").Select
    Selection.ClearContents
    Range("P11").Select
    Selection.ClearContents
    Range("E13").Select
    Selection.ClearContents
    Range("H13").Select
    Selection.ClearContents
    Range("K13").Select
    Selection.ClearContents
    Range("O13").Select
    Selection.ClearContents
    Range("D14").Select
    Selection.ClearContents
    Range("K14").Select
    Selection.ClearContents
    Range("D15").Select
    Selection.ClearContents
    Range("G15").Select
    Selection.ClearContents
    Range("J15").Select
    Selection.ClearContents
    Range("L15").Select
    Selection.ClearContents
    Range("D16").Select
    Selection.ClearContents
    Range("F16").Select
    Selection.ClearContents
    Range("J16").Select
    Selection.ClearContents
    Range("D17").Select
    Selection.ClearContents
    Range("H17").Select
    Selection.ClearContents
    Range("L17").Select
    Selection.ClearContents
    Range("D19").Select
    Selection.ClearContents
    Range("J19").Select
    Selection.ClearContents
    Range("P19").Select
    Selection.ClearContents
    Range("E20").Select
    Selection.ClearContents
    Range("F22").Select
    Selection.ClearContents
    Range("L22").Select
    Selection.ClearContents
    Range("D24").Select
    Selection.ClearContents
    Range("I24").Select
    Selection.ClearContents
    Range("D25").Select
    Selection.ClearContents
    Range("F25").Select
    Selection.ClearContents
    Range("E26").Select
    Selection.ClearContents
    Range("H26").Select
    Selection.ClearContents
    Range("K26").Select
    Selection.ClearContents
    Range("O26").Select
    Selection.ClearContents
    Range("F27").Select
    Selection.ClearContents
    Range("J27").Select
    Selection.ClearContents
    Range("D30:D35").Select
    Selection.ClearContents
    Range("M30:M35").Select
    Selection.ClearContents
    Range("E38").Select
    Selection.ClearContents
    Range("I38").Select
    Selection.ClearContents
    Range("N38").Select
    Selection.ClearContents
    Range("E40").Select
    Selection.ClearContents
    Range("J40").Select
    Selection.ClearContents
    Range("E42").Select
    Selection.ClearContents
    Range("E44").Select
    Selection.ClearContents
    Range("E46").Select
    Selection.ClearContents
    Range("I48").Select
    Selection.ClearContents
    Range("C51").Select
    Selection.ClearContents
    Range("K51").Select
    Selection.ClearContents
    Range("C52").Select
    Selection.ClearContents
    Range("J52").Select
    Selection.ClearContents
    Range("N52").Select
    Selection.ClearContents
    Range("P52").Select
    Selection.ClearContents
    Range("C53").Select
    Selection.ClearContents
    Range("C55").Select
    Selection.ClearContents
    Range("D2").Select
    '
    End Sub
    Reply With QuoteRegister To Reply
+ Reply to Thread
« Previous Thread | Next Thread »

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Save As non-macro enabled workbook
    By Maleficent in forum Excel Programming / VBA / Macros
    Replies: 4
    Last Post: 09-19-2019, 04:14 AM
  2. Save Template as Macro-Enabled
    By RosieW in forum Excel Programming / VBA / Macros
    Replies: 5
    Last Post: 05-08-2017, 10:34 PM
  3. Macro security issue - unable to save as macro enabled sheet
    By agadge123 in forum Excel Formulas & Functions
    Replies: 8
    Last Post: 05-31-2016, 12:36 PM
  4. Macro security issue - unable to save as macro enabled sheet
    By agadge123 in forum Excel Programming / VBA / Macros
    Replies: 1
    Last Post: 05-31-2016, 11:05 AM
  5. VBA BeforeSave can't save in Macro Enabled Template
    By lucidlil in forum Excel Programming / VBA / Macros
    Replies: 3
    Last Post: 08-02-2015, 11:15 AM
  6. VB A to save as macro enabled workbook
    By syedmehdi in forum Excel General
    Replies: 5
    Last Post: 12-09-2014, 11:49 AM
  7. Can't save macro enabled spreadsheet
    By bmcts in forum Excel - New Users/Basics
    Replies: 5
    Last Post: 02-21-2012, 10:04 PM

Tags for this Thread

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Forum Rules


Search Engine Friendly URLs by vBSEO 3.6.0 RC 1