8 utilisateurs inconnus

 Mot :   Pseudo :  
 
Bas de page
Auteur
 Sujet :

Comment controler un spin Button dans Excell

 
n°48646
smallmadtv
Overclocker d'Apn
Posté le 13-09-2006 à 14:39:28  profilanswer
 

salut,
 
Bon je vais faire simple:
 
J'ai une case dans Excel qui contien un Nombre (entré manuellement)
et j'aimerai programmer le Spin Button pour qu'il augmente ou diminue le nombre....
 
Pour l'instant j'ai plein de M*** j'arrive pas a aller plus haut que 100...
 
Et plus bas que 0....  Grrrr
 
 
 
Sachant que le Nombre entré peut etre 0.001 ou 1 000 000 je dois faire un programme qui adapte le spin button en fonction de la Valeur...  
 
Je peux pas faire du +1 ou -1 (En plus je sais meme pas le faire maintenant) mais un truc adaptatif...
 
Bon allez merçi pour le coup de MAin....
 
 
En plus je suis sur que c'est un truc simple...
 

n°48648
Gwalchmei
Aussi en versions 1/2 & 1/3
Posté le 13-09-2006 à 14:44:45  profilanswer
 

Qu'est-ce que tu appelles un "Spin button" tu veux dire "custom" ?
 
Ben oui, en VBA, tu peux faire une macro que le boutton déclenche et qui augmente le nombre de ta cellule de X (ou le diminue)  [:taiste]
 
Un petit truc : tu enregistre une macro, tu fais tout ce que tu veux que tes bouttons fassent, puis tu vas voir le code VBA écrit par la macro et tu le modifies à ta sauce  ;)


---------------
La sagesse commence où finit la crainte de Dieu. (André Gide)
AKA : Super Laïque
Computermsa-Shop Magasin belge de qualité !
n°48649
smallmadtv
Overclocker d'Apn
Posté le 13-09-2006 à 14:48:01  profilanswer
 

C'est ce que je fait d'habitude...Mais la, je bloque...
 
Spin Buton : http://www.gnome.org/projects/gnumeric/doc/figures/widget-spinbutton.png

n°48650
smallmadtv
Overclocker d'Apn
Posté le 13-09-2006 à 14:50:03  profilanswer
 

Pour l'instant, le code qui marche jusqu'a 100 c'est ca....  
 
Private Sub SpinButton1_Change()
Cells(5, 4) = SpinButton1.Value
End Sub
 
Mais il ne tient pas compte de l'entrée manuelle ..

n°48651
Gwalchmei
Aussi en versions 1/2 & 1/3
Posté le 13-09-2006 à 14:50:15  profilanswer
 

Ah, ok ... C'est donc un contrôle. Tu dois pouvoir modifier ses propriétés.
 
Tu dois faire quoi exactement ?


---------------
La sagesse commence où finit la crainte de Dieu. (André Gide)
AKA : Super Laïque
Computermsa-Shop Magasin belge de qualité !
n°48652
smallmadtv
Overclocker d'Apn
Posté le 13-09-2006 à 14:56:45  profilanswer
 

Ok Merçi...J'avais pas pensé aux propriétés.....
 
je veux fair un spin button qui fait +1 ou -1 dans une case...
 
Mais il doit s'adapter a la valeur initiale de la case...

n°48653
smallmadtv
Overclocker d'Apn
Posté le 13-09-2006 à 14:59:09  profilanswer
 

Si c'est 1000 => 1010=>1020 ...
Si c'est 100 => 101=>102 ...
Si c'est .01 => 0.02=> .03 ...
 
Pas tjs +1 +1 +1
 
Car sinon c'est 1000, 1001, 1002, 1003
ou 10, 11, 12, 13
ou (et c'est la le pire) 0.01, 1.01, 2.01, 3.01

n°48655
smallmadtv
Overclocker d'Apn
Posté le 13-09-2006 à 15:09:01  profilanswer
 

Voila mon code Final...
C'est pas le top main ca roule
Private Sub SpinButton27_SpinDown()
Cells(1, 1).Value = Cells(1, 1).Value - Cells(1, 1).Value / 100
End Sub
 
Private Sub SpinButton27_SpinUp()
Cells(1, 1).Value = Cells(1, 1).Value + Cells(1, 1).Value / 100
End Sub

n°48657
Gwalchmei
Aussi en versions 1/2 & 1/3
Posté le 13-09-2006 à 15:44:16  profilanswer
 

Pas très propre, mais tu n'as pas beaucoup de choix :  

Citation :

SmallChange Property
 
Specifies the amount of movement that occurs when the user clicks either scroll arrow in a ScrollBar or SpinButton.
 
Syntax
 
object.SmallChange [= Long]
 
The SmallChange property syntax has these parts:
 
Part                          Description  
object Required.         A valid object.  
Long Optional.           An integer that specifies the amount of change to the Value property.  
 
Remarks
 
The SmallChange property does not have units.
 
Any integer is an acceptable setting for this property. The recommended range of values is from –32,767 to +32,767. The default value is 1.


En clair, tu ne peux pas assigner une valeur à décimale comme step. Ton spin button n'a donc pas plus d'utilité que 2 bouttons séparés avec un event OnCLick (sauf que tu n'as qu'un contrôle au lieu de 2).


---------------
La sagesse commence où finit la crainte de Dieu. (André Gide)
AKA : Super Laïque
Computermsa-Shop Magasin belge de qualité !
n°48672
Arl-Guhr
kan g faim je mange
Posté le 14-09-2006 à 15:05:48  profilanswer
 

c'est étrange comme manière de faire
pcq ton utilisateur ne retombera jamais sur une valeur donnée ou précise


Message édité par Arl-Guhr le 14-09-2006 à 15:07:26

---------------
il s'appel le ronge me doute

Aller à :
Ajouter une réponse