Cannot save macro spreadsheet due to ReadOnly = True
 

First, I checked the file Attributes in Windows Explorer, and left-
clicked on Properties: all three (Read-only; Hidden; Archive) were
blank.

I then ran the following:

Sub OpenGroup1()
Application.EnableEvents = False

Application.Workbooks.Open Filename:= _
"\\HOUDATA01\Investments\Research\Shared\RATIN GS MACROS\MASTER
\Group 1 (M-Mkt) Master Macro.xlS"
'''''''''''''"\\HOUDATA01\Investments\Research\Sha red\RATINGS MACROS
\MASTER\Group 1 (M-Mkt) Master Macro.xlS", UpdateLinks:=True,
ReadOnly:=False <<<< THIS DID NOT WORK!!

If (GetAttr(ThisWorkbook.Path & "\" & ThisWorkbook.Name) And Not
vbReadOnly) Then
MsgBox "The Workbook is Not Read-Only!!", vbInformation
End If

''''''''''ThisWorkbook.ReadOnly = False <<<< THIS DID NOT WORK!!

Application.EnableEvents = True
End Sub

The MsgBox pops-up, even though "[Read-Only]" is appended to the name
of the file at the top of the opening worksheet.

Help. I cannot save edits to the workbook.

Cannot save macro spreadsheet due to ReadOnly = True
 

"JingleRock" wrote in message
...
First, I checked the file Attributes in Windows Explorer, and left-
clicked on Properties: all three (Read-only; Hidden; Archive) were
blank.

I then ran the following:

Sub OpenGroup1()
Application.EnableEvents = False

Application.Workbooks.Open Filename:= _
"\\HOUDATA01\Investments\Research\Shared\RATIN GS MACROS\MASTER
\Group 1 (M-Mkt) Master Macro.xlS"
'''''''''''''"\\HOUDATA01\Investments\Research\Sha red\RATINGS MACROS
\MASTER\Group 1 (M-Mkt) Master Macro.xlS", UpdateLinks:=True,
ReadOnly:=False <<<< THIS DID NOT WORK!!

If (GetAttr(ThisWorkbook.Path & "\" & ThisWorkbook.Name) And Not
vbReadOnly) Then
MsgBox "The Workbook is Not Read-Only!!", vbInformation
End If

''''''''''ThisWorkbook.ReadOnly = False <<<< THIS DID NOT WORK!!

Application.EnableEvents = True
End Sub

The MsgBox pops-up, even though "[Read-Only]" is appended to the name
of the file at the top of the opening worksheet.

Help. I cannot save edits to the workbook.


The unanswered question in my mind is why the workbook is being opened
read only.

Can you (manually) do a "Save As" ??

--
Clif McIrvin

(clare reads his mail with moe, nomail feeds the bit bucket :-)