In a specific application I have (in xl2003) - I need to always have the
Tools, Options, Comments set to Comment & Indicator. Ordinarily, this
setting as set (default) to Comment Indicator Only. What is the best method
for insuring this setting is ON during the time my application is open and
running and is Set to OFF (that is Comment Indicator Only) when exiting from
my app? For now any comments are RESTRICTED to only one sheet named
"WorkingReport" (w/o the ""'s, of course). Thanks in advance for your
assitance...

Right-click the sheet tab of WorkingReport, select "View Code" and paste the code below into the
window that appears.

HTH,
Bernie
MS Excel MVP


Private Sub Worksheet_Activate()
Application.DisplayCommentIndicator = xlCommentAndIndicator
End Sub

Private Sub Worksheet_Deactivate()
Application.DisplayCommentIndicator = xlCommentIndicatorOnly
End Sub


"JMay" wrote in message
...
In a specific application I have (in xl2003) - I need to always have the
Tools, Options, Comments set to Comment & Indicator. Ordinarily, this
setting as set (default) to Comment Indicator Only. What is the best method
for insuring this setting is ON during the time my application is open and
running and is Set to OFF (that is Comment Indicator Only) when exiting from
my app? For now any comments are RESTRICTED to only one sheet named
"WorkingReport" (w/o the ""'s, of course). Thanks in advance for your
assitance...

And if you don't want to change a user's default setting:

Public DCI As XlCommentDisplayMode

Private Sub Worksheet_Activate()
DCI = Application.DisplayCommentIndicator
Application.DisplayCommentIndicator = xlCommentAndIndicator
End Sub

Private Sub Worksheet_Deactivate()
Application.DisplayCommentIndicator = DCI
End Sub

HTH,
Bernie
MS Excel MVP


"JMay" wrote in message
...
In a specific application I have (in xl2003) - I need to always have the
Tools, Options, Comments set to Comment & Indicator. Ordinarily, this
setting as set (default) to Comment Indicator Only. What is the best method
for insuring this setting is ON during the time my application is open and
running and is Set to OFF (that is Comment Indicator Only) when exiting from
my app? For now any comments are RESTRICTED to only one sheet named
"WorkingReport" (w/o the ""'s, of course). Thanks in advance for your
assitance...

Right-click the sheet tab of WorkingReport, select "View Code" and paste the code below into the
window that appears.

HTH,
Bernie
MS Excel MVP


Private Sub Worksheet_Activate()
Application.DisplayCommentIndicator = xlCommentAndIndicator
End Sub

Private Sub Worksheet_Deactivate()
Application.DisplayCommentIndicator = xlCommentIndicatorOnly
End Sub


"JMay" wrote in message
...
In a specific application I have (in xl2003) - I need to always have the
Tools, Options, Comments set to Comment & Indicator. Ordinarily, this
setting as set (default) to Comment Indicator Only. What is the best method
for insuring this setting is ON during the time my application is open and
running and is Set to OFF (that is Comment Indicator Only) when exiting from
my app? For now any comments are RESTRICTED to only one sheet named
"WorkingReport" (w/o the ""'s, of course). Thanks in advance for your
assitance...

And if you don't want to change a user's default setting:

Public DCI As XlCommentDisplayMode

Private Sub Worksheet_Activate()
DCI = Application.DisplayCommentIndicator
Application.DisplayCommentIndicator = xlCommentAndIndicator
End Sub

Private Sub Worksheet_Deactivate()
Application.DisplayCommentIndicator = DCI
End Sub

HTH,
Bernie
MS Excel MVP


"JMay" wrote in message
...
In a specific application I have (in xl2003) - I need to always have the
Tools, Options, Comments set to Comment & Indicator. Ordinarily, this
setting as set (default) to Comment Indicator Only. What is the best method
for insuring this setting is ON during the time my application is open and
running and is Set to OFF (that is Comment Indicator Only) when exiting from
my app? For now any comments are RESTRICTED to only one sheet named
"WorkingReport" (w/o the ""'s, of course). Thanks in advance for your
assitance...