AjoutAutorisé, propriété

S’applique à

La propriété AjoutAutorisé permet de spécifier si un utilisateur peut ajouter un enregistrement quand il utilise un formulaire. Booléen en lecture/écriture.

expression.AjoutAutorisé

expression Obligatoire. Expression qui renvoie l’un des objets de la liste S’applique à.

Paramètre

La propriété AjoutAutorisé utilise les paramètres suivants.

Vous pouvez définir la propriété AjoutAutorisé en utilisant la feuille de propriétés du formulaire, une macro ou un code Visual Basic pour Applications (VBA).

Remarques

Définissez la propriété AjoutAutorisé sur Non pour permettre aux utilisateurs d’afficher ou modifier des enregistrements existants, mais pas d’ajouter de nouveaux enregistrements.

Pour empêcher la modification d’enregistrements existants (mettre un formulaire en lecture seule), définissez les propriétés AjoutAutorisé, SupprAutorisée et ModifAutorisée sur Non. Vous pouvez également mettre des enregistrements en lecture seule en définissant la propriété TypeRecordset sur Instantané.

Si vous voulez ouvrir un formulaire uniquement pour la saisie de données, définissez la propriété EntréeDonnées du formulaire sur Oui.

Lorsque la propriété AjoutAutorisé est définie sur Non, la commande Nouvel enregistrement sous Enregistrements sous l’onglet Données n’est pas disponible.

• ModifAutorisée — Oui

• SupprAutorisée — Oui

• AjoutAutorisé — Oui

• EntréeDonnées — Non

Pour empêcher l’action OuvrirFormulaire de remplacer les paramètres de propriété existants, omettez le paramètre de l’argument Mode données afin qu’Access utilise les paramètres de propriété définis par le formulaire.

Exemple

L’exemple suivant examine la propriété controltype pour tous les contrôles d’un formulaire. Pour chaque contrôle d’étiquette et de zone de texte, la procédure active/désactive la propriété Apparence de ces contrôles. Lorsque la propriété Apparence des contrôles d’étiquette est définie sur Ombré, que la propriété Apparence des contrôles de zone de texte est définie sur Normal et que les propriétés AjoutAutorisé, SupprAutorisée et ModifAutorisée sont toutes définies sur Vrai, la variable intCanEdit est activée pour autoriser la modification des données sous-jacentes.

Sub ToggleControl(frm As Form)
    Dim ctl As Control
    Dim intI As Integer, intCanEdit As Integer
    Const conTransparent = 0
    Const conWhite = 16777215
    For Each ctl in frm.Controls
        With ctl
            Select Case .ControlType
                Case acLabel
                    If .SpecialEffect = acEffectShadow Then
                        .SpecialEffect = acEffectNormal
                        .BorderStyle = conTransparent
                        intCanEdit = True
                    Else
                        .SpecialEffect = acEffectShadow
                        intCanEdit = False
                    End If
                Case acTextBox
                    If .SpecialEffect = acEffectNormal Then
                        .SpecialEffect = acEffectSunken
                        .BackColor = conWhite
                    Else
                        .SpecialEffect = acEffectNormal
                        .BackColor = frm.Detail.BackColor
                    End If
            End Select
        End With
    Next ctl
    If intCanEdit = IFalse Then
        With frm
            .AllowAdditions = False
            .AllowDeletions = False
            .AllowEdits = False
        End With
    Else
        With frm
            .AllowAdditions = True
            .AllowDeletions = True
            .AllowEdits = True
        End With
    End If
End Sub