Discussion :

[jpclabaux]

Salut,

Tout est dans l'intitulé.
J'ai repris le code de silkyroad et la fenêtre de Dialog n'affiche que le premier caractère du titre.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
Private Sub CBBrowse_Click()
 
    Dim x As Long
 
    With Application.FileDialog(msoFileDialogFilePicker)
        'Définit un titre pour la boîte de dialogue
        .Title = "Le tite de la fenêtre:"
        'Autorise la multi-sélection
        .AllowMultiSelect = True
 
        'Définit un nom de fichier par défaut
        '.InitialFileName = "Nom document.doc"
 
        'Efface les filtres existants.
        .Filters.Clear
        'Définit une liste de filtres pour le champ "Type de fichiers".
        .Filters.Add "Classeurs Excel", "*.xls; *.xlsx; *.xlsm"
        'La valeur 1 permet de spécifier que ce filtre est positionner en premier dans la liste de choix.
        .Filters.Add "Documents Word", "*.doc; *.docx; *.docm", 1
        'Définit le filtre qui s'affiche par défaut dans le champ "Type de fichiers".
        .FilterIndex = 2
 
        'Indique le type d'affichage dans la boîte de dialogue (exemple visualisation des propriétés)
        .InitialView = msoFileDialogViewProperties
        'Affiche la boîte de dialogue
        .Show
 
        'Boucle sur les fichiers sélectionnés
        For x = 1 To .SelectedItems.Count
            MsgBox .SelectedItems(x)
        Next x
 
    End With
 
End Sub

[nchal]

Salut,

Peut-être parce qu'il y a une faute d'orthographe

Code :

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

.Title = "Le titre de la fenêtre:"

Plus sérieusement, je viens d'essayer ce code et il marche bien. Donc sa doit venir de ta machine.
Essaie de nous en dire plus sur tes configurations.

[jpclabaux]

Salut Nchal,

Je suis sur Excel 2002 sur XP.
Je vais faire un test à la maison sur Excel 2007.

Merci,
Jean

[kiki29]

Salut, que ce soit 2002 ou 2007 tout fonctionne correctement
Par contre voir ceci

Extrait :

Lorsque vous appelez une boite de dialogue c'est un composant Windows qui réagit. Or, celui-ci est rappelé dans le dernier état où vous l'avez laissé.

[jpclabaux]

Ça marche sur 2007.
Ça ne m'explique pas pourquoi ça ne marche pas sur 2002 mais tant pis.
Merci de votre aide.
Jean