Modifier le nom d'une page dans un ongletFermé

Question

Bonjour, 

Je crée de manière dynamique un formulaire dans lequel j'intègre un onglet composé de plusieurs pages

Le code généré est le suivant :

    DoCmd.OpenForm sNomFormulaire, acDesign, , , , acHidden
     
    Set ctl = CreateControl(sNomFormulaire, acPage, acDetail, "Onglet_Activite", , gauche, haut, Largeur, Hauteur)

    With ctl
        For Num_Onglet = 0 To Nb_Onglet
            If Num_Onglet < 2 Then
                 .Pages(Num_Onglet).Name = Nom_Onglet(Num_Onglet)
            Else
                .Pages.Add
                .Pages(Num_Onglet).Name = Nom_Onglet(Num_Onglet)
            End If
        Next Num_Onglet
    End With

Hors j'ai une erreur 2455 sur la ligne " .Pages(Num_Onglet).Name = Nom_Onglet(Num_Onglet)"

Après avoir cherché dans tous les sens sur le web, je n'ai pas trouvé la raison de cette erreur.

Pourriez-vous m'apporter votre aide

Merci d'avance

Configuration: Windows / Internet Explorer 11.0

yg_be · Answer

bonjour,  la première chose que je ferais, c'est de décomposer l'instruction, pour voir dans quelle partie se produit l'erreur:
tmpstr=.Pages(Num_Onglet).Name
tmpstr= Nom_Onglet(Num_Onglet)
.Pages(Num_Onglet).Name=tmpstr

Modifier le nom d'une page dans un onglet

1 réponse

Discussions similaires

Newsletters