Path name in title bar-READ ONLY prob

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have a tough one...I put the code
ActiveWindow.Caption = ActiveWorkbook.FullName
in a workbook......however, if the file comes up as "read-only" the (read
only) message is gone from the title bar.....it is very important that users
see that they are in a "read only" file....is there any way to get the full
path name & the read only message to appear in the title bar?
Thanks in advance!
 
Try something like


Dim WB As Workbook
Set WB = ActiveWindow.Parent
If WB.ReadOnly = True Then
ActiveWindow.Caption = "My Text (read only)"
Else
ActiveWindow.Caption = "My Text"
End If



--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com
 
Very good! Thanks much!

Chip Pearson said:
Try something like


Dim WB As Workbook
Set WB = ActiveWindow.Parent
If WB.ReadOnly = True Then
ActiveWindow.Caption = "My Text (read only)"
Else
ActiveWindow.Caption = "My Text"
End If



--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com
Click to expand...
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Toggle custom button caption 4
Detect if Excel file is "read only"??? 5
Change the name of the title bar to the name of the worksheet. 2
Use external file variable in formula 2
Horizontal scroll bar 2
toggle read only 1
Server name in Excel file path 4
changing the application name in the title bar 11

Back
Top