Discussion :

[Yvesremort]

Bien le bonjour à tous,

j'aurai besoin de vos lumières,
j'ai un bouton dans un multipage qui copie les contrôles de la première page (page(0)) pour créer une même page à l'identique ( ajout d'une action supplémentaire au traitement d'un incident).
La copie se passe bien je récupère tous éléments de la page(0), cependant le bouton de la page(1) ne fonctionne pas il me semble qu'il n'hérite pas des propriété du bouton initial.

Auriez vous idée de comment lui faire hériter des propriétés initiales du bouton ?

Merci d'avance.

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
18
19
20
21
22
23
'Bouton permettant l'ajout d'actions relatives à un incident
 
Private Sub CommandButtonAjoutAction_Click()
    Dim Compteur2 As Integer
 
    ' Récupère le nombre de pages actuelles dans MultiPage2
    Compteur2 = MultiPage2.Pages.Count
 
    ' Ajouter une nouvelle page à MultiPage2
    UserForm1.MultiPage2.Pages.Add
 
    With MultiPage2
        ' Copier les contrôles de la première page
        .Pages(0).Controls.Copy
        ' Coller les contrôles sur la nouvelle page
        .Pages(MultiPage2.Pages.Count - 1).Caption = "Action " & Compteur2 + 1
        .Pages(MultiPage2.Pages.Count - 1).Paste
 
        ' Sélectionner la nouvelle page
        .Value = MultiPage2.Pages.Count - 1
    End With
 
End Sub

[Nain porte koi]

Hello,

un petit fichier d'exemple ?

[Franc]

Salut, je ne pense pas qu'un Copy/Paste d'un contrôle copie les évènements associés, m'étonnerait pas que l'utilisation d'une classe soit nécessaire.

[tototiti2008]

Bonjour,

La classe devrait faire le boulot
Sinon si on arrive à chiffrer le nombre d'ajouts maximum possibles, peut-être prévoir le nombre max de pages du Multipage à l'avance avec leurs boutons et masquer les pages du multipage
Ou penser à une autre interface qu'ajouter des pages de Multipage pour une nouvelle saisie, évidement

[Yvesremort]

Bonjour,

La classe devrait faire le boulot
Sinon si on arrive à chiffrer le nombre d'ajouts maximum possibles, peut-être prévoir le nombre max de pages du Multipage à l'avance avec leurs boutons et masquer les pages du multipage
Ou penser à une autre interface qu'ajouter des pages de Multipage pour une nouvelle saisie, évidement

OK je vais me pencher sur l'utilisation d'une Classe, ça a l'air costaud ^^
En effet tototiti2008 je me suis posé la question de construire à l'avance les pages du multipage et de jouer sur la propriété "Visible" lors du clic.

Merci pour votre temps et vos réponses.