Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Désolé, vraiment désolé,
j'allais faire la correction après,
je m'initialise depuis peu et j'essaye d'y aller progressivement.
j'aurai du rectifié avant d'envoyer le fichier j'ai voulu mettre un bouton supprimer avant.
Bonjour et merci a tous.
Vous m'avez bien aidé et je vous en remercie encore,
je vous joint mon fichier( Visionneuse IMAGE) avec le code qui fonctionne et redimensionne les images. C'est super.
Comme annoncé, je suis novice et je ne sais pas comment procéder pour supprimer directement un fichier...
Bonjour et merci encore.
novice je n'arrive pas vraiment à suivre vos commentaires. Desolé
l'image est bien redimensionnée mais
Private Sub lstFichiers_Click()
Dim Img
Dim style
WebBrowser1.Navigate "about:blank"
lblNomActuel = txtChemin & "" & lstFichiers.List(lstFichiers.ListIndex)...
Bonjour,
je voudrai pouvoir réduire l'image insérer en fonction de la taille du webbrowse.
Private Sub lstImages_Click()
WebBrowser1.Navigate (txtChemin & "" & lstImages.List(lstImages.ListIndex))
lblNomActuel = txtChemin & "\" & lstImages.List(lstImages.ListIndex)...
bonjour,
Afin d’éviter d'entrer le chemin du dossier pour afficher les fichiers
Quelle VBA pour un userform avec la liste déroulante pour le CHEMIN
Merci d'avance
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.