Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Combobox dans USF

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
L

Laurent313131

XLDnaute Occasionnel
Bonsoir le forom,

Tout d'abord vous trouverez mon fichier en pièce jointe.

Je voudrais de l'aide sur une combobox qui se trouve dans un USF. J'ai crée une zone de liste déroulante sur ma feuille "1". J'y choisis mon exercice puis je clique sur le bouton bleu "Calcul des % de la RM" pour lancer mon USF. Quand je clique sur le bouton "calculer " de cet USF, mon code me calcule différents % de la valeur qui est inscrite dans la textbox1 "1RM" et ce en fonction de l'exercice que j'ai choisis dans la zone de liste. Jusque là aucun problème.

En fait, pour des raisons d'ergonomie, je voudrais supprimer ma zone de liste sur ma feuille "1" pour l'intégrer dans mon USF. J'ai donc créér la combobox 1 mais ensuite je ne sais pas la remplir pour refaire ma manip. En effet, je veux conserver le même principe dans mon USf :

Je choisis mon exo dans ma combobox, je clique sur calculer et ça me calcule les % de la valeur qui s est inscrite dans la textbox "1RM".

Merci de me venir en aide !!!
 

Pièces jointes

Trier par date Trier par votes
Re : Combobox dans USF

Bonsoir Laurent313131,

Il faut charger la combobox1 à l'initialisation de la userform :


Private Sub UserForm_Initialize()
ComboBox1.RowSource = "1!AA28:AA35"
End Sub

Cordialement

Bernard
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Combobox dans USF

Bonsoir Bernard et merci.

J'arrive à sélectionner un exercice dans la combobox mais qd je clique sur calculer j ai un message d'erreur !

De plus les coordonnées des cellules ont changé car je n'ai plus les A, b, c ... j ai des chiffres !
 
Vote positif 0 Vote négatif
Re : Combobox dans USF

Bonsoir,
A moins que tu n'ais trouvé la solution...
Dans le code, remplace la ligne bleue
Code: 
Private Sub ComboBox1_Change()
Dim x As Byte, i As Byte
With Sheets(1)
    x = ComboBox1.ListIndex * 2
    TextBox10 = .Cells(20, 7 + x).End(xlUp)
    For i = 1 To 8
    Controls("Textbox" & i) = [COLOR="Blue"]Round(CDbl(TextBox10) * (10 * i + 20) / 100, 0)[/COLOR]
    Next
End With

End Sub
A+
kjin
 
Vote positif 0 Vote négatif
Re : Combobox dans USF

Bonsoir Kjin,

en fait j'ai du utiliser mon code car je ne comprend pas le tien... 😛 L'essentiel c'est que ça marche même s'il est beaucoup plus long que le tien !

J'ai rajouté dans mon code le Round(CDbl... qui génère des valeurs entières. Donc c'est parfait !

Merci beaucoup pour ton aide ! ! ! !
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

M
  • Question Question
Microsoft 365 Lecture vocale USF
Réponses
5
Affichages
168
Marec
M
H
  • Résolu(e)
XL 2021 Rétablir la valeur initiale d'une combobox
Réponses
7
Affichages
148
hyule
H
J
  • Résolu(e)
XL 2021 Filtre combobox
Réponses
5
Affichages
183
Dranreb
J
  • Question Question
Microsoft 365 ComboBox ActiveX texte défini hors liste
Réponses
3
Affichages
86
juju91
J
  • Question Question
Microsoft 365 Récupérer la liste d'un field d'une feuille dans combobox
Réponses
5
Affichages
142
xhudi69
A
  • Question Question
XL 2010 Problème ou alternative à SOMPRODUCT en VBA
Réponses
14
Affichages
318
bruno lemaire
B
J
  • Résolu(e)
Microsoft 365 ComboBox en cascade
2 3
Réponses
40
Affichages
1 K
AtTheOne
A
  • Question Question
XL 2010 problème lors pour la selection dans un combobox
Réponses
2
Affichages
81
gbinforme
G
  • Question Question
XL 2021 Mise à jour d'un tableau depuis une feuille Excel
Réponses
5
Affichages
214
thunder23
L
  • Question Question
XL 2016 Enregistrer une zone dans un PDF
Réponses
2
Affichages
201
patricktoulon
S
  • Question Question
XL 2021 Actualiser un label dans un USF en permanence depuis une feuille excel
Réponses
7
Affichages
279
TooFatBoy
  • Résolu(e)
XL 2010 listes et dépendances
2
Réponses
22
Affichages
913
job75
S
  • Question Question
XL 2016 Utiliser un UserForm qui s'actualise en direct
Réponses
5
Affichages
581
seby93
S
E
  • Résolu(e)
Microsoft 365 Combobox ajouter si n'existe pas dans Liste
2 3 4
Réponses
47
Affichages
2 K
cathodique
J
  • Question Question
XL 2021 activesheet.shapes suivant la valeur d'une cellule
Réponses
5
Affichages
136
JUAN45
J
C
  • Question Question
Microsoft 365 Combobox sans doublon et avec auto complétion et liée à une autre combobox
2
Réponses
24
Affichages
484
Dranreb
  • Question Question
Microsoft 365 utilisation du dropdown avec une combobox ewcel
Réponses
13
Affichages
504
sylvanu
B
  • Question Question
XL 2019 Conserver les formules qui sont enregistrées dans des cellules
Réponses
8
Affichages
279
Phil69970
  • Question Question
Microsoft 365 combobox afficher la liste dés la changement de la valeur
Réponses
2
Affichages
88
pascal21
  • Question Question
Microsoft 365 liste deroulante "active"" du combobox
Réponses
2
Affichages
124
cathodique
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…