cargar un excel a un formulario de vba 6.0
Publicado por Emiliano (8 intervenciones) el 14/08/2017 23:55:20
hola buenas tardes
soy nuevo en vba 6.0 espero alguien pueda ayudarme
estoy creando un formulario donde con un boton pueda cargar un archivo en un textbox pero la verdad es que no me sale nada
este es mi codigo que estoy usando
esta es la imagen de mi formulario
esperando alguien me pueda apoyar muchas gracias
soy nuevo en vba 6.0 espero alguien pueda ayudarme
estoy creando un formulario donde con un boton pueda cargar un archivo en un textbox pero la verdad es que no me sale nada
este es mi codigo que estoy usando
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub CmdCargar_Click()
CommBaseProv.ShowOpen 'Abre Ventana para seleccionar Archivo
TxtRuta1.Text = CommBaseProv.FileName 'Guarda nombre de Archivo
TxtRuta1.Text = UCase(TxtRuta1.Text) 'Convierte a Mayusculas
Validador = InStr(TxtRuta1.Text, "sant") 'Detecta Nombre "sant"
If Validador = 0 Then 'Si el Archivo es Incorrecto
MsgBox "El Archivo: sant , No Es Correcto, Favor de Agregarlo Nuevamente", vbCritical, "sant" 'Mensaje Alerta
TxtRuta1.Text = Empty
Else
End If
End Sub
esta es la imagen de mi formulario
esperando alguien me pueda apoyar muchas gracias
Valora esta pregunta
0
