Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3
Default 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.
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 203
Default 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 :-)


Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Excel WB opened from Sharepoint as ReadOnly, ReadONLY for WB = FAL Barb Reinhardt Excel Programming 0 January 19th 10 10:44 PM
Force a Readonly Workbook to save to a different folder Charlotte Howard Excel Discussion (Misc queries) 6 August 23rd 06 04:41 PM
Spreadsheet save using a macro kmdaly Excel Programming 4 February 22nd 06 11:31 AM
Disable Save As dialog on ReadOnly spreadsheet Andy Excel Programming 1 July 28th 04 07:42 PM
Running Macro when value in spreadsheet is true pgerrish Excel Programming 0 April 22nd 04 05:32 PM


All times are GMT +1. The time now is 11:21 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"