Hi,
I need to operate the outline symbols ( +OR - , when the data grouping is
done) in a protected mode. At present Excel does not allows it . Any idea. My
excel sheet is being created by a macro and assigns all the formulas,
datagrouping . When i run from macro and check it is working. Once i save the
file and reopen it i am getting problem.

Hi swami

(a re-work of a post by Dave Peterson)

If you protect the worksheet in code you can enable this functionality ...
the code needs to go in the "ThisWorkbook" module as

Private Sub Workbook_Open()
With Worksheets("sheet1")
.Protect Password:="hi", userinterfaceonly:=True
.EnableOutlining = True
End With
End Sub
---
where sheet1 is the name of the worksheet in question and "hi" is your
password.

Hope this helps
Cheers
JulieD


"swami" wrote in message
...
Hi,
I need to operate the outline symbols ( +OR - , when the data grouping
is
done) in a protected mode. At present Excel does not allows it . Any idea.
My
excel sheet is being created by a macro and assigns all the formulas,
datagrouping . When i run from macro and check it is working. Once i save
the
file and reopen it i am getting problem.

If you protect the worksheet programmatically, you can enable outlining,
and you will be able to use the groups that you have created.

The following code goes in the ThisWorkbook module:

Private Sub Workbook_Open()
With Worksheets("Sheet1")
.EnableOutlining = True
.Protect Password:="password", _
Contents:=True, UserInterfaceOnly:=True
End With

End Sub

To paste the code into the ThisWorkbook module:

Right-click on the Excel icon, to the left of the File menu
Choose View Code
Paste the code where the cursor is flashing.


swami wrote:
Hi,
I need to operate the outline symbols ( +OR - , when the data grouping is
done) in a protected mode. At present Excel does not allows it . Any idea. My
excel sheet is being created by a macro and assigns all the formulas,
datagrouping . When i run from macro and check it is working. Once i save the
file and reopen it i am getting problem.



--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html

HI ,
thanks for the reply.
But as i already mentioned , i am generating about 100 workbook and assign
formulas . all my workbooks are automatically created by macros. Now how to
assign the below code to each and every work book. Any idea

thanks


"Debra Dalgleish" wrote:

If you protect the worksheet programmatically, you can enable outlining,
and you will be able to use the groups that you have created.

The following code goes in the ThisWorkbook module:

Private Sub Workbook_Open()
With Worksheets("Sheet1")
.EnableOutlining = True
.Protect Password:="password", _
Contents:=True, UserInterfaceOnly:=True
End With

End Sub

To paste the code into the ThisWorkbook module:

Right-click on the Excel icon, to the left of the File menu
Choose View Code
Paste the code where the cursor is flashing.


swami wrote:
Hi,
I need to operate the outline symbols ( +OR - , when the data grouping is
done) in a protected mode. At present Excel does not allows it . Any idea. My
excel sheet is being created by a macro and assigns all the formulas,
datagrouping . When i run from macro and check it is working. Once i save the
file and reopen it i am getting problem.



--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html

Chip Pearson has instructions for adding procedures through code:

http://www.cpearson.com/excel/vbe.htm

swami wrote:
HI ,
thanks for the reply.
But as i already mentioned , i am generating about 100 workbook and assign
formulas . all my workbooks are automatically created by macros. Now how to
assign the below code to each and every work book. Any idea

thanks


"Debra Dalgleish" wrote:


If you protect the worksheet programmatically, you can enable outlining,
and you will be able to use the groups that you have created.

The following code goes in the ThisWorkbook module:

Private Sub Workbook_Open()
With Worksheets("Sheet1")
.EnableOutlining = True
.Protect Password:="password", _
Contents:=True, UserInterfaceOnly:=True
End With

End Sub

To paste the code into the ThisWorkbook module:

Right-click on the Excel icon, to the left of the File menu
Choose View Code
Paste the code where the cursor is flashing.


swami wrote:

Hi,
I need to operate the outline symbols ( +OR - , when the data grouping is
done) in a protected mode. At present Excel does not allows it . Any idea. My
excel sheet is being created by a macro and assigns all the formulas,
datagrouping . When i run from macro and check it is working. Once i save the
file and reopen it i am getting problem.



--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html





--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html

HI ,
thanks for the reply.
But as i already mentioned , i am generating about 100 workbook and assign
formulas . all my workbooks are automatically created by macros. Now how to
assign the below code to each and every work book. Any idea

thanks


"Debra Dalgleish" wrote:

If you protect the worksheet programmatically, you can enable outlining,
and you will be able to use the groups that you have created.

The following code goes in the ThisWorkbook module:

Private Sub Workbook_Open()
With Worksheets("Sheet1")
.EnableOutlining = True
.Protect Password:="password", _
Contents:=True, UserInterfaceOnly:=True
End With

End Sub

To paste the code into the ThisWorkbook module:

Right-click on the Excel icon, to the left of the File menu
Choose View Code
Paste the code where the cursor is flashing.


swami wrote:
Hi,
I need to operate the outline symbols ( +OR - , when the data grouping is
done) in a protected mode. At present Excel does not allows it . Any idea. My
excel sheet is being created by a macro and assigns all the formulas,
datagrouping . When i run from macro and check it is working. Once i save the
file and reopen it i am getting problem.



--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html

Why not use a template that already has the code in it?

--
Regards,
Tom Ogilvy

"swami" wrote in message
...
HI ,
thanks for the reply.
But as i already mentioned , i am generating about 100 workbook and
assign
formulas . all my workbooks are automatically created by macros. Now how
to
assign the below code to each and every work book. Any idea

thanks


"Debra Dalgleish" wrote:

If you protect the worksheet programmatically, you can enable outlining,
and you will be able to use the groups that you have created.

The following code goes in the ThisWorkbook module:

Private Sub Workbook_Open()
With Worksheets("Sheet1")
.EnableOutlining = True
.Protect Password:="password", _
Contents:=True, UserInterfaceOnly:=True
End With

End Sub

To paste the code into the ThisWorkbook module:

Right-click on the Excel icon, to the left of the File menu
Choose View Code
Paste the code where the cursor is flashing.


swami wrote:
Hi,
I need to operate the outline symbols ( +OR - , when the data
grouping is
done) in a protected mode. At present Excel does not allows it . Any
idea. My
excel sheet is being created by a macro and assigns all the formulas,
datagrouping . When i run from macro and check it is working. Once i
save the
file and reopen it i am getting problem.



--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html

Hi,

What about if there are 10 worksheets in the file, what should I do to
enable this function in 9 of the worksheets?
Thank you very much.

"Debra Dalgleish" wrote:

If you protect the worksheet programmatically, you can enable outlining,
and you will be able to use the groups that you have created.

The following code goes in the ThisWorkbook module:

Private Sub Workbook_Open()
With Worksheets("Sheet1")
.EnableOutlining = True
.Protect Password:="password", _
Contents:=True, UserInterfaceOnly:=True
End With

End Sub

To paste the code into the ThisWorkbook module:

Right-click on the Excel icon, to the left of the File menu
Choose View Code
Paste the code where the cursor is flashing.


swami wrote:
Hi,
I need to operate the outline symbols ( +OR - , when the data grouping is
done) in a protected mode. At present Excel does not allows it . Any idea. My
excel sheet is being created by a macro and assigns all the formulas,
datagrouping . When i run from macro and check it is working. Once i save the
file and reopen it i am getting problem.



--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html

You could loop through the worksheets. For example:

Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
If ws.Name < "Summary" Then
With ws
.EnableOutlining = True
.Protect Password:="password", _
Contents:=True, UserInterfaceOnly:=True
End With
End If
Next ws


bayhe wrote:
Hi,

What about if there are 10 worksheets in the file, what should I do to
enable this function in 9 of the worksheets?
Thank you very much.

"Debra Dalgleish" wrote:


If you protect the worksheet programmatically, you can enable outlining,
and you will be able to use the groups that you have created.

The following code goes in the ThisWorkbook module:

Private Sub Workbook_Open()
With Worksheets("Sheet1")
.EnableOutlining = True
.Protect Password:="password", _
Contents:=True, UserInterfaceOnly:=True
End With

End Sub

To paste the code into the ThisWorkbook module:

Right-click on the Excel icon, to the left of the File menu
Choose View Code
Paste the code where the cursor is flashing.


swami wrote:

Hi,
I need to operate the outline symbols ( +OR - , when the data grouping is
done) in a protected mode. At present Excel does not allows it . Any idea. My
excel sheet is being created by a macro and assigns all the formulas,
datagrouping . When i run from macro and check it is working. Once i save the
file and reopen it i am getting problem.



--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html





--
Debra Dalgleish
Excel FAQ, Tips & Book List
http://www.contextures.com/tiptech.html

You have one more suggestion at your post in .misc.

swami wrote:

Hi,
I need to operate the outline symbols ( +OR - , when the data grouping is
done) in a protected mode. At present Excel does not allows it . Any idea. My
excel sheet is being created by a macro and assigns all the formulas,
datagrouping . When i run from macro and check it is working. Once i save the
file and reopen it i am getting problem.

--

Dave Peterson