Combobox + incrémentation auto

abtony

XLDnaute Impliqué

• 8 Février 2008

• #16

Re : Combobox + incrémentation auto

Bonjour jp14 et le forum,
unload me fonctionne pas chez moi sur les userform ?
et de plus comment régler le format de la combobox a 2 chiffres apres la virgule au lieu de 14 actuellement car quand je colle tel quel ca me met de forme la et sans la virgule ?
269 999 990 463 257
au lieu de mettre 2,7
merci

 

Vote positif 0 Vote négatif

abtony

XLDnaute Impliqué

• 8 Février 2008

• #17

Re : Combobox + incrémentation auto

bon j'ai beau cherché partout sur le net et sur le forum et je trouve pas de réponse pour ces arrondis !
unload c'est ok
je tourne en rond avec ce problème

 

Vote positif 0 Vote négatif

skoobi

XLDnaute Barbatruc

• 8 Février 2008

• #18

Re : Combobox + incrémentation auto

Re,

La synthaxe des "Private Sub SpinButton...." doit être différente lorsque les controles sont créés à l'execution du USF.
Je ne la connais pas et mon livre est au boulo.
Merci de dire si tu as trouvé.

 

Vote positif 0 Vote négatif

J

jp14

XLDnaute Barbatruc

• 8 Février 2008

• #19

Re : Combobox + incrémentation auto

Bonsoir

Quand j'utilise l'usf, j'ai un affichage avec un chiffre après la virgule.

Pour résoudre ce problème
il faut modifier 2 lignes et mettre

Dim val1 As Currency
ComboBox1.Value = Format(val1 + 0.1, "###0.00") ' deux chiffres après la virgule

a tester

JP

 

Dernière édition: 8 Février 2008

Vote positif 0 Vote négatif

abtony

XLDnaute Impliqué

• 8 Février 2008

• #20

Re : Combobox + incrémentation auto

Bonsoir jp14 et le forum,

que dire de mieux ! c'est plus que parfait un grand merci pour ton aide

vous faite du bon boulot sur ce forum, je m'intéresse beaucoup a excel mais je ne pratiquer plus depuis plus de 7 ans, et questions boulot oblige je dois m'y remettre a fond et ca revient petit a petit avec votre précieuse aide !

merci encore et longue vie a XLD

 

Vote positif 0 Vote négatif

abtony

XLDnaute Impliqué

• 8 Février 2008

• #21

Re : Combobox + incrémentation auto

re
apres les essai je viens de me rendre compte, que si la liste part de 0 cet a dire sans aucune entrée, ca plante
il faudrais faire une boucle de condition et mettre ca

ComboBox1.Value = Format(val1 + 1, "##0.0") ' un chiffres après la virgule
et ca a la suite
ComboBox1.Value = Format(val1 + 1.1, "##0.0") ' un chiffres après la virgule

tout en conservant le format

enfin je suppose !

 

Vote positif 0 Vote négatif

abtony

XLDnaute Impliqué

• 10 Février 2008

• #22

Re : Combobox + incrémentation auto

Bonjour le forum,
Bonjour jp14, je relance ce fil car tu a pas du voir mon dernier message !

merci

 

Vote positif 0 Vote négatif

skoobi

XLDnaute Barbatruc

• 10 Février 2008

• #23

Re : Combobox + incrémentation auto

Bonsoir tout le monde,

pour faire une condition qui vérifie que la donnée n'est pas vide:
exemple pour la cellule A1:

If Not IsEmpty(Range("A1").Value) Then
......
..........
End If

 

Vote positif 0 Vote négatif