Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
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. |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
"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 :-) |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Excel WB opened from Sharepoint as ReadOnly, ReadONLY for WB = FAL | Excel Programming | |||
Force a Readonly Workbook to save to a different folder | Excel Discussion (Misc queries) | |||
Spreadsheet save using a macro | Excel Programming | |||
Disable Save As dialog on ReadOnly spreadsheet | Excel Programming | |||
Running Macro when value in spreadsheet is true | Excel Programming |