Application.GetOpenFilename et image en grand

bonjour

voila je souhaite a l'ouverture du dossier que l 'affichage soit en grand icone

Private Sub Cmdmodifc4_Click()
Set ws3 = Sheets("Version")
dirpho = ws3.Range("f2")
 Dossier = dirpho
    ChDrive Dossier
    ChDir Dossier
    Fichier = Application.GetOpenFilename("Fichiers jpg,*.jpg")

    If Fichier = False Then Exit Sub '    ....

End Sub

merci d'avance

Bonsoir,

ChDrive définit le lecteur courant, ton utilisation en est inadéquate.

Et pour ChDir, tu ferais bien d'indiquer le chemin du dossier...

Et à ce stade de ton code, je ne vois rien à dimensionner.

Cordialement.

MFerrand a écrit :

à ce stade de ton code, je ne vois rien à dimensionner

mais si, justement : c'est le code qu'il faut recalibrer !

Bonjour

C est exact mon code est a revoir

Mon but est d ouvrir l explorer pour choisir une image

Pour le moment j ai le nom des images , je souhaite avoir le visuel cad les vignette s en grand

Bonjour

Il n'est pas sûr qu'on puisse modifier l'affichage dans la boîte de dialogue d'ouverture Application.GetOpenFilename qui ne semble pas avoir ce paramètre.

Par défaut c'est le dernier choix qui est pris en compte

J'ai trouvé cette possibilité en pseudo dialogue msoFileDialogFilePicker qui possède la propriété InitialView mais elle semble ne pas fonctionner (plusieurs signalements sur le net à ce propos)...

A noter qu'avec un pseudo dialogue on récupère le fichier choisi et après on l'utilise mais tu ne peux ouvrir dans Excel un fichier jpg...

Bonjourn Salut Chris !

Tu peux intervenir dans la boîte de dialogue pour modifier l'affichage, c'est déjà ça !

Comme l'indique Chris, on ne dispose pas de paramétrage de vue avec GetOpenFileName, et avecFileDialog.InitialView j'ai beau m'escrimer à la modifier, j'ai toujours la même ! ce qui rejoint ses constats.

Même chose avec Dialogs(xlDialogOpen)...

Ceci étant, dans la mesure où tu interviens manuellement pour faire ta sélection, tu peux simultanément ajuster la vue à tes voeux ou ouvrir le volet de visualisation...

Rechercher des sujets similaires à "application getopenfilename image grand"