Mis conocimientos en vba son nulos, hace 4 años que no lo toco y fue para hacer 3 tonterias.
Necesito saber como crear un boton examinar y que me guarde el resultado en un campo X.
La idea es ocultar dicho campo en el formulario y que me muestre una imagen en un control de imagen que ya tengo enlazado a dicho campo.
Se que sera una tonteria y que dentro de un rato googleando o probando sacare algo que me haga el apaño, pero aun asi pregunto por aqui por si las moscas, ya que es un favor que me han pedido y corre algo de prisa dejarlo medio listo para que pueda usar la bd.
He econtrado por ahi esto
Private Sub Command1_Click()
With CommonDialog1
.DialogTitle = "Seleccionar imagen Pára cargar en el image "
.Filter = "BMP|*.bmp|JPG|*.JPG|GIF|*.GIF|Todos los archivos|*.*"
.ShowOpen
If .FileName = "" Then
Exit Sub
Else
Image1 = LoadPicture(.FileName)
End If
End With
End Sub
pero...que coño es el commondialog? Se que sera un nombre de etiqueta pero...a que? un campo? un control?
Thx de antemano y si, podeis llamarme flojo, pero es tarde y no se me ocurren ideas xD.
Edit: MV el lugar donde a la media hora de postear encuentras la solucion a tu problema.... xDD
Ya he encontrado como hacerlo, lo dejo aqui por si alguien lo quiere:
Dim f As Object
Set f = Application.FileDialog(3)
f.AllowMultiSelect = False
If f.Show Then
Me.Foto.Value = f.SelectedItems(1)
Else
MsgBox "No se selección ningún archivo."
End If
Me.Refresh