Buenas Sres.
Busque y busque y solo encontre algo como esto :
Private Sub Command1_Click()
Dim nro As Integer
nro = Val(InputBox("Introduce el Nº"))
Data1.Recordset.FindFirst "Nº=" & nro
If Data1.Recordset.NoMatch Then
MsgBox "El Nº: " & nro & " No está en la Base de
Datos", vbExclamation, "Búsquedas de Nº"
End If
End Sub
Se puede buscar un registro de una tabla excel directamente del form q estoy trabajando sin nececidad de tener q usar "Val(InputBox("...."))"
Gracias
Busque y busque y solo encontre algo como esto :
Private Sub Command1_Click()
Dim nro As Integer
nro = Val(InputBox("Introduce el Nº"))
Data1.Recordset.FindFirst "Nº=" & nro
If Data1.Recordset.NoMatch Then
MsgBox "El Nº: " & nro & " No está en la Base de
Datos", vbExclamation, "Búsquedas de Nº"
End If
End Sub
Se puede buscar un registro de una tabla excel directamente del form q estoy trabajando sin nececidad de tener q usar "Val(InputBox("...."))"
Gracias