if Workbook open then close - code need

[VBABEGINER]

Very Simple, but i dont how to achieve this..can someone rectify my code

If Workbooks("workbook1").Open Then
Workbooks("Workbook1").Close
End If

 

[footoo]

Dim wb As Workbook
On Error Resume Next
Set wb = Workbooks("workbook1")
On Error GoTo 0
If Not wb Is Nothing Then _
    Workbooks("workbook1").Close saveChanges:=True