![]() |
|
Forum
|
|
|
#16 (permalink) |
|
Guest
Messages: n/a
|
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 |
|
| ANNONCES | |||
|
|
|
|
#17 (permalink) |
|
XLDnaute Occasionel
Date d'inscription: avril 2005
Messages: 190
|
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 |
|
|
|
|
|
#19 (permalink) |
|
XLDnaute Occasionel
Date d'inscription: avril 2005
Messages: 190
|
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] |
|
|
|
|
|
#22 (permalink) |
|
XLDnaute Occasionel
Date d'inscription: avril 2005
Messages: 190
|
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.... |
|
|
|
|
|
#23 (permalink) |
|
Guest
Messages: n/a
|
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 |
|
|
|
#24 (permalink) |
|
XLDnaute Occasionel
Date d'inscription: avril 2005
Messages: 190
|
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.... |
|
|
|
|
|
#26 (permalink) |
|
XLDnaute Occasionel
Date d'inscription: avril 2005
Messages: 190
|
Bonjour a toi le forum,
Si tu as tout fait ca doit marcher sauf que pour le voir tu dois cliquer dessus et la ScrollBar apparait Sinon c'est qu'il manque une propriété Voilà Au pire je t'enverrai un exemple |
|
|
|
|
|
#28 (permalink) |
|
Guest
Messages: n/a
|
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 |
|
|
|
#29 (permalink) |
|
Guest
Messages: n/a
|
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 |
|
|
|
#30 (permalink) |
|
XLDnaute Occasionel
Date d'inscription: avril 2005
Messages: 190
|
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 |
|
|
|
| ANNONCES | |
![]() |
| Liens sociaux |
| Outils de la discussion | |
|
|