Discussion :

[mika06]

Bonjour,

Je souhaite modifier le nom (caption) d'un onglet avec la ligne de code suivante mais j'obtiens une erreur. Le code se trouve à l’intérieur d'un module.

Code :

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

1
2
3
4
 
Sub TraductionAnglais_Clic()
UFrmGestionBD.MPgeGestionBD.Page0.Caption = Worksheets("Table").Range("d136")
End Sub

UFrmGestionBD : Nom de l'userform
MPgeGestionBD : Nom du multipage
Page0 : Onglet numéro 1
Caption : Nom de l'onglet

Pouvez-vous m'indiquer ce qui ne vas pas ?

Merci.

[SfJ5Rpw8]

...
Je souhaite (...) avec la ligne de code suivante mais j'obtiens une erreur.

Bonjour,

il faut tout d'abords lire le message d'erreur !

[mika06]

Oui le voici en pièces jointes.

En te remerciant.

[SfJ5Rpw8]

et bien évidemment la page0 existe ... tu as bien renommé tes onglets ... (habituellement un multipage commence par la page1)

[Theze]

Bonjour,

Sans même faire de test, on voit d'où vient l'erreur !
C'est Pages(0) et non Page0 :

Code :

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

1
2
 
UFrmGestionBD.MPgeGestionBD.Pages(0).Caption = Worksheets("Table").Range("d136")

Hervé.

[mika06]

J'ai modifié ce que vous m'avez dit, à savoir :

[LIST][*]remplacer page0 par page1[*]remplacer page1 par page(1)

Cependant, l'erreur persiste toujours.

En vous remerciant.

[joe.levrai]

Bonjour,

tu confonds l'indice de la collection Pages et le "Name" d'un page !

l'aide VBA est pourtant claire à ce sujet :

soit un Multipage1 contenant 2 pages située sur un Userform1
Aucun renommage n'ayant été fait, ta première page est :

Code :

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

1
2
3
 
Me.MultiPage1.Page1.Caption = "toto"
Me.MultiPage1.Pages(0).Caption = "tata"

ces deux lignes modifient bien la première page de ton contrôle (on reste bien sur sur le postulat que tu n'a pas modifié l'index est le Name des pages ..... NAME n'est pas le CAPTION)



On va quand même désamorcer la suite de ta ligne : tu changes le caption en utilisant la valeur d'une cellule. Est-ce que la référence est bonne ?? (nom d'onglet etc..)

[mika06]

Ce que tu as vu en capture d'écran est une des tentatives que j'ai essayées. J'ai vraiment essayé tous les cas de figure. De plus, je ne pense pas que je confonds l'indice de la collection Pages et le "Name" d'un page car j'ai suivi un tuto qui me donnais toutes les possibilités de changer les captions d'un multipage.



En te remerciant.

[joe.levrai]

Bonjour,

l'index Pages(i) d'une collection d'onglet commence à 0

ce n'est pas le cas de l'objet page, qui commence à 1

Code :

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

1
2
3
4
 
Sub TraductionAnglais_Clic()
UFrmGestionBD.MPgeGestionBD.Page1.Caption = Worksheets("Table").Range("d136")
End Sub

là tu pointes bien ton premier onglet