Design changes prompt

J

joeKra

Registered User.

Local time

Today, 16:07

Joined

Jan 24, 2012

Messages

208

• Oct 24, 2012

• #1

Hi,

i would like to know if and how it's possible to disable the " save design changes " prompt when closing the form after after changing the sorting of the data , ascending \ desc, i'm using a navigation form so it prompts when going to another tab,

any help would be appreciated .

 

boblarson

Smeghead

Local time

Today, 13:07

Joined

Jan 12, 2001

Messages

32,059

• Oct 24, 2012

• #2

How are you closing it? Using code or just X'ing out?

 

J

joeKra

Registered User.

Local time

Today, 16:07

Joined

Jan 24, 2012

Messages

208

• Oct 25, 2012

• #3

choosing the next navigation button from navigation form

 

Samantha

still learning...

Local time

Today, 16:07

Joined

Jul 12, 2012

Messages

182

• Nov 6, 2012

• #4

Bob,

I am having the same issue, did you figure anything out?

Samantha

 

M

mpspeer

Registered User.

Local time

Today, 16:07

Joined

Nov 6, 2012

Messages

18

• Dec 7, 2012

• #5

I would like to know the same.

I have date range boxes which dynamically change the design of a pivot chart in a form (and thus also the query the chart runs off of). I would like to disable or (preferably) automatically NOT save design changes before move to another tab, or clicking the close button I created.

Any help?

 

M

mpspeer

Registered User.

Local time

Today, 16:07

Joined

Nov 6, 2012

Messages

18

• Dec 11, 2012

• #6

Bump Bump.

 

Samantha

still learning...

Local time

Today, 16:07

Joined

Jul 12, 2012

Messages

182

• Jan 7, 2013

• #7

Anyone still looking for a solution - I think I found it!

This is what I have done and it seems to work.

All of the on Load events of my forms I have set warnings to true

Code:

DoCmd.SetWarnings True

In addition I have set the filters on the datasheet form with VBA

Code:

Private Sub Form_Load()
    
    DoCmd.SetWarnings True
    Me.OrderBy = "JobNumber DESC"
    Me.OrderByOn = True
    Me.Filter = ""
    Me.FilterOn = False
        
End Sub

Lastly all of the navigation tabs I have set the warnings to False

Code:

Private Sub NavigationButton11_Enter()
DoCmd.SetWarnings False
End Sub

So far it seems to work, no more prompts!
Samantha

 

M

mpspeer

Registered User.

Local time

Today, 16:07

Joined

Nov 6, 2012

Messages

18

• Jan 7, 2013

• #8

Worked beautifully. I didn't even use your middle code there as I was using a PivotChart that dynamically changed based on a query.

Did you turn the warnings back to True on form close event?

 

Samantha

still learning...

Local time

Today, 16:07

Joined

Jul 12, 2012

Messages

182

• Jan 7, 2013

• #9

I'm really just learning, although the navigation tabs are where they are turned off. So perhaps it would be good practice to turn them back on, it couldn't hurt.