Duda para Visual Basic 6.0

[Sprinter]

¿Cómo puedo hacer para crear un link en la imagen del siguiente código?, Son 2 imágenes pero quiero llevarlas a distintas direcciones (Son en Excel, y los vínculos son en otras hojas del mismo archivo)

El código va como sigue:

Private Sub Image1_Click()

End Sub

Private Sub MBM_Click()
Image1.Picture = LoadPicture("C:\Vbasic6\Cap1\sigui.gif")
End Sub

Private Sub Proveedor1_Click()
Image1.Picture = LoadPicture("C:\Vbasic6\Cap1\sigui01.gif")
End Sub
Private Sub Reset_Click()

Image1.Picture = LoadPicture("C:\Vbasic6\Cap1\nada.gif")

End Sub

Lo que busco es que se el vínculo de cada imagén sea distinto (suigui.gif sea diferente a sigui01.gif)

Las direcciones de lo vínculos serían:
sigui.gif a hoja2 cells (A1)
sigui.gif a hoja3 cells (A1)
sigui.gif a hoja4 cells (A1)

Saludos y espero tu ayuda

[Mickel]

No te entiendo del todo asi que disculpa si esta no es la solucion que buscabas

Private Sub Image1_Click()
select case image1.tag
case "M"
'ha cargado sigui.gif, enlaza
case "P"
'ha cargado sigui01.gif, enlaza
case else
'ha cargado nada.gif, enlaza
end select
End Sub

Private Sub MBM_Click()
image1.tag="M"
Image1.Picture = LoadPicture("C:\Vbasic6\Cap1\sigui.gif")
End Sub

Private Sub Proveedor1_Click()
image1.tag="P"
Image1.Picture = LoadPicture("C:\Vbasic6\Cap1\sigui01.gif")
End Sub

Private Sub Reset_Click()
image1.tag=""
Image1.Picture = LoadPicture("C:\Vbasic6\Cap1\nada.gif")
End Sub