Este es el codigo que tengo pero no me funciona para importar desde un combobox a formulario.
Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
'Validamos los datos
If Txt_Nombre.Text = "" Or Txt_Direccion.Text = "" Or Txt_codigopostal.Text = "" Or Txt_Poblacion.Text = "" Or Txt_Provincia.Text = "" Then
MsgBox("Debes rellenar todos los campos para poder agregar un nuevo cliente", vbCritical, "Rellena todos los campos")
Exit Sub
Else 'En caso de que los campos sean correctos y no esten vacios
Abrir_Archivo_Clientes() 'Este es un modulo que funciona a la perfeccion'
'Agregar datos de excel a form2 del visual studio'
With Obj_Excel
Obj_Hoja_Clientes.Range("a65536").End(Microsoft.Office.Interop.Excel.XlDirection.xlUp).Offset(1, 0).Activate()
'Recorremos la fila desde la 1 hasta la 7
For Fila = 1 To 65536
'Agregamos el valor de la fila que esta en excel y la traemos al form2 _
Form2.Txt_Nombre.Text.ToUpper = .ActiveCell.Offset(0, 1).Value
Form2.Txt_Direccion.Text.ToUpper = .ActiveCell.Offset(0, 2).Value
Form2.Txt_codigopostal.Text = .ActiveCell.Offset(0, 3).Value
Form2.Txt_Poblacion.Text.ToUpper = .ActiveCell.Offset(0, 4).Value
Form2.Txt_Provincia.Text.ToUpper = .ActiveCell.Offset(0, 5).Value
Next
End With
End If
End Sub
Espero quien me pueda ayudar. gracias.