Asignar un valor a un campo y que lo repita hasta que el usuario cambie ese valor manualmente

Mi correo es [email protected]

Si las mandas, en el asunto del mensaje pon tu alias Yeni, ya que si no sé quien me escribe ni los abro.

No puede estar editando las propiedades de los campos cada vez que cambie los valores constantes. Le preparé este ejemplo, consta de:

1 Tabla

2 Formularios

1 Módulo de VBA

¿Por qué el módulo?

Porque en este defino las variables públicas para almacenar el valor del texto fijo

Formulario para recoger los valores fijos

Los valores de estos 3 campos los guardo en las variables públicas definidas a nivel de módulo.

Código de este formulario:

Programo el evento Al abrir. Esto con el fin de llenar los campos con los valores de las variables si existen datos, en caso contrario estarán vacíos. No obstante, esto es validado al cargar el formulario que toma los valores.

Private Sub Form_Open(Cancel As Integer)
     Me.ctlEntidad = strEntidad
     Me.ctlBase = strBase
     Me.ctlArea = strArea
End Sub

En este formulario programo los eventos Después de Actualizar de cada uno de los campos, esto es:

Private Sub ctlArea_AfterUpdate()
 If Me.ctlArea <> "" Then
  strArea = Me.ctlArea
 End If
End Sub
Private Sub ctlBase_AfterUpdate()
 If Me.ctlBase <> "" Then
  strBase = Me.ctlBase
 End If
End Sub
Private Sub ctlEntidad_AfterUpdate()
 If Me.ctlEntidad <> "" Then
  strEntidad = Me.ctlEntidad
 End If
End Sub

TABLA Y FORMULARIO PARA EDITAR O INGRESAR NUEVOS REGISTROS

Observe que estoy adicionando el registro id=26 y tiene los mismos datos que el anterior, no obstante se pueden editar. Cuando doy clic en Agregar o me muevo a un registro nuevo automáticamente se fijan los valores de las variables públicas

CÓDIGO DE ESTE FORMULARIO

Evento al Activar Registro:

Private Sub Form_Current()
If Me.NewRecord Then
 If strEntidad <> "" Or strBase <> "" Or strArea <> "" Then
     Me.entidad = strEntidad
     Me.base = strBase
     Me.area = strArea
 End If
End If
End Sub

Evento Al abrir:

Private Sub Form_Open(Cancel As Integer)
 If strEntidad = "" Or strBase = "" Or strArea = "" Then
    MsgBox "No ha definido los campos fijos", vbInformation, "Cuidado"
    DoCmd.OpenForm "frmDatosFijos", acNormal
    DoCmd.Close acForm, Me.Name
 End If
End Sub

Observe, verifico que no falte ninguno de los valores de las variables públicas e informo, activo el formulario donde se definen los valores constantes y por último cierro el formulario.

CÓDIGO DEL BOTÓN "DATOS FIJOS"

Private Sub btnCambiar_Click()
  DoCmd.OpenForm "frmDatosFijos", acNormal
End Sub

Este código abre el formulario para editar los valores fijos.

CÓDIGO DEL BOTÓN "AGREGAR"

Private Sub btnAgregar_Click()
  DoCmd.GoToRecord , , acNewRec
End Sub

Módulo que contiene las variables. Cree un módulo y asígnele cualquier nombre.

Public strEntidad As String
Public strBase As String
Public strArea As String

Id de transacción, Nombre, monto del préstamo, interés, tiempo, monto a pagar: fórmula de pago from excel, total a pagar:Monto a pagar-monto del préstamo, interés ganado: monto del préstamo-total a pagar.

Hasta ahí todo bien, al llevarlo a formulario cuando trato de añadir otra entrada a través del formulario me indica este error: No se puede ir al registro especificado, mientras que si lo hago directamente en la tabla directamente, me deja.

https://www.todoexpertos.com/temas/belleza-y-cuidado-corporal/geometry dash

Foodle is a word-guessing game for those who love or have knowledge of food. The game only offers one puzzle per day and challenges players all over the world. Each player will have a total of 6 guesses to find a mysterious 5-letter word. Clues will appear through each guess if matching letters appear. Players can rely on the color of the tiles to make the next guess.
All Foodle mystery words are on the subject of food. Therefore, providing you have a rich vocabulary on it, you already have an edge to win. Just think of food throughout the game to find the answer. In addition, the Settings menu in Foodle gives players the option to play the game in Color Blind Mode, which employs high contrast colors. Thanks to this, people with color or vision impairments can also recognize color-coded tiles.
All of the letters in the hidden word will become green in default mode after you find it. There will be no more challenges for the day, and you'll have to wait till the next one comes along.

thank you for sharing run 3

Para lograr esta tarea en un formulario con la capacidad de agregar y editar registros asociados con la tabla principal, puede utilizar un lenguaje y marco de programación que admita formularios y bases de datos. Un enfoque popular es utilizar un marco web como Django para Python o Laravel para PHP. Online games

This is the best for us, and we can learn more with these ideas. To find the best company website we can see the services that are providing the best services that provide amazing results.