textbox et variable onglet

Le
eneric
Bonjour, a toutes et tous meilleurs voeux
je voudrais que tous mes textbox reagissent en fonction de l'onglet
activé dans le combobox de l'usf
il y en a une vingtaine
j'ai mis cela dans le private sub initialize
For i = 1 To Sheets.Count
Me.listefeuille.AddItem Sheets(i).Name
Next i
mes textbox se remplissent comme cela
textbox1 = Sheets("toto").Range("Cellule")
je tourne en rond dans la boucle en mettre en oeuvre
changer "toto" par une variable mais ca coince
merci
ca

--
eneric
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Daniel.C
Le #18475331
Bonjour, Mes voueux les plus chers également.
Si j'ai bien compris...
textbox1 = Sheets(Me.listefeuille.value).Range("Cellule")
Cordialement.
Daniel

Bonjour, a toutes et tous meilleurs voeux
je voudrais que tous mes textbox reagissent en fonction de l'onglet activé
dans le combobox de l'usf
il y en a une vingtaine
j'ai mis cela dans le private sub initialize
For i = 1 To Sheets.Count
Me.listefeuille.AddItem Sheets(i).Name
Next i
mes textbox se remplissent comme cela
textbox1 = Sheets("toto").Range("Cellule")
je tourne en rond dans la boucle en mettre en oeuvre
changer "toto" par une variable mais ca coince
merci
ca


eneric
Le #18474601
bonjour daniel
et moi qui cherchait midi a 14h comme quoi
j'avais la solution sous les yeux
de meme que j'ai cherche a rentrer une formule
avec NBSI et SOMMEPROD
textbox1 = application.countif etc...
et idem pour sumproduct
mais helas il doit me manquer
quelque chose que je ne maitrise pas
et ca plante
a+ daniel

Bonjour, Mes voueux les plus chers également.
Si j'ai bien compris...
textbox1 = Sheets(Me.listefeuille.value).Range("Cellule")
Cordialement.
Daniel



--
eneric
Daniel.C
Le #18474791
textbox1 = Application.CountIf([Feuil1!A:A], "nom")

Pour sommeprod, la formule est "sumproduct".
Daniel
bonjour daniel
et moi qui cherchait midi a 14h comme quoi
j'avais la solution sous les yeux
de meme que j'ai cherche a rentrer une formule
avec NBSI et SOMMEPROD
textbox1 = application.countif etc...
et idem pour sumproduct
mais helas il doit me manquer
quelque chose que je ne maitrise pas
et ca plante
a+ daniel

Bonjour, Mes voueux les plus chers également.
Si j'ai bien compris...
textbox1 = Sheets(Me.listefeuille.value).Range("Cellule")
Cordialement.
Daniel




eneric
Le #18475141
> Pour sommeprod, la formule est "sumproduct".
Daniel


countif fonctionne par contre sumproduct il n'en veut pas
agpr = Application.sumproduct((F2:F80="A")*(G2:G80="P"))
il bugue sur le :
j'ai fait un tour sur le net
http://www.developpez.net/forums/d569656/hardware-systemes-logiciels/microsoft-office/excel/vba-excel/worksheetfunction-sumproduct-vba/
si tu as une autre solution je prends
merci daniel

--
eneric
Daniel.C
Le #18476671
agpr = Evaluate("SumProduct((F2:F80=""A"")*(G2:G80=""P""))")
Daniel

Pour sommeprod, la formule est "sumproduct".
Daniel


countif fonctionne par contre sumproduct il n'en veut pas
agpr = Application.sumproduct((F2:F80="A")*(G2:G80="P"))
il bugue sur le :
j'ai fait un tour sur le net
http://www.developpez.net/forums/d569656/hardware-systemes-logiciels/microsoft-office/excel/vba-excel/worksheetfunction-sumproduct-vba/
si tu as une autre solution je prends
merci daniel


eneric
Le #18476291
> agpr = Evaluate("SumProduct((F2:F80=""A"")*(G2:G80=""P""))")
Daniel

Pour sommeprod, la formule est "sumproduct".
Daniel


countif fonctionne par contre sumproduct il n'en veut pas
agpr = Application.sumproduct((F2:F80="A")*(G2:G80="P"))
il bugue sur le :
j'ai fait un tour sur le net
http://www.developpez.net/forums/d569656/hardware-systemes-logiciels/microsoft-office/excel/vba-excel/worksheetfunction-sumproduct-vba/
si tu as une autre solution je prends
merci daniel





merci je teste tout de suite
bonne nuit daniel

--
eneric
Publicité
Poster une réponse
Anonyme