Tengo un formulario que necesito que al hacer click en el listbox se vea la imagen que he seleccionado, pero...

Tengo un formulario que debo selcionar en el cual para cada pieza me debe dar una foto he puesto el siguiente código pero cuando selecciono otra foto no se ve la segunda es decir que el código no funciona y necesito que cuando se vaya moviendo el lisbos conjuntamente con el numero de la piwza que se encuentra en el textbox1 se me ve la figura

El código que he puesto es el siguiente:

Private Sub CommandButton147_Click()

image_path = Application.GetOpenFilename(FileFilter:="Picture Files (Fichiers image),*.gif;*.jpg;*.jpeg;*.bmp", Title:=" Zeihnung wahlen")
If image_path <> False Then
On Error Resume Next

Me.Image1.Picture = LoadPicture(image_path)
SavePicture Image1.Picture, ThisWorkbook.Path & "\photos\" & var & ".jpg"

If Err.Number > 0 Then MsgBox ("mit OK weiter")

On Error GoTo 0
End If
Me.Image1.Visible = True

var = TextBox1.Text

End Sub

Que me hace falta para ver la foto que se ha grabado en photos