gestion de boucle

  • Initiateur de la discussion isa88000
  • Date de début
I

isa88000

Guest
bonjour à tous,

je souhaiterai créer une boucle pour un programme afin que differents sujets s'affichent les uns à la suite des autres après selection de ceux ci.

merci d'avance


A bientôt
 
I

isa88000

Guest
re,

je crois que j'ai trouvé mon erreur.
etant donné que dans ma selection de sujet d'autres sous sujets en quelque sorte interviennent, il faut que j'en tienne compte dans les quelqUES de programme que tu m'as ecrites non????


merci

A bientôt
 

Riddick

XLDnaute Occasionnel
Bonjour ISA88000
Le forum tous

Désolé je ne travaillle pas le Week End....
Allez nous sommes reparti a moins que tu tiennes ta solution....

tu m'a mis :

Lblrecap.Caption = Lblrecap.Caption & TxtBoxtacheselec.Value & Chr(13)
TxtBoxtacheselec.Value = ''
Lblrecap.Caption = 'tâche plannifiée : ' & TxtBoxtacheselec & Chr(10) & _
'date de début : ' & TxtBoxdébut.Text & Chr(10) & _
'date de fin : ' & TxtBoxfin.Text

Ligne1: Le label prend la valeur du label + celle du Txtbox et un saut de ligne

Ligne2: Mise a zéro du Txtbox

Ligne3: label = Tache planifié ET le txtbox???ET chr(10)
Txtbox tous seul ca veu rien dire il faut rajouter un .Value mais tu l'a mis a zéro juste avant

Je pense que c'est plus:

Lblrecap.Caption = Lblrecap.Caption & TxtBoxtacheselec.Value & Chr(13)
TxtBoxtacheselec.Value = ''
Lblrecap.Caption = 'tâche plannifiée : ' & Lblrecap.Caption & Chr(10) & _
'date de début : ' & TxtBoxdébut.Text & Chr(10) & _
'date de fin : ' & TxtBoxfin.Text

Si ce n'est pas ca envoie moi ton fichier zippé que je voye directement
 
I

isa88000

Guest
bonjour,

ok voici mon fichier.
merci pour ton aide
[file name=projet info_20050530103207.zip size=35354]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/projet info_20050530103207.zip[/file]


A bientôt
 

Pièces jointes

  • projet info_20050530103207.zip
    34.5 KB · Affichages: 17

Riddick

XLDnaute Occasionnel
Regarde si c'est ca que tu veux lorsque tu click sur OK
Sinon explique moi
Quel bouton Quelle valeur....
A moins que tu veuille le resultat sous forme

Taches plannifiés : tache 1 , tache2 , tache3,....
Date deb 00/00/0000
Date fin 00/00/0000

[file name=projet info_20050530135358.zip size=33934]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/projet info_20050530135358.zip[/file]
 

Pièces jointes

  • projet info_20050530135358.zip
    33.1 KB · Affichages: 18

Riddick

XLDnaute Occasionnel
Bonjour ISA88000
Le forum.....

Vu ce que tu mets dans ton Label ne met pas de listBox aucun interet et plus lourd a gerer...

Si tu veux tu peux mettre un textbox avec la propriete Multiligne à vrai et remplace Caption par Value ou par Text....
 
I

isa88000

Guest
bonjour,

alors je t'explique pourquoi je souhaite transformer ma lblrecap en case avec une barre de defilement. En effet quand je selectionne plusieurs taches à effectuer au bout de la troisieme, elles ne se voient plus car la case lblrecap est trop petite. Je voudrais créer une barre de defilement afin que l'on puisse toutes les voir.

voilà


merci pour ton aide

A bientôt
 

Riddick

XLDnaute Occasionnel
Salut ISA88000

WOuah 6:33 :S
Bon je te conseille de mettre un grand textBox
avec la propriété Multiline = True
et la propriété ScrollBars = 2-FmScrollBarsVertical

et du coup tu remplace .Caption par .Text ou .Value

En esperant avoir été clair....
 
I

isa88000

Guest
bonjour,

j'ai bien effectué les modifications que vous m'avez indiqué , enfin je pense mais je ne peux toujours pas voir toutes les taches.

je ne sais pas pourquoi?????


merci de votre aide

A bientôt
 
I

isa88000

Guest
bonjour,

ok c'est bon ca marche.
je voudrais ajouter une userform qui apparaitrait quand je clique sur le date pour m'afficher les heures et pouvoir les selectionner.

comment faire?

merci beaucoup pour ton aide

A bientôt
 
I

isa88000

Guest
bonjour à tous,

voilà où en est mon programme!
j'ai crée une autre userform pour choisir une heure et je voudrais y faire figurer dans les différentes combobox les heures ( 1 à 23) les minutes (1 à 59) et les secondes (1 à 59) sous le meme principe que les dates .

Comment faire?


merci d'avance

A bientôt
 
I

isa88000

Guest
bonjour à tous,

je cherche à comprendre les lignes de programme suivantes

Dim D1, D2 As Date
D1 = CDate('1/' & ComboBox2.Value & '/' & ComboBox1.Value)
D2 = DateAdd('m', 1, D1) - 1
az = WeekDay(D1, 2)
For i = 0 To 36
U_chx_dte(i).Visible = False
U_chx_dte(i) = False
U_chx_dte(i).Tag = ''
Next i
For jcal = D1 To D2
U_chx_dte(az + Day(jcal) - 2).Visible = True
U_chx_dte(az + Day(jcal) - 2).Caption = Format(jcal, 'd')
U_chx_dte(az + Day(jcal) - 2).Tag = jcal
Next jcal


afin que je puisse faire le meme genre de userform pour le choix de l'heure.

merci
A bientôt
 

Riddick

XLDnaute Occasionnel
Salut ISA 88000

Je comprends le code mais je suis sans doute pas le mieu placé pour te repondre comme il faut je te propose de faire un nouveau post
avec un autre titre et de redemander l'explication du code
Tu peux mettre un lien vers ce post pour que les gens comprenne si tu veux mais un nouveau post t'apportera sans doute plus de reponse

De plus ta question n'es pas la meme qu'au debut
 

Discussions similaires

Réponses
1
Affichages
169
Compte Supprimé 979
C
Réponses
4
Affichages
189

Statistiques des forums

Discussions
312 609
Messages
2 090 192
Membres
104 447
dernier inscrit
Baldur