Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 169
Default Screen refresh problem

Hi!
When I change a value inside a worksheet, I see the contents of an other
sheet inside the activesheet. Then, when I scroll with the mouse, it
disapears. Does anyone have an idea?
Thank you!
--
Alex St-Pierre
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 10,124
Default Screen refresh problem


A poorly designed change_event??

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Alex St-Pierre" wrote in message
...
Hi!
When I change a value inside a worksheet, I see the contents of an other
sheet inside the activesheet. Then, when I scroll with the mouse, it
disapears. Does anyone have an idea?
Thank you!
--
Alex St-Pierre


  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 169
Default Screen refresh problem

No, it's not a change_event macro. I found a part of the problem.
When I open the document, all work fine. I can delete a sheet without having
screen updating problem. Then, after running abc, if I delete a sheet or
change a value, I see the same thing (part of the content of an other sheet).
Do you have an idea?
Thank you!
Alex
Sub abc()
Call ProtectSheet(False)
Call ProtectSheet(True)
End Sub
Sub ProtectSheet(bValue As Boolean)
If bValue = True Then
ThisWorkbook.sheets("data").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-1").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-2").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-3").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-4").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-5").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-6").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-7").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
Else
ThisWorkbook.sheets("data").Unprotect
ThisWorkbook.sheets("A-1").Unprotect
ThisWorkbook.sheets("A-2").Unprotect
ThisWorkbook.sheets("A-3").Unprotect
ThisWorkbook.sheets("A-4").Unprotect
ThisWorkbook.sheets("A-5").Unprotect
ThisWorkbook.sheets("A-6").Unprotect
ThisWorkbook.sheets("A-7").Unprotect
End If
End Sub

--
Alex St-Pierre


"Don Guillett" wrote:


A poorly designed change_event??

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Alex St-Pierre" wrote in message
...
Hi!
When I change a value inside a worksheet, I see the contents of an other
sheet inside the activesheet. Then, when I scroll with the mouse, it
disapears. Does anyone have an idea?
Thank you!
--
Alex St-Pierre


.

  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 10,124
Default Screen refresh problem

I would have written the code a bit differently but

try
application.screenupdating=false
code
application.screenupdating=true

Don Guillett
Microsoft MVP Excel
SalesAid Software

"Alex St-Pierre" wrote in message
...
No, it's not a change_event macro. I found a part of the problem.
When I open the document, all work fine. I can delete a sheet without
having
screen updating problem. Then, after running abc, if I delete a sheet or
change a value, I see the same thing (part of the content of an other
sheet).
Do you have an idea?
Thank you!
Alex
Sub abc()
Call ProtectSheet(False)
Call ProtectSheet(True)
End Sub
Sub ProtectSheet(bValue As Boolean)
If bValue = True Then
ThisWorkbook.sheets("data").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-1").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-2").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-3").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-4").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-5").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-6").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-7").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
Else
ThisWorkbook.sheets("data").Unprotect
ThisWorkbook.sheets("A-1").Unprotect
ThisWorkbook.sheets("A-2").Unprotect
ThisWorkbook.sheets("A-3").Unprotect
ThisWorkbook.sheets("A-4").Unprotect
ThisWorkbook.sheets("A-5").Unprotect
ThisWorkbook.sheets("A-6").Unprotect
ThisWorkbook.sheets("A-7").Unprotect
End If
End Sub

--
Alex St-Pierre


"Don Guillett" wrote:


A poorly designed change_event??

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Alex St-Pierre" wrote in
message
...
Hi!
When I change a value inside a worksheet, I see the contents of an
other
sheet inside the activesheet. Then, when I scroll with the mouse, it
disapears. Does anyone have an idea?
Thank you!
--
Alex St-Pierre


.


  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 169
Default Screen refresh problem

It happens when I unprotect a specific sheet and it's always the content of
this sheet that we see inside other sheet.


  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 169
Default Screen refresh problem

No, it doesnt' work with application.screenupdating=false.

Since it's only one sheet that have the problem, maybe, the only thing I
see is:
1) Same thing happens with another computer
2) Can it be a variable Set abc = that is not reset at the end? (no global
variable is used) When I close the file, I thought all variable or object
information are lost).
3) I use Image in each sheets that execute a macro when you click on it.
(Image_1_Click(), Image_2_Click()). I had this programmation for a while
without having problem.
4) There's no hidden row or column.

I think the only solution is to copy the file and try to find the solution
by 1) remove all the macros from the file 2) Remove image, 3)Remove other
sheets, etc. until it works!

--
Alex St-Pierre


"Don Guillett" wrote:

I would have written the code a bit differently but

try
application.screenupdating=false
code
application.screenupdating=true

Don Guillett
Microsoft MVP Excel
SalesAid Software

"Alex St-Pierre" wrote in message
...
No, it's not a change_event macro. I found a part of the problem.
When I open the document, all work fine. I can delete a sheet without
having
screen updating problem. Then, after running abc, if I delete a sheet or
change a value, I see the same thing (part of the content of an other
sheet).
Do you have an idea?
Thank you!
Alex
Sub abc()
Call ProtectSheet(False)
Call ProtectSheet(True)
End Sub
Sub ProtectSheet(bValue As Boolean)
If bValue = True Then
ThisWorkbook.sheets("data").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-1").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-2").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-3").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-4").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-5").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-6").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-7").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
Else
ThisWorkbook.sheets("data").Unprotect
ThisWorkbook.sheets("A-1").Unprotect
ThisWorkbook.sheets("A-2").Unprotect
ThisWorkbook.sheets("A-3").Unprotect
ThisWorkbook.sheets("A-4").Unprotect
ThisWorkbook.sheets("A-5").Unprotect
ThisWorkbook.sheets("A-6").Unprotect
ThisWorkbook.sheets("A-7").Unprotect
End If
End Sub

--
Alex St-Pierre


"Don Guillett" wrote:


A poorly designed change_event??

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Alex St-Pierre" wrote in
message
...
Hi!
When I change a value inside a worksheet, I see the contents of an
other
sheet inside the activesheet. Then, when I scroll with the mouse, it
disapears. Does anyone have an idea?
Thank you!
--
Alex St-Pierre

.


.

  #7   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 10,124
Default Screen refresh problem

Look here
http://www.google.com/search?sourcei...219&q=KB973593

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Alex St-Pierre" wrote in message
...
No, it doesnt' work with application.screenupdating=false.

Since it's only one sheet that have the problem, maybe, the only thing I
see is:
1) Same thing happens with another computer
2) Can it be a variable Set abc = that is not reset at the end? (no global
variable is used) When I close the file, I thought all variable or object
information are lost).
3) I use Image in each sheets that execute a macro when you click on it.
(Image_1_Click(), Image_2_Click()). I had this programmation for a while
without having problem.
4) There's no hidden row or column.

I think the only solution is to copy the file and try to find the solution
by 1) remove all the macros from the file 2) Remove image, 3)Remove other
sheets, etc. until it works!

--
Alex St-Pierre


"Don Guillett" wrote:

I would have written the code a bit differently but

try
application.screenupdating=false
code
application.screenupdating=true

Don Guillett
Microsoft MVP Excel
SalesAid Software

"Alex St-Pierre" wrote in
message
...
No, it's not a change_event macro. I found a part of the problem.
When I open the document, all work fine. I can delete a sheet without
having
screen updating problem. Then, after running abc, if I delete a sheet
or
change a value, I see the same thing (part of the content of an other
sheet).
Do you have an idea?
Thank you!
Alex
Sub abc()
Call ProtectSheet(False)
Call ProtectSheet(True)
End Sub
Sub ProtectSheet(bValue As Boolean)
If bValue = True Then
ThisWorkbook.sheets("data").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-1").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-2").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-3").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-4").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-5").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-6").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-7").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
Else
ThisWorkbook.sheets("data").Unprotect
ThisWorkbook.sheets("A-1").Unprotect
ThisWorkbook.sheets("A-2").Unprotect
ThisWorkbook.sheets("A-3").Unprotect
ThisWorkbook.sheets("A-4").Unprotect
ThisWorkbook.sheets("A-5").Unprotect
ThisWorkbook.sheets("A-6").Unprotect
ThisWorkbook.sheets("A-7").Unprotect
End If
End Sub

--
Alex St-Pierre


"Don Guillett" wrote:


A poorly designed change_event??

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Alex St-Pierre" wrote in
message
...
Hi!
When I change a value inside a worksheet, I see the contents of an
other
sheet inside the activesheet. Then, when I scroll with the mouse, it
disapears. Does anyone have an idea?
Thank you!
--
Alex St-Pierre

.


.


  #8   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 169
Default Screen refresh problem

Thank you Don!
This is exactly the problem I describe.
KB973593:
The problem is due to some change in

functionality to the Application.Screenupdating function
upon further review of my code I found out that the issue is caused by

unprotecting / protecting non-active sheets in the workbook.
I'll try the workaround and see if it can solve it.
Alex
--
Alex St-Pierre


"Don Guillett" wrote:

Look here
http://www.google.com/search?sourcei...219&q=KB973593

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Alex St-Pierre" wrote in message
...
No, it doesnt' work with application.screenupdating=false.

Since it's only one sheet that have the problem, maybe, the only thing I
see is:
1) Same thing happens with another computer
2) Can it be a variable Set abc = that is not reset at the end? (no global
variable is used) When I close the file, I thought all variable or object
information are lost).
3) I use Image in each sheets that execute a macro when you click on it.
(Image_1_Click(), Image_2_Click()). I had this programmation for a while
without having problem.
4) There's no hidden row or column.

I think the only solution is to copy the file and try to find the solution
by 1) remove all the macros from the file 2) Remove image, 3)Remove other
sheets, etc. until it works!

--
Alex St-Pierre


"Don Guillett" wrote:

I would have written the code a bit differently but

try
application.screenupdating=false
code
application.screenupdating=true

Don Guillett
Microsoft MVP Excel
SalesAid Software

"Alex St-Pierre" wrote in
message
...
No, it's not a change_event macro. I found a part of the problem.
When I open the document, all work fine. I can delete a sheet without
having
screen updating problem. Then, after running abc, if I delete a sheet
or
change a value, I see the same thing (part of the content of an other
sheet).
Do you have an idea?
Thank you!
Alex
Sub abc()
Call ProtectSheet(False)
Call ProtectSheet(True)
End Sub
Sub ProtectSheet(bValue As Boolean)
If bValue = True Then
ThisWorkbook.sheets("data").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-1").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-2").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-3").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-4").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-5").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-6").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-7").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
Else
ThisWorkbook.sheets("data").Unprotect
ThisWorkbook.sheets("A-1").Unprotect
ThisWorkbook.sheets("A-2").Unprotect
ThisWorkbook.sheets("A-3").Unprotect
ThisWorkbook.sheets("A-4").Unprotect
ThisWorkbook.sheets("A-5").Unprotect
ThisWorkbook.sheets("A-6").Unprotect
ThisWorkbook.sheets("A-7").Unprotect
End If
End Sub

--
Alex St-Pierre


"Don Guillett" wrote:


A poorly designed change_event??

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Alex St-Pierre" wrote in
message
...
Hi!
When I change a value inside a worksheet, I see the contents of an
other
sheet inside the activesheet. Then, when I scroll with the mouse, it
disapears. Does anyone have an idea?
Thank you!
--
Alex St-Pierre

.


.


.

  #9   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 2
Default Screen refresh problem

Try hotfix (KB978908). It worked like a charm for me despite the Microsoft disclaimer:

"This hotfix has not undergone full testing. Therefore, it is intended only for systems or computers that are experiencing the exact problem that is described in the one or more Microsoft Knowledge Base articles that are listed in "KB Article Numbers" field in the table at the end of this e-mail message. If you are not sure whether any special compatibility or installation issues are associated with this hotfix, we encourage you to wait for the next service pack release. The service pack will include a fully tested version of this fix. We understand that it can be difficult to determine whether any compatibility or installation issues are associated with a hotfix. If you want confirmation that this hotfix addresses your specific problem, or if you want to confirm whether any special compatibility or installation issues are associated with this hotfix, support professionals in Customer Support Services can help you with that."

You will have to request the hotfix from Microsoft. They will send you a link to the file as well as a password with which to open it. From there on it is self explanatory.

On Friday, January 15, 2010 10:49 AM Alex St-Pierre wrote:


Hi!
When I change a value inside a worksheet, I see the contents of an other
sheet inside the activesheet. Then, when I scroll with the mouse, it
disapears. Does anyone have an idea?
Thank you!
--
Alex St-Pierre



On Friday, January 15, 2010 10:58 AM Don Guillett wrote:


A poorly designed change_event??

--
Don Guillett
Microsoft MVP Excel
SalesAid Software



On Friday, January 15, 2010 3:04 PM Alex St-Pierre wrote:


No, it is not a change_event macro. I found a part of the problem.
When I open the document, all work fine. I can delete a sheet without having
screen updating problem. Then, after running abc, if I delete a sheet or
change a value, I see the same thing (part of the content of an other sheet).
Do you have an idea?
Thank you!
Alex
Sub abc()
Call ProtectSheet(False)
Call ProtectSheet(True)
End Sub
Sub ProtectSheet(bValue As Boolean)
If bValue = True Then
ThisWorkbook.sheets("data").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-1").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-2").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-3").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-4").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-5").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-6").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
ThisWorkbook.sheets("A-7").Protect DrawingObjects:=True,
Contents:=True, Scenarios:=True
Else
ThisWorkbook.sheets("data").Unprotect
ThisWorkbook.sheets("A-1").Unprotect
ThisWorkbook.sheets("A-2").Unprotect
ThisWorkbook.sheets("A-3").Unprotect
ThisWorkbook.sheets("A-4").Unprotect
ThisWorkbook.sheets("A-5").Unprotect
ThisWorkbook.sheets("A-6").Unprotect
ThisWorkbook.sheets("A-7").Unprotect
End If
End Sub

--
Alex St-Pierre


"Don Guillett" wrote:



On Friday, January 15, 2010 3:29 PM Don Guillett wrote:


I would have written the code a bit differently but

try
application.screenupdating=false
code
application.screenupdating=true

Don Guillett
Microsoft MVP Excel
SalesAid Software



On Friday, January 15, 2010 3:30 PM Alex St-Pierre wrote:


It happens when I unprotect a specific sheet and it is always the content of
this sheet that we see inside other sheet.



On Friday, January 15, 2010 5:01 PM Alex St-Pierre wrote:


No, it doesnt' work with application.screenupdating=false.

Since it is only one sheet that have the problem, maybe, the only thing I
see is:
1) Same thing happens with another computer
2) Can it be a variable Set abc = that is not reset at the end? (no global
variable is used) When I close the file, I thought all variable or object
information are lost).
3) I use Image in each sheets that execute a macro when you click on it.
(Image_1_Click(), Image_2_Click()). I had this programmation for a while
without having problem.
4) There is no hidden row or column.

I think the only solution is to copy the file and try to find the solution
by 1) remove all the macros from the file 2) Remove image, 3)Remove other
sheets, etc. until it works!

--
Alex St-Pierre


"Don Guillett" wrote:



On Friday, January 15, 2010 6:18 PM Don Guillett wrote:


Look here
http://www.google.com/search?sourcei...219&q=KB973593

--
Don Guillett
Microsoft MVP Excel
SalesAid Software



On Tuesday, January 19, 2010 10:05 AM Alex St-Pierre wrote:


Thank you Don!
This is exactly the problem I describe.
KB973593:
functionality to the Application.Screenupdating function
unprotecting / protecting non-active sheets in the workbook.
I will try the workaround and see if it can solve it.
Alex
--
Alex St-Pierre


"Don Guillett" wrote:



Submitted via EggHeadCafe
Oracle Developer For Beginners
http://www.eggheadcafe.com/training-...L-Samples.aspx
Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
screen refresh stinson Excel Programming 7 October 3rd 06 03:58 AM
Screen Refresh Michael H Excel Discussion (Misc queries) 4 November 8th 05 04:46 PM
refresh van uw screen commando Matthias Excel Programming 1 December 23rd 03 03:35 PM
Screen refresh problem. Nigel Brown[_2_] Excel Programming 0 September 17th 03 03:21 PM
Screen refresh problem. Nigel Brown[_2_] Excel Programming 0 September 17th 03 02:15 PM


All times are GMT +1. The time now is 06:13 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"