This is my current code
Public Sub OpenFiles()
\'Set LiveDealSheet file path
\'Check if LiveDealSheet is already open
LDSP = \"C:\\Users\\DCHEUNG\\De
I would replace all the scripted above with this:
Public Sub OpenFiles()
On Error GoTo not_open
Workbooks("C:\Users\DCHEUNG\Desktop\Programing\LiveDealSheet.xlsm").Activate
Exit Sub
not_open:
Workbooks.Open FileName:="C:\Users\DCHEUNG\Desktop\Programing\LiveDealSheet.xlsm", ReadOnly:=True
Err.Clear
Resume Next
End Sub