Transferir datos a otro formulario

Tengo un formulario de "CargarPlanos" y quiero transferir los campos claves a un formulario de "RevisionPlanos" donde cargo los datos de las revisiones hechas, pero al tratr de traferir los campos me da el error "no se le puede asignar un valor a este objeto" en en la primera asignación Me. [NroPlano] = Forms!CargarPlanos![NroPlano]
Private Sub Form_Open(Cancel As Integer)
If Not IsLoaded("CargarPlanos") Then
MsgBox "Abra el formulario de CARGAR PLANOS para utilizar este formulario", vbInformation, "MENSAJE"
Cancel = True
End If
Me.[NroPlano] = Forms!CargarPlanos![NroPlano]
Me.[NroHoja] = Forms!CargarPlanos![NroHoja]
Me.[NroContrato] = Forms!CargarPlanos![NroContrato]
End Sub
Respuesta
1
Si quieres meter valores de un formulario a otro, existe una manera también sencilla de hacer que puede que te valla mejor.
Vete a Eventos.
Crea uno con un nombre cualquiera.
Y empieza a escribir:
Global glbCampo1 as string 'textos
Global glbCampo2 as integer 'numero
Global glbCampo3 as variant 'si o no
Tantos como quieras. Glb es la abreviatura de GLOBAL para que no te lies y cuando veas GLBnombre sepas que es una variable que la puedes hacer servir en cualquier lugar.
Luego en un botón o donde quieras del formulario1 empiezas a escribir:
glbcampo1 = me.nombre
glbcampo2 = me.edad
glbcampo3 = me.apto
Lo que tu quieras.
Por ultimo en el formulario destino, le mandas abrirlo y al cargar el formulario, en el Form_Load() le pones:
Nombre = glbcampo1
Edad = glbcampo2
Apto = glbcampo3
No más.
Si tienes algún problema, o me he desviado del tema y no te he respondido, pido disculpas. Pero si voy bien encaminado, me lo haces saber.
Suerte.
Vic.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

¿Cómo puedo comprobar si un registro ya ha sido cargado en la base de datos antes de insertarlo?

Tengo un formulario de entrada de datos para una tabla y quisiera verificar por intermedio del campo clave o los campos claves si ese registro ya existe en la tabla y dar un mensaje al usuario antes de cargar todos los campos al formulario (si...
2 respuestas

Manejo de Registros - Form multiregistros

Estoy haciendo una aplicación Access (formularios Access- código VB). Necesito hacer un form multiregistros que, permita insertar y eliminar registros. Pero que de la opción al usuario de deshacer dichos inserts o deletes. ¿Es posible? ¿Me conviene...
1 respuesta

Utilizando Seek o DlooKup

Tengo una tabla con una clave múltiple. Cuando yo utilizo el Dlookup() el me chequea un campo del registro solamente, me gustaría chequear los dos campos de un registro(que forman la clave) pero no se como hacerlo. Tal vez pueda hacerlo con seek
1 respuesta

Filtro en Access

Tengo un formulario -Internos hospital- con muchos campos "cuadors de texto-combinados" -nombre, fecha nací. Etc.- que se quedan guardados en registros en la tabla -Registro Internos Hospital-. He creado un nuevo formulario -filtros- y lo que quiero...
2 respuestas

"Recordset"

¿Qué me recomiendas que utilice en vez de utilizar el "recordset"para bloquear el formulario al cargarlo? Es que si lo bloqueo desde las propiedades del propio formulario, el botón no hace lo que le corresponde, que es desbloquear/bloquear, y la idea...
1 respuesta

Access, error 2450 y 2465

He ingresado una consulta masiva y me da el mencionado error indicando que no encuentra el formulario, está cerrado o no está en la base de datos. El botón lleva: Dim cadena As String Consulta (cadena) DoCmd.OpenForm [Cons000001] 'OJO desde aquí me...
1 respuesta

Abrir un Subformulario con un click

Tengo un formulario (principal) y a través de un botón (click) quiero abrir un subformulario, para poder meter los registros referidos a cada registro del formulario primero. No se si se puede hacer, ¿Y si se puede como?.
1 respuesta

Datos a word

Expertos.. Tengo un botón en mi formulario el cual tiene un subformulario.. Necesito enviar los registros a word del subformulario con el siguiente ejemplo me envía solo el registro que tenga marcado, yo quiero que automáticamente em genere por cada...
1 respuesta

Problema al comparar dos cadenas de caracteres

Quiero comparar dos cadenas de caracteres de la siguiente forma: Private Sub NombreUsuario_Exit(Cancel As Integer) Dim UsuarioValido As Variant Dim rst As Recordset Set rst = CurrentDb.OpenRecordset("Select TIP From tblpermis where TIP = '" &...
1 respuesta

Crear un campo que sea numérico pero que sume 1

Estoy tratando de crear un campo numérico que al ingresar un registro sume 1, pero no quiero que sea autonumérico, ya que en mi tabla tengo dos llaves (año y cod_solicitud). Lo que quiero hacer es que al cambiar el año, el cod de solicitud comience...
1 respuesta