Como el dermatologo... al grano!. Resulta que antes de que se abra un
formulario que tiene un subformulario, quiero que me cambie el recordsource
del subformulario por otra consulta que tiene los mismos campos pero de
diferente tabla. Lo hice asi:
Private Sub Form_Current()
Dim Titulo As String
Dim Sab As String
Titulo = [Forms]![3_ForReqPenPre]![3_1PenRevPre].Form![NoReq]
Sab = Mid(Titulo, 1, 2)
If Sab = "CO" Then
Parent![31_SMArtResxRub].RecordSource = "[3_MovPreTiqResxRub]"
Else
End If
End Sub
Me aparece un error, y la verdad le he intentado de todo y no le he podido
solucionar.
De antemano agradezco su valiosa colaboración y ayuda que me puedan brindar.
Atentamente;
OSWALDO GAITAN ARAQUE
Bendiciones!
No entiendo que valores son objetos del formulario (subformularios) y
que valores son objetos de la base de datos (tablas, vistas).
Creo que lo que quieres hacer es algo como lo siguiente:
Me.Secundario0.SourceObject = "SubFormulario1"
ó algo como lo siguiente:
Me.Secundario0.Form.RecordSource = "SELECT * FROM Tabla1"
Saludos.
David Austria
On 17 feb, 15:56, Pregunton <Pregun...@discussions.microsoft.com>
wrote:
te aconsejo que le eches un viztazo al Curso de Eduardo Olaz, entrega 22,
entre tantas cosas está:
- La conexión con datos a un formulario.
- Cambiar, en tiempo de ejecución del origen de datos.
-etc.
el link del curso es:
http://www.olaz.net/descargas/access/curso_vba/vba_entregas.htm
Espero te sirva, ya nos comentas.
Saludos desde un lugar de la Mancha.
"Pregunton" escribió: