Discussion :

[Chris 81]

Bonjour a tous les Developpezcomiens,

Mes recherches ne sont pas fructueuses a la fois dans le forum VBA (pas de reponse) et a la fois sur "Merci Google"
Je cherche s'il existe une possibilite pour le "FileDialogFilePicker" d'apparaitre avec les "images" des fichiers selectionnes...

Et si oui, comment ?

C'est le cas dans Outlook...

Par avance

[helas]

msoFileDialogViewPreview permet l'aperçu des fichiers
Fichier récupère le fichier sélectionné

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Dim fd As FileDialog
 Set fd = FileDialog(msoFileDialogFilePicker)
 With fd
  .InitialView = msoFileDialogViewPreview
  .Filters.Add "Images", "*.jpeg;*.gif"
  .Title = "Les images"
  If .Show Then
   For Each v In .SelectedItems
    Fichier = v
   Next v
  End If
 End With

[Chris 81]

a la fois pour le mail m'indiquant que la discussion a ete deplacee et pour la solution proposee qui marche parfaitement

Je ne sais pas si je dois ouvrir une nouvelle discussion ou pas ...
J'ai un petit soucis concernant la selection en multi-selection ...

Le 1er fichier selectionne devient le dernier enregistrement dans la base et vis versa le dernier devient le 1er

Lorsque je selectionne le dernier fichier en premier et je termine par le 1er tout s'enregistre dans l'ordre 1,2,...8

Je sais bien que les 1er seront les derniers mais tout de meme...

Vous etes vraiment des PRO et j'ai plaisir a utiliser votre site pour apprendre tous les jours un peu plus...