Discussion :

[Elstak]

Salut,

Voilà j'ai un petit probleme concernant un message que je veux afficher.
Il s'agit d'un message qui repertorie les noms de certains fichier mais lorqu'il y a trop de nom, le msgbox coupe et je n'ai que le debut .

Y a t'il une solution pour qu'il affiche tout ou y a t'il une autre maniere d'afficher que le msgbox?

merci

[SfJ5Rpw8]

peu-être une userform ..., avec une listbox, pour afficher ta liste de fichiers...

[jmfmarques]

ou y a t'il une autre maniere d'afficher que le msgbox?

Evidemment !
En passant par les Textboxes, les listboxes...etc... (plus adaptées à ce que tu fais) !

[Elstak]

Si tu le dis
J'vais m'interesser un peu à ses userform car je connais pas du tout

[Elstak]

me revoilà,

alors j'ai créé une Listbox dans un userform mais j'ai un souci pour y faire afficher mes valeurs

Je récupere, à chaque erreur, le nom du fichier et le place à la sui dans MsgERREUR (à chaque fois je apsse à la ligne et j'ajoute le nom du fichier suivant)

j'ai ecrit ce code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
ResultatErreur.ListeErreur.Value = MsgERREUR
ResultatErreur.Show

Et à la fin de ma macro j'ai bien le userform qui apparait mais la lsite est vide, alors que mon msgbox affiche quelque chose du type :

Voici les erreur:
nomfichier1
nomfichier2
nomfichier3....

Pourquoi pas dans mon user form? (au passge Listeerreur est le nom de ma listbox.)

[SfJ5Rpw8]

pour ajouter un élément dans une listbox ... voir additem...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
ResultatErreur.ListeErreur.Additem  MsgERREUR

[méphistopheles]

une liste est elle bien nésséçaire alors qu'un simple textbox ou groupe de labels suffirais si elle veut obtenir l'équivalent d'une msgbox...

en même temps, c'est vrai que c'est plus simple avec une listbox.

[SfJ5Rpw8]

une liste est elle bien nésséçaire alors qu'un simple textbox ou groupe de labels suffirais si elle veut obtenir l'équivalent d'une msgbox...

en même temps, c'est vrai que c'est plus simple avec une listbox.

?

[méphistopheles]

une msgbox contient du texte non selectionable. un groupe de label serais ce qui s'en raproche le plus du point de vue graphique.

[Elstak]

Merci bien pour le additem
Au passage personne ne saurai comment selectionner un element d'une listebox? (un item) en connaissant le nom ou sa place

(quelque chose du genre ResultatErreur.ListeErreur(1).select, mais qui marche )

[SfJ5Rpw8]

Merci bien pour le additem
Au passage personne ne saurai comment selectionner un element d'une listebox? (un item) en connaissant le nom ou sa place

(quelque chose du genre ResultatErreur.ListeErreur(1).select, mais qui marche )

de mémoire : ResultatErreur.ListeErreur.list(1).select

[jmfmarques]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Command1_Click()
  List1.Selected(0) = True
End Sub

[Elstak]

et bah... non

Aucune des 2 solutions je va

une autre idée?

[SfJ5Rpw8]

A oui... j'ai répondu trop vite

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ResultatErreur.ListeErreur.listindex =1

[Elstak]

je prefere ca!!

merci bbil

derniere petite question (là on s'eloigne du sujet d'origine mais bon...), apres avoir selectionné cet element, j'ai un bouton command (Bouton1) que j'aimerais cliquer automatiquement, c'est faisable?

[SfJ5Rpw8]

je prefere ca!!

merci bbil

derniere petite question (là on s'eloigne du sujet d'origine mais bon...), apres avoir selectionné cet element, j'ai un bouton command (Bouton1) que j'aimerais cliquer automatiquement, c'est faisable?

?? c'est quoi ce bouton ? ou il est ? que fais-t'il ? s'il appelle une procédure ... pourquoi n'appelle-tu pas celle-ci aprés la sélection..?

[Elstak]

Alors, le bouton est sur le userform où il y a la liste.

euh, pas bete l'idée d'appel de procédure (je sais pas pourquoi je voulais absolument faire un clique) , jvais voir pour un appel de procédure

Sinon (pour ne pas que tu t'ennuyes ), je sais changer le nom d'un userform mais pourtant lorsqu'il s'ouvre le nom en haut de la fenetre reste userform1, on peut changer ca aussi?

[SfJ5Rpw8]

Sinon (pour ne pas que tu t'ennuyes ), je sais changer le nom d'un userform mais pourtant lorsqu'il s'ouvre le nom en haut de la fenetre reste userform1, on peut changer ca aussi?

voir propriété caption ...

sinon pour l'appel de la procédure suffit de taper son nom

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

CommandButton1_Click

mais pour que ton code soit plus clair tu devrai créer une procédure avec un nom explicite ... effectuant les diverses actions "derriére" ton bouton ... et ensuite tu appelle cette procédure lors du clic sur bouton ou dans ta liste ...

[Elstak]

Ouép merci

Le caption j'y avais pas fais attention pour le userform

derniere question (promis ! ) j'ai 2 pages (multipages) mais lorsque je fait ResultatErreur.Show, il montre par defaut la premiere page, j'ai tenté ca : ResultatErreur.MultiPage1.Pages (2) mais bon biensur c'est pas bon... mes pages s'appelent page1 et page2

[jmfmarques]

Boutonmachin_click

(pour autant que tu y aies des instruction, dans l'événement click de ton BoutonMachin)