copier une image d'un feuille excel dans un userform
#1
Débutant XLPages

Inscription: 12/11/2012
De Belgium

Messages: 8

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 12-11-2012 20h47
Bonjour,

Voici mon probleme.
J'ai creer un fichier dans le quelle un utilisateur peut introduire une image a l'aide d'un userform.
L'image ce met dans la prochaine cellule vide de la colonne B.
INFO: l'image et renommer "Picture+$nr de la cellue$".
Y a t'il une façon de copier l'image dans un userform quand la cellule a coté de cellue B (ou il y une image) et selectioner?
Je vous remercie d'avance.
Mes salutation


PS: desoler pour mon français un peux limiter car je suis flamand.
Hors Ligne
Rapport   Haut 

Re: copier une image d'un feuille excel dans un userform
#2
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 12-11-2012 22h57
Bonsoir debeckyv, bienvenue sur XLpages

Je pense qu'un fichier exemple simple (et sans données confidentielles) est nécessaire pour qu'on puisse t'aider. Pour joindre un fichier (80 Ko maximum), voir cette FAQ.

Cordialement,

Didier_mDF
Image redimensionnée
Le Webmaster

La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
Hors Ligne
Rapport   Haut 

Re: copier une image d'un feuille excel dans un userform
#3
Débutant XLPages

Inscription: 12/11/2012
De Belgium

Messages: 8

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 13-11-2012 20h54
Bonsoir,

Avant toute hose mercie de votre réponse rapide.
Cela montre qu'il y a encore des gens pres a aider.

J'essaye de telecharger le fichier en question mais reçoit un message "protector detecting attacking actions"?

Y a t'il un autre moyen d'envoyer le fichier?

Mes salutations

Hors Ligne
Rapport   Haut 

Re: copier une image d'un feuille excel dans un userform
#4
Débutant XLPages

Inscription: 12/11/2012
De Belgium

Messages: 8

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 13-11-2012 21h11
Eureka,

Je viens de trouver l'erreur.
Voici donc le fichier en questions.

Encore merci du coup de main
Mes salutations
Pièce jointe:
zip test1.zip   [ Taille: 57.05 Ko - Téléchargements: 1786 ]
Hors Ligne
Rapport   Haut 

Re: copier une image d'un feuille excel dans un userform
#5
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 14-11-2012 21h53
Bonsoir debeckyv, le Forum,

Oui, comme précisé dans la FAQ joindre un fichier à votre message : « ... pour des raisons de sécurité du site, le nom de votre fichier ne doit contenir qu'un seul caractère "." (point) réservé pour l'extension du fichier (.zip, .xls, etc...)... »

Cela dit, tu trouveras ci-joint une interprétation de ton fichier pour tenter de répondre à ta demande (dans cet exemple, placer la sélection sur une cellule quelconque de la ligne 4 et cliquer sur le bouton "Show Info").

J'ai fait usage d'un module de code (« modPastePicture ») issu des travaux du très grand Stephen Bullen, modifié et simplifié par le non moins grand et très regretté Thierry Pourtier (Ti).

Avec ce module de code repris tel quel, j'ai simplement ajouté le code suivant à ton userform « frmShowInfo » :
Private Sub UserForm_Initialize()
Dim Img As Shape
    'Insertion de l'image
    On Error Resume Next
    Set Img = Sheets("Data").Shapes("Picture$B$" & CStr(ActiveCell.Row))
    On Error GoTo 0
    If Not Img Is Nothing Then
        Img.CopyPicture xlScreen, xlPicture
        Set imgPic.Picture = PastePicture()
    End If
End Sub

En espérant t'avoir aidé...

Cordialement,
Pièce jointe:
zip mDF_NewPakagingMaterials_1_1.zip   [ Taille: 79.47 Ko - Téléchargements: 2053 ]

Didier_mDF
Image redimensionnée
Le Webmaster

La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
Hors Ligne
Rapport   Haut 

Re: copier une image d'un feuille excel dans un userform
#6
Débutant XLPages

Inscription: 12/11/2012
De Belgium

Messages: 8

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 15-11-2012 22h32

Bonsoir,

Un tous grand merci de votre coup de mains.

Pouvez-vous me conseiller un (des) livre(s) convenable pour apprendre de meilleur manier le VBA?

Toute fois, j'ai de quoi continuer mon aventure VBA.

Encore merci et bonne continuations dans ce site plus que satisfaisant!!!!!
Mes salutations

PS: a nous navré de mon français un peu bric a brac (nederlands is mijn moedertaal).
Hors Ligne
Rapport   Haut 

Re: copier une image d'un feuille excel dans un userform
#7
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 15-11-2012 23h14
Bonsoir debeckyv,

Content de t'avoir aidé.

Concernant les livres traitant de l'apprentissage VBA, je ne suis pas très au fait de ce sujet. Comme je l'ai écrit il y a quelques temps à un autre visiteur, je te conseille simplement de faire une recherche sur le net avant d'acheter un bouquin, juste histoire de voir ce qu'en pensent les lecteurs précédents et pour savoir si l'auteur est connu dans le monde Excel ou non (il y a des valeurs sûres dans ce domaine, tels que : John Walkenbach par exemple, moi j'ai toujours été fan !).

Cordialement,

Didier_mDF
Image redimensionnée
Le Webmaster

La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
Hors Ligne
Rapport   Haut 

Re: copier une image d'un feuille excel dans un userform
#8
Débutant XLPages

Inscription: 12/11/2012
De Belgium

Messages: 8

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 16-11-2012 18h11
Bonsoir,

Merci des conseille donner et j'en prendrai surement compte.
J'ai juste encore une petite question....j'ai voulu imprimer mon userform et vois que l'image ne s'imprime pas avec le reste des informations?

En regardant sur le net certaine persoone dise que la fonction Me.PrintForm devrais tous faire apparaitre mais dans ce cas si?

Any idea....?

Merci d'avance.
Mes salutations

PS: je vais dés ce soir regarder pour des livre de "John Walkenbach".


Hors Ligne
Rapport   Haut 

Re: copier une image d'un feuille excel dans un userform
#9
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 16-11-2012 22h50
Bonsoir debeckyv, le Forum,

Citation :
debeckyv a écrit :
J'ai juste encore une petite question....j'ai voulu imprimer mon userform et vois que l'image ne s'imprime pas avec le reste des informations?

En regardant sur le net certaine persoone dise que la fonction Me.PrintForm devrais tous faire apparaitre mais dans ce cas si?

Any idea....?

Je viens de tester... oui, tu as tout à fait raison debeckyv, dans ce cas de figure la méthode PrintForm n'imprime visiblement pas l'image ! Je n'utilise jamais cette méthode aussi, je n'avais jamais remarqué ce dysfonctionnement auparavant

Navré, mais après quelques tests, je ne trouve aucune solution de contournement fiable.

Si quelqu'un trouve une solution, je suis également preneur...

Cordialement,

Didier_mDF
Image redimensionnée
Le Webmaster

La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
Hors Ligne
Rapport   Haut 

Re: copier une image d'un feuille excel dans un userform
#10
Débutant XLPages

Inscription: 12/11/2012
De Belgium

Messages: 8

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 21-11-2012 18h33
Bonjour,

Tous d'abord merci de mettre autant de temps a m'aider. J'apprécie énormément.
Je me pose une question, n'y a t'il pas moyen de faire une sorte de print screen (uniquement le USF) puis de l'importer dans un document word + print?

PS: le programme tourne a merveille!

Mes salutations
Hors Ligne
Rapport   Haut 


Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   1 Utilisateur(s) anonymes