ya encontre el error muchas gracias, son muy buenos tus tutoriales, espero que sigas con el curso, son pocas las personas que se dan el tiempo para explicar detalladamente algun lenguaje, y ademas que se le entienda lo que esta explicando. Te felicito de verdad....
me error en On Error Resume Next Ruta1 = Explorar.SelectedItems(1) Me.Ruta = Ruta1 Dice que no encuentra el metodo o dato de miembro Private Sub BT_CargarImagen_Click() Dim Explorar As Variant Dim Ruta1 As Variant
Fabuloso ING muy encantado en aprender de lujo saludos desde León Guanajuato México 🇲🇽😊
Fabuloso Señor 👍👍muy bien,como siempre bien explicado MAESTRO 👍 lo felicito 👍👍👍👍👍👍👍👍👍👍
ya encontre el error muchas gracias, son muy buenos tus tutoriales, espero que sigas con el curso, son pocas las personas que se dan el tiempo para explicar detalladamente algun lenguaje, y ademas que se le entienda lo que esta explicando.
Te felicito de verdad....
Gracias, siguiendo uno a uno los videos del curso, gracias 👏👏
me error en
On Error Resume Next
Ruta1 = Explorar.SelectedItems(1)
Me.Ruta = Ruta1
Dice que no encuentra el metodo o dato de miembro
Private Sub BT_CargarImagen_Click()
Dim Explorar As Variant
Dim Ruta1 As Variant
Set Explorar = Application.FileDialog(msoFileDialogFilePicker)
Explorar.AllowMultiSelect = False
Explorar.Filters.Add "Excel Files", "*.JPG?,*.JPEG?,1"
Explorar.Show
On Error Resume Next
Ruta1 = Explorar.SelectedItems(1)
Me.Ruta = Ruta1
End Sub
El error se debe a que el nombre de la etiqueta no es el mismo que esta usando en el codigo