Private Sub CommandButton1_Click()

    Dim 경로 As String
    Dim 파일 As String

    경로 = ThisWorkbook.Path & "\Image\"
    파일 = "Default.jpg"

    With ListBox1
        .Selected(.ListIndex) = False
    End With

    Image1.Picture = LoadPicture(Filename:=경로 & 파일)

End Sub
