AjoutAutorisé, propriété

S’applique à

Objet Form

Vous pouvez utiliser la propriété AllowAdditions pour spécifier si un utilisateur peut ajouter un enregistrement lors de l’utilisation d’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.

Paramètres	Visual Basic	Description
Oui	Vrai	(Par défaut) L’utilisateur peut ajouter de nouveaux enregistrements.
Non	Faux	L’utilisateur ne peut pas ajouter de nouveaux enregistrements.

Vous pouvez définir la propriété AllowAdditions à l’aide de la feuille de propriétés du formulaire, d’une macro ou de 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é AllowAdditions 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é SpecialEffect des contrôles d’étiquette est définie sur Shadowed et que la propriété SpecialEffect des contrôles de zone de texte est définie sur Normal et que les propriétés AllowAdditions, AllowDeletions et AllowEdits sont toutes définies sur True, la intCanEdit variable est basculée pour permettre 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