Open Excel.Exe as ReadOnly using VBA

[rubenidas]

How do i open a brand new Excel (Excel.exe) as read only? I have this but it is not working.

Application.DisplayAlerts = False
Dim NewExcel As String
SetAttr NewExcel, vbReadOnly
NewExcel = "C:\Program Files\Microsoft Office\Office14\EXCEL.exe"


Range("A14:F14", ActiveCell.End(xlDown)).Copy
Shell NewExcel
Cells.Select
Selection.NumberFormat = "@"
ActiveSheet.PasteSpecial Format:="Text", Link:=False, DisplayAsIcon:= _
False
ActiveSheet.Columns("A:F").AutoFit
Range("G1").Select

[gmr4evr1]

Did I misunderstand something. You want to open a blank excel file as ReadOnly, as in the default Book1 excel file?

[rubenidas]

Yes correct. A new excel blank workbook. But not the typical Ctrl+N option. I mean Start>All Programs>Microsoft Office> Excel 2010.

[gmr4evr1]

I have looked into this bit but have found nothing related to what you are wanting to do. In fact, I'm not sure I have ever heard of anyone wanting to do this.