I can't see why you're having these problems. Did you try recreating the
file from scratch?

- Jon
-------
Jon Peltier, Microsoft Excel MVP
Tutorials and Custom Solutions
Peltier Technical Services, Inc. - http://PeltierTech.com
_______


"Arvi Laanemets" wrote in message
...
Hi

I tried, but without any effect.

I included an error trapping routine into procedure, and now I know that
really there are 2 problems.

1) The code row
Sheets("SetUp").Range("MyFormat") = "A5"
or
Sheets("SetUp").Range("C3") = "A5"
or
Sheets("SetUp").Range("C3").Value = "A5"

stops the procedure. All watch expressions are set to "Out of context",
and returned error code is 1004. At first I feared, that maybe sheet
protection may cause this in Excel2007 (although A5 / MyFormat is
unprotected cell), and removed the sheet protection, but it didn't help
too.

2) When I disable the row where a cell value is changed, then the rest of
code, which contains rows like
Sheets("SheetName").Visible=LogicalExpression
or

Sheets("SheetName").Visible=Iif(LogicalExpression, xlSheetVisible,xlSheetHidden)

runs smoothly, but nothing happens. Unchanged remain both visibility of
sheet in workbook and Visible property of this sheet in VBA editor. And
for VBA there is nothing wrong!

I did overwrite the file over with backup copy - in case the file was
corrupted somehow on first open, but this had no effect too.
Btw, when I include unprotecting/protecting of sheet into procedure, then
the sheet protection remains unchanged too.


Arvi Laanemets


"Jon Peltier" wrote in message
...
You might convert the true/false of your calculations to the built-in
constants for visible, hidden, and very hidden. I know VBA is usually
pretty forgiving of this kind of confusion, but I've seen other code
misfire in 2007 for similar reasons.

- Jon
-------
Jon Peltier, Microsoft Excel MVP
Tutorials and Custom Solutions
Peltier Technical Services, Inc. - http://PeltierTech.com
_______


"Arvi Laanemets" wrote in message
...
Sorry, I misstyped here something.


are made invisible. In Excel 2007 nothing happens. When i debug the
code step-by-step in Excel2007, I see, that p.e. the expression
(Sheets("SetUp").Range("MyMode") = "MultiLabel")
returns False, but Sheets("Shipments").Visible remains hidden, etc.

There must be:
Sheets("Shipments").Visible remains visible ...

* Sheet("Shipments").Visible remains -1 (or xlSheetVisible), but it must
change to 0 (or xlSheetHidden), as expression returns False.



Arvi Laanemets