Excel VisualBasic Script

Sub open2()
     Set myWorkbook = Workbooks.Open(FileName:="C:\Data\SalesData1.xlsx")
     MsgBox myWorkbook.Name
End Sub