Discussion :

[argonath]

Bonjour, je veux pouvoir ajouter dans un user form, des pages à un multipage, avec un spinbutton

voilà ce que j'ai tapé :

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub SpinButton1_SpinUp()
 
    Label14.Caption = Label14.Caption + 1
 
    Dim Pge As Page
    'Ajoute une page
    Set Pge = MultiPage1.Pages.Add()
    Pge.Caption = "Pge"
End Sub

Impossible de faire tourner ce code, quand je tente, j'ai d'abord une erreur Automation "La connexion à la bibliothèque de types ou d'objets pour le traitement à distance a été perdue. Appuyez sur OK pour supprimer la référence dans la boite de dialogue"

Déjà là... je ne vois pas du tout de quoi il parle...

Si je ré-appuie sur mon spin button, excel plante


EDIT : La finalité de l'opération serait de dupliquer totalement la page (elles seront toutes identiques)

[fgiambelluco]

Bonjour
Impossible de reproduire le problème.
Voila le code que j'ai utilisé et qui fonctionne très bien:

Code :

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

1
2
3
4
5
6
Private Sub SpinButton1_SpinUp()
     Dim Pge As Page
    'Ajoute une page
    Set Pge = MultiPage1.Pages.Add()
    Pge.Caption = "Pge" & MultiPage1.Pages.Count + 1 'donne un N° à la page
End Sub

Peut-être un problème de bibliothèque. Essaye de compiler le projet : menu Débogage/Compiler

[argonath]

aucun changement après avoir compilé... J'imagine mal un problème de référence vu que je n'utilise que des fonctions VBA "de base" donc les références nécessaires doivent être faites par défaut.

Je vais essayer avec un tabstrip plutot, et revenir vers vous en cas de problème


edit : pas de problème avec un tabstrip, je le regretterais presque vu que je n'en ait jamais utilisé et ne sais pas du tout comment y faire le mappage des contrôles entre les différentes tabs

edit 2 : J'ai pu utiliser finalement un multipage en copiant collant tout mon projet dans un nouveau... j'ai constaté finalement que le problème venait du fait que le spin button et le multipage sont dans des frames séparées