OVH Cloud OVH Cloud

contrôles multipages

4 réponses
Avatar
b.delap
Bonjour à tous les experts.
J'ai essayé de prendre le temps de lire la faq et de lire qqs uns des
derniers fils.
Mais (tout nouveau sur ce forum) je me posais la (les)question(s) :
1. Existe-t-il des archives complètes de ce forum et suis-je assez bête pour
n'en avoir pas trouvé le lieu?
2. (c'est l'objet de ma requête) je crois que l'on ne peut pas diriger la
caption d'un multipage par VBA. Ou bien je me trompe.
Comment faire pour (Excel 97) :
J'ai x clients répertoriés sur une feuille "clients". le nom du client est
en An. En Bn, Cn, Dn etc figurent des produits comme "produit1",
"produit2", "produit3", etc.
Sur une userform, j'appelle le client n<x par une combobox ou une textbox ou
peu importe, ma feuille "sait" que client est défini et s'appelle clienti
Je voudrais que sur le multipage présent sur la feuille, page1 prenne
l'intitulé "produit1", page2 prenne l'intitulé "produit2", page3 prenne
l'intitulé "produit3", etc.
Bref, un truc du genre :
For i = 1 to n
If client = clienti then
multipage.pagei.Caption = Lebonendroit.cells("produit"&i).value (ou .text ou
...)
next i

Fus-je clair?

Et si par hasard ma requête restait sans solution, sachez que d'une manière
générale j'ai déjà bcp appris à lire vos courriers, et que ça m'épate.
N'en fais-je pas un peu trop?
loudelap

4 réponses

Avatar
Gaenonius
1. Existe-t-il des archives complètes de ce forum


Oui, sur Google. Tu peux utiliser la recherche avancée en limitant ta recherche
au forum *fr.excel par exemple. Adresse :

http://groups.google.com/advanced_group_search

--
Gaenonius

Bonjour à tous les experts.
J'ai essayé de prendre le temps de lire la faq et de lire qqs uns des
derniers fils.
Mais (tout nouveau sur ce forum) je me posais la (les)question(s) :
1. Existe-t-il des archives complètes de ce forum et suis-je assez bête pour
n'en avoir pas trouvé le lieu?
2. (c'est l'objet de ma requête) je crois que l'on ne peut pas diriger la
caption d'un multipage par VBA. Ou bien je me trompe.
Comment faire pour (Excel 97) :
J'ai x clients répertoriés sur une feuille "clients". le nom du client est
en An. En Bn, Cn, Dn etc figurent des produits comme "produit1",
"produit2", "produit3", etc.
Sur une userform, j'appelle le client n<x par une combobox ou une textbox ou
peu importe, ma feuille "sait" que client est défini et s'appelle clienti
Je voudrais que sur le multipage présent sur la feuille, page1 prenne
l'intitulé "produit1", page2 prenne l'intitulé "produit2", page3 prenne
l'intitulé "produit3", etc.
Bref, un truc du genre :
For i = 1 to n
If client = clienti then
multipage.pagei.Caption = Lebonendroit.cells("produit"&i).value (ou .text ou
....)
next i

Fus-je clair?

Et si par hasard ma requête restait sans solution, sachez que d'une manière
générale j'ai déjà bcp appris à lire vos courriers, et que ça m'épate.
N'en fais-je pas un peu trop?
loudelap




Avatar
Daniel.M
Bonsoir,

Pour ce groupe-ci, les archives sont:

http://www.google.fr/advanced_group_search?q=group:microsoft.public.fr.excel&hl=fr&lr=lang_fr&ie=UTF-8&oe=UTF-8&newwindow=1

Salutations,

Daniel M.
Avatar
Alain CROS
Bonjour.

Si moins de 27 pages dans le Multipage :

Private Sub UserForm_Initialize()
Dim I&
With MultiPage1.Pages
For I = 0& To .Count - 1&
.Item(I).Caption = Range(Chr$(I + 65&) & n)
Next I
End With
End Sub

Alain CROS

"b.delap" a écrit dans le message de news: 41dc6c6d$0$1605$
Je voudrais que sur le multipage présent sur la feuille, page1 prenne
l'intitulé "produit1", page2 prenne l'intitulé "produit2", page3 prenne
l'intitulé "produit3", etc.
Bref, un truc du genre :
For i = 1 to n
If client = clienti then
multipage.pagei.Caption = Lebonendroit.cells("produit"&i).value (ou .text ou
...)
next i


Avatar
b.delap
Pour ma première intervention sur ce forum,

Alain CROS
Gaenonius
Daniel M.

m'ont répondu.
Et ces réponses m'ont éclairé après quelques heures de tournerenrond.

Qu'ils en soient remerciés; il y aura toujours un bol de soupe pour eux. Et
les autres.
loudelap