Disculpen, Como ver fotos en un control Image insertado en un Form

Hola Buenas Noches.

EXCELentes compañeros he tratado se hacer un archivo de control para
un pequeño almacen bajo las siguientes condiciones;

a) Tengo una carpeta en C:\ con fotos.jpg asociadas n equipos
b) En una hoja1 tengo la base de datos de n equipos
c) Necesito un Form1 con un control Image1 para ver las fotos (una a
la vez)
d) A medida que traslade por las filas quisiera ver la foto
correspondiente en el Image1

Use el siguiente codigo, pero tengo el problema;

Codigo formulario:

Private Sub UserForm_Initialize()

Dim Pic As String
Pic = "C:\Yand\" & ActiveCell.Value & ".jpg"
Image1.PictureSizeMode = 3
Image1.Picture = LoadPicture(Pic)

End Sub

Codigo Hoja 1;

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
If Not (Intersect(Target, [B:B]) Is Nothing) Then
UserForm1.Show
End If
End Sub

Problemas;

a) Los registros tienen que estar en la columna B
b) Cuando selecciono un registro me muestra la foto, pero si
metraslado a otra fila no se actualiza automaticamente.

Anticipo muchas gracias...