ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Gray background is shown when loading a workbook (https://www.excelbanter.com/excel-programming/280492-gray-background-shown-when-loading-workbook.html)

Erik Beck Jensen

Gray background is shown when loading a workbook
 
I have made at nice little - someone would say complicated - automated Excel
workbook. The workbook is used only inside my company.

To ensure that no one will open the workbook without macros enabled, the
book is always saved with an info page visible and all other pages very
hidden. When opening the workbook a macro will run and switch the visible
properties for the appropriated sheets.

The workbook is used once a month and will be opened by all my nearly 40
colleagues. It has performed very well for at least a year, but now a very
serious problem has occurred.

In the attempt to open the workbook the data will be loaded from disk, but
when finished only a gray background is shown on the screen below the
formula bar. You can't se the cursor, but it is possible to move around the
cursor while the appropriate values or formulas are shown in the formula
bar, therefore it is out of question, that the workbook is fully loaded.

The problem has "only" affected about 8 of my colleagues. When the affected
persons go to another computer to make a logon on a different computer, no
problems appear. When I go to an affected computer and make a logon as my
self, I don't get any problems at all.

I will be very happy if someone could give me a clue, what to do, to get rid
of the problem.



OS: Win XP Professional, Service Pack 1 Excel: Excel 2002 sp-2



Regards

Erik



Tom Ogilvy

Gray background is shown when loading a workbook
 
It sounds like the workbook is being displayed off screen.

Try going into the VBE and executing code like this:

Sub MoveBook()
Workbooks("Filename.xls").Windows(1).Top = 1
Workbooks("Filename.xls").Windows(1).Left = 1
End Sub

Change filename.xls to the name of your workbook

See if that will make it visible.

--
Regards,
Tom Ogilvy



"Erik Beck Jensen" wrote in message
...
I have made at nice little - someone would say complicated - automated

Excel
workbook. The workbook is used only inside my company.

To ensure that no one will open the workbook without macros enabled, the
book is always saved with an info page visible and all other pages very
hidden. When opening the workbook a macro will run and switch the visible
properties for the appropriated sheets.

The workbook is used once a month and will be opened by all my nearly 40
colleagues. It has performed very well for at least a year, but now a very
serious problem has occurred.

In the attempt to open the workbook the data will be loaded from disk, but
when finished only a gray background is shown on the screen below the
formula bar. You can't se the cursor, but it is possible to move around

the
cursor while the appropriate values or formulas are shown in the formula
bar, therefore it is out of question, that the workbook is fully loaded.

The problem has "only" affected about 8 of my colleagues. When the

affected
persons go to another computer to make a logon on a different computer, no
problems appear. When I go to an affected computer and make a logon as my
self, I don't get any problems at all.

I will be very happy if someone could give me a clue, what to do, to get

rid
of the problem.



OS: Win XP Professional, Service Pack 1 Excel: Excel 2002 sp-2



Regards

Erik





Erik Beck Jensen[_2_]

Gray background is shown when loading a workbook
 
Thank you for your reply. Your proposal will be on of the first thing to try
on Monday morning when my colleagues and I are back at work. Then I will let
you know the outcome.

For now I wish you a pleasant weekend





Regards

Erik




"Tom Ogilvy" skrev i en meddelelse
...
It sounds like the workbook is being displayed off screen.

Try going into the VBE and executing code like this:

Sub MoveBook()
Workbooks("Filename.xls").Windows(1).Top = 1
Workbooks("Filename.xls").Windows(1).Left = 1
End Sub

Change filename.xls to the name of your workbook

See if that will make it visible.

--
Regards,
Tom Ogilvy



"Erik Beck Jensen" wrote in message
...
I have made at nice little - someone would say complicated - automated

Excel
workbook. The workbook is used only inside my company.

To ensure that no one will open the workbook without macros enabled, the
book is always saved with an info page visible and all other pages very
hidden. When opening the workbook a macro will run and switch the

visible
properties for the appropriated sheets.

The workbook is used once a month and will be opened by all my nearly 40
colleagues. It has performed very well for at least a year, but now a

very
serious problem has occurred.

In the attempt to open the workbook the data will be loaded from disk,

but
when finished only a gray background is shown on the screen below the
formula bar. You can't se the cursor, but it is possible to move around

the
cursor while the appropriate values or formulas are shown in the formula
bar, therefore it is out of question, that the workbook is fully loaded.

The problem has "only" affected about 8 of my colleagues. When the

affected
persons go to another computer to make a logon on a different computer,

no
problems appear. When I go to an affected computer and make a logon as

my
self, I don't get any problems at all.

I will be very happy if someone could give me a clue, what to do, to get

rid
of the problem.



OS: Win XP Professional, Service Pack 1 Excel: Excel 2002 sp-2



Regards

Erik







Erik Beck Jensen

Gray background is shown when loading a workbook
 
Sorry, but this seems not to work.


Running your code I get a run-time error 1004: Unable to set the Top
property of the Window class.

I have tried with hard coded filename and with variables, but got the same
result. I cut a bit of code from Excel help but it doesn't run any better.
See code below.



Sub MoveBook()

Dim wb As Workbook

Dim FileName As String



' For debug information

MsgBox "Start", vbInformation + vbOKOnly, "Sub: MoveBook"



Set wb = Application.ThisWorkbook

FileName = wb.Name



' For debug information

MsgBox "Filnavn: " & FileName, vbInformation + vbOKOnly, "Sub: MoveBook"



' This macro will unlock all sheets

LockAllSheets False



' Here we go

' From help (slightly modified)

wb.Windows(1).Caption = "Consolidated Balance Sheet" ' This line change
the Caption

wb.Windows("Consolidated Balance Sheet").Top = 1 ' This line lead to a
run-time error



' Hard coded

Workbooks("Prognose(Test).xls").Windows(1).Top = 1 ' This line lead to a
run-time error

Workbooks(FileName).Windows(1).Left = 1 ' This line lead to a run-time
error



' This macro will lock all sheets

LockAllSheets True



' For debug information

MsgBox "Over and out", vbInformation + vbOKOnly, "Sub: MoveBook"

End Sub





But how is that? When I open the workbook and with me, about 80% of my
colleagues open the same workbook, we encounter no problems. Then the
workbook will be saved and then opened again by another colleague, and he
won't be able to se anything. When the other colleague opens an quite
different workbook he have no problem.

By the way, inside the problematic workbook is a macro witch purpose is to
make a copy of the of the active sheet and place it in another workbook.
When running this macro, the copied sheet will be perfectly shown on the
screen.


Regards
Erik


"Tom Ogilvy" skrev i en meddelelse
...
It sounds like the workbook is being displayed off screen.

Try going into the VBE and executing code like this:

Sub MoveBook()
Workbooks("Filename.xls").Windows(1).Top = 1
Workbooks("Filename.xls").Windows(1).Left = 1
End Sub

Change filename.xls to the name of your workbook

See if that will make it visible.

--
Regards,
Tom Ogilvy



"Erik Beck Jensen" wrote in message
...
I have made at nice little - someone would say complicated - automated

Excel
workbook. The workbook is used only inside my company.

To ensure that no one will open the workbook without macros enabled,

the
book is always saved with an info page visible and all other pages

very
hidden. When opening the workbook a macro will run and switch the

visible
properties for the appropriated sheets.

The workbook is used once a month and will be opened by all my nearly

40
colleagues. It has performed very well for at least a year, but now a

very
serious problem has occurred.

In the attempt to open the workbook the data will be loaded from disk,

but
when finished only a gray background is shown on the screen below the
formula bar. You can't se the cursor, but it is possible to move

around
the
cursor while the appropriate values or formulas are shown in the

formula
bar, therefore it is out of question, that the workbook is fully

loaded.

The problem has "only" affected about 8 of my colleagues. When the

affected
persons go to another computer to make a logon on a different

computer,
no
problems appear. When I go to an affected computer and make a logon as

my
self, I don't get any problems at all.

I will be very happy if someone could give me a clue, what to do, to

get
rid
of the problem.



OS: Win XP Professional, Service Pack 1 Excel: Excel 2002 sp-2



Regards

Erik









Tom Ogilvy

Gray background is shown when loading a workbook
 
Can't say Erik.
the code I supplied worked for me.

--
Regards,
Tom Ogilvy

"Erik Beck Jensen" wrote in message
...
Sorry, but this seems not to work.


Running your code I get a run-time error 1004: Unable to set the Top
property of the Window class.

I have tried with hard coded filename and with variables, but got the same
result. I cut a bit of code from Excel help but it doesn't run any better.
See code below.



Sub MoveBook()

Dim wb As Workbook

Dim FileName As String



' For debug information

MsgBox "Start", vbInformation + vbOKOnly, "Sub: MoveBook"



Set wb = Application.ThisWorkbook

FileName = wb.Name



' For debug information

MsgBox "Filnavn: " & FileName, vbInformation + vbOKOnly, "Sub: MoveBook"



' This macro will unlock all sheets

LockAllSheets False



' Here we go

' From help (slightly modified)

wb.Windows(1).Caption = "Consolidated Balance Sheet" ' This line change
the Caption

wb.Windows("Consolidated Balance Sheet").Top = 1 ' This line lead to a
run-time error



' Hard coded

Workbooks("Prognose(Test).xls").Windows(1).Top = 1 ' This line lead to a
run-time error

Workbooks(FileName).Windows(1).Left = 1 ' This line lead to a run-time
error



' This macro will lock all sheets

LockAllSheets True



' For debug information

MsgBox "Over and out", vbInformation + vbOKOnly, "Sub: MoveBook"

End Sub





But how is that? When I open the workbook and with me, about 80% of my
colleagues open the same workbook, we encounter no problems. Then the
workbook will be saved and then opened again by another colleague, and he
won't be able to se anything. When the other colleague opens an quite
different workbook he have no problem.

By the way, inside the problematic workbook is a macro witch purpose is to
make a copy of the of the active sheet and place it in another workbook.
When running this macro, the copied sheet will be perfectly shown on the
screen.


Regards
Erik


"Tom Ogilvy" skrev i en meddelelse
...
It sounds like the workbook is being displayed off screen.

Try going into the VBE and executing code like this:

Sub MoveBook()
Workbooks("Filename.xls").Windows(1).Top = 1
Workbooks("Filename.xls").Windows(1).Left = 1
End Sub

Change filename.xls to the name of your workbook

See if that will make it visible.

--
Regards,
Tom Ogilvy



"Erik Beck Jensen" wrote in message
...
I have made at nice little - someone would say complicated -

automated
Excel
workbook. The workbook is used only inside my company.

To ensure that no one will open the workbook without macros enabled,

the
book is always saved with an info page visible and all other pages

very
hidden. When opening the workbook a macro will run and switch the

visible
properties for the appropriated sheets.

The workbook is used once a month and will be opened by all my

nearly
40
colleagues. It has performed very well for at least a year, but now

a
very
serious problem has occurred.

In the attempt to open the workbook the data will be loaded from

disk,
but
when finished only a gray background is shown on the screen below

the
formula bar. You can't se the cursor, but it is possible to move

around
the
cursor while the appropriate values or formulas are shown in the

formula
bar, therefore it is out of question, that the workbook is fully

loaded.

The problem has "only" affected about 8 of my colleagues. When the
affected
persons go to another computer to make a logon on a different

computer,
no
problems appear. When I go to an affected computer and make a logon

as
my
self, I don't get any problems at all.

I will be very happy if someone could give me a clue, what to do, to

get
rid
of the problem.



OS: Win XP Professional, Service Pack 1 Excel: Excel 2002 sp-2



Regards

Erik












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

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