Comment empêcher de modifier un champ d'un formulaire ?

**Kaytilou** · 04/04/2020, 14h13

Bonjour

J'utilise un formulaire avec des champs et j'aimerai empêcher certains champs d'être modifiés. Je parcouru de nombreux sites avec plein de réponse différentes. Du coup, je n'arrive pas à trouver ce que je cherche. J'ai deux codes sur lesquels je souhaiterai mettre cela en application

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
''''''''''''''''''''
        'Date de fin -1mois
        ''''''''''''''''''''
            If IsDate(Strings.Trim(Me.txtDateFin1mois.Text)) = True Then
                xDate = CDate(Strings.Trim(Me.txtDateFin1mois.Text))
                Me.txtDateFin.Text = Format(xDate, "dd/mm/yyyy")
                .Range(1, 13) = CDate(Strings.Trim(Me.txtDateFin1mois.Text))
            Else
                If Strings.Len(Strings.Trim(Me.txtDateFin1mois.Text)) = 8 Then
                    xDate = Strings.Trim(Me.txtDateFin1mois.Text)
                    xVal = Strings.Left(xDate, 2) & "/" & Strings.Mid(xDate, 3, 2) & "/" & Strings.Right(xDate, 4)
                    Me.txtDateDebut.Text = xVal
                Else
                    Me.txtDateFin1mois.Text = ""
                End If
                .Range(1, 13) = Strings.Trim(Me.txtDateFin1mois.Text)
                End If

et celui là

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
''''''''''''''''''''
        'Temps restant
        ''''''''''''''''''''
            Me.txtTempsIndisp.Enabled = False
           .Range(1, 14) = CStr(Strings.Trim(Me.txtTempsIndisp.Text))