begin process at 2012 02 14 11:24:18
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Archive Visual Basic & VB.NET

 > 

Archives Visual Basic

 > 

VBA

 > 

userform et checkbox ....


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

userform et checkbox ....

mardi 2 novembre 2004 à 11:59:55 | userform et checkbox ....

guitch1101

Bonjour les gens ...

Pitite qst ...

En VBA excel, je me suis crée un userForm avec des choses de ce genre :

private sub ChekBox1_click()
tableau1(indice1) = "janvier"
ReDim Preserve tableau1(UBound(tableau1) + 1)
indice1 = indice1 + 1
end sub

etc etc pour les autres mois ...

Ma question est que lorsque je coche par exemple le mois de janvier (codé ci dessus) et que je le décoche, dans mon tableau, le mois de janvier apparait 2 fois !!!!! au lieu d'etre absent ... ???

Je ne croit pas que ce soit difficile à réaliser cependant, j'ai essayé de faire un private sub UnCheckBox1 ... sans succès.


MERCI BEAUCOUP A LA BONNE AME QUI M'AIDERA :)


Guitch. (débutant toujours mais en grand progrés quand meme )
mardi 2 novembre 2004 à 12:34:02 | Re : userform et checkbox ....

jrivet

Membre Club
Réponse acceptée !
Salut,

C est normal qu il apparaissent 2 fois car le sub Click ne fait pas la difference entre check et uncheck.

Il faut que a l interieur de cette sub tu teste la valeur de checkbox.
(checkbox.value je crois)

donc ca donnerai

private sub ChekBox1_click()
if ChekBox1.value = 1 then
tableau1(indice1) = "janvier"
ReDim Preserve tableau1(UBound(tableau1) + 1)
indice1 = indice1 + 1
end if
end sub

@+
Julien
-----------------------------------------------------------
Essai ca sinon on trouvera autre chose
-----------------------------------------------------------
mardi 2 novembre 2004 à 12:35:05 | Re : userform et checkbox ....

DARKSIDIOUS

Membre Club Administrateur CodeS-SourceS
Normal, à l'événement click, que le checkbox soit coché ou non, tu incrémente le nombre d'entrée dans ton tableau !
Fais un teste sur la propriété Value de ton checkbox
_______________________________________

DarK Sidious

[Responsable API/VB du site www.ProgOtoP.com]
Téléchargez ProgOtoP API Viewer
mardi 2 novembre 2004 à 15:44:05 | Re : userform et checkbox ....

guitch1101

merci beaucoup ....

Il y a juste que ce n'est pas "1" mais "true"

Par contre je suis en plein test pour effacer ma valeur entrée dans le tableau dans le cas ou l'on décoche.

Pour moi il me semble qu'il faut que je recherche l'endroit dans mon tableau ou j'ai ma valeur à retirer, ensuite, il fat que je décale mon tableau ...

J'ai essayé cela mais sans succès .....

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
tableau1(indice1) = "janvier"
ReDim Preserve tableau1(UBound(tableau1) + 1)
indice1 = indice1 + 1
End If
If CheckBox1.Value = False Then
For i = 0 To indice1
If tableau1(i) = "janvier" Then
For j = i To indice1
tableau1(j) = tableau1(i + 1)
i = i + 1
Next j
End If
Next i
End If
End Sub

Merciiiiiiiiii encore :)

Guitch.
mardi 2 novembre 2004 à 17:12:19 | Re : userform et checkbox ....

jrivet

Membre Club
Re,

Content d avoir pu aider
Pour la supression , essaie en utilisant une matrice temporelle
au dimension UBound(tableau1) - 1

et tu recopie tout sauf le mois decoche...

et apres tu repasse ta matrice temporelle dans ta matrice principale... je te l acorde c est un peu barbare

Une question ta matrice solamente peu avoir 12 elements (12 mois) ou plus ?

sinon tu mets simplement la valeur a "" pour le mois decocher.
@+
Julien
-----------------------------------------------------------
Essai ca sinon on trouvera autre chose
-----------------------------------------------------------


Cette discussion est classée dans : userform, mois, tableau1, janvier, indice1


Répondre à ce message

Sujets en rapport avec ce message

userform et checkbox ... suite et fin (j'espère !!!) [ par guitch1101 ] Voilà, apres mon 1er probleme resolu, en voici un dernier ...Maintenant je voudrais pouvoir effacer de mon tableau la valeur associée à mon checkbox d Fonction som (sql) [ par sabrina7 ] Bonjour J'aurai besoin d'aide pour compléter une requête SQL sur Access afin de réaliser la fonction suivante: Voici ma table contenant mes données:Ta date dans calendar [ par tommarianne ] sous excelje dispose d' un userform avec un calendara l' initialisation du userform le calendar prend la valeur du jour aujourd' hui(calendar1.today)l Nom du jour d'une date [ par kokoista ] Bonjour,J ai un probleme, je veux recuperer le nom du jour d'un mois precis dans une année précise en vb.net et j'ai pas trouvée la solution ,par exem [VBA / Excel] Manipulation des Dates [ par sql84 ] Bonjour la communauté,Voila, j'ai un problème à resoudre et j'aimerai avoir votre avis la dessus, je vais donc essayer de vous expliquer le plus préci palette de couleur et calendrier [ par fodbe ] bonjourest ce que vous pouvez me dire comment  si c'est possible d'avoir en vb6 un écran qui se présente de la manière suivante<span style="FONT-SIZE: Aide pour requête [ par sabrina7 ] Bonjour J'aurai besoin d'aide pour réaliser une requête SQL ou un bout de code en VBA afin de réaliser la fonction suivante: Voici ma table contenant Aide sur creation de macro d'un TCD [ par rubpon ] Bonjour à tous et à toute J'ai besoin svp de l'aide pour réaliser ce travail qui sans doute me facilitera mes taches mensuelles tres lourdes à gerer m garder un userform à l'écran pendant que du code se déroule... [ par lamquin ] Comment faire pour qu'une userform reste à l'écran lors de l'éxécution d'une boucle? Userform.show : affiche mon userform mais tant qu'il n'est pas fe


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,530 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales