Para cargar unos datos en un informe de Access, uso el código VBA siguiente:
Private Sub Report_Load()
Call Acceso_Informacion
Dim basica As DAO.Database
Dim tabla_ejemplo As DAO.Recordset
Dim Texto As String
Set basica = CurrentDb
Set tabla_ejemplo = optica.OpenRecordset("Principal_Tabla", dbOpenSnapshot)
tabla_ejemplo.MoveFirst
Texto = tabla_ejemplo.Fields(2).Value
Texto1.Value = Texto
End Sub
La idea es llenar una Textbox con datos de una tabla de Access. En principio el método funciona. Se evita el uso de macros incrustadas y todo queda fijado en código. Pero hay un problema que no puedo subsanar fácilmente. El tamaño de la TextBox ha de ser variable para que, dependiendo del tamaño del texto a poner ahí, se haga más o menos grande. Así, si se da el caso, el textbox puede llegar a ocupar varias páginas, o bien sólamente unas líneas.
¿Cómo se podría hacer esto? ¿Hay alguna manera de alargar tanto el textbox como largo sea el texto para que aparezca todo bien claro y legible en el informe?
Gracias por anticipado!