Microsoft 365 Insérer Image selon Choix

patricktoulon

XLDnaute Barbatruc

• 15 Octobre 2023

• #2

ben en fait il te faut copier les image et le econvertir soit en fichier image soit en ipicturedisp
pour le coup on va utilise ma méthode 1 image en xlbitmap en clipboard
on va donc utiliser les api

 

Pièces jointes

• Doctor.xlsm

  641.4 KB · Affichages: 8

Vote positif 0 Vote négatif

Electron24

XLDnaute Occasionnel

• 15 Octobre 2023

• #3

Bonsoir patricktoulon

Merci pour ton aide mais........
J'ai une erreur sur ton classeur dont voici le contre rendu.

 

Pièces jointes

• Erreur.jpg

  243.8 KB · Affichages: 11

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 15 Octobre 2023

• #4

je vois pas pourquoi ca plante ici
au cas ou change la declaration

VB:

Declare PtrSafe Function CopyImage Lib "user32" Alias "CopyImage" (ByVal handle As LongPtr, ByVal un1 As Long, ByVal n1 As Long, ByVal n2 As Long, ByVal un2 As Long) As LongPtr

chez moi ça fonctionne

 

Dernière édition: 15 Octobre 2023

Vote positif 0 Vote négatif

Electron24

XLDnaute Occasionnel

• 15 Octobre 2023

• #5

Cela ne change pas la donne, j'ai toujours la meme erreur.
J'approndis cela après le match Angleterre Fidjy

 

Vote positif 0 Vote négatif

Electron24

XLDnaute Occasionnel

• 15 Octobre 2023

• #6

Après plus d'attention, la partie "Alias CopyImage" ne reste pas dans la déclaration, elle est systématiquement effacée
Faut il cocher une référence particulière ?

 

Dernière édition: 15 Octobre 2023

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 15 Octobre 2023

• #7

Electron24 à dit:

Après plus d'attention, la partie "Alias CopyImage" ne reste pas dans la déclaration, elle est systématiquement effacée
Faut il cocher une référence particulière ?

Cliquez pour agrandir...

c'est pas grave c'est prévu , c'est juste pour voir si c'est pris en compte car l'alias ne peut pas être identique a l'original il est donc supprimé automatiquement
donc l'api est bonne
non il n'y a pas de référence particulière à cocher
je vais essayer de mettre un test supplémentaire

 

Vote positif 0 Vote négatif

Electron24

XLDnaute Occasionnel

• 15 Octobre 2023

• #8

OK merci

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 15 Octobre 2023

• #9

bon en fait l'erreur etait qu'il y avait une image qui etait un peut plus haute que la cellule ou elle devait être
ce qui fait que obj etait nothing donc nothing.copypicture ca risquait pas d'y avoir des datas d'image dans le clipboard du coup j'ai tout recaler j'ai fait pour les 5 saisons peut aller jusqu'à 22 épisodes
et pour couronner le tout j'ai supprimer ton code du selectchange dans la feuille j'ai tout refait facon patrick
c'est plus simple et plus clair d'un coup

PS: il n'y a pas les titres et la durée dans la saisons 2

cependant
j’espère que tu ne compte pas te faire ta base de donnée vidéo de cette manière
ton fichier risque de prendre du poids inutilement
il serait préférable de te mettre tes images dans un dossier images dans le dossier saison de la serie
je dis ça moi je dis rien hein

voila en l’état ça fonctionne

 

Pièces jointes

• Doctor V patricktoulon.xlsm

  641.6 KB · Affichages: 10

Vote positif 0 Vote négatif

Electron24

XLDnaute Occasionnel

• 15 Octobre 2023

• #10

Je regarde cela demain et te remercie grandement. J'espère que je ne t'ai pas fait rater la première mi-temps du match bonne soirée

 

Vote positif 0 Vote négatif

Electron24

XLDnaute Occasionnel

• 16 Octobre 2023

• #11

Bonjour patricktoulon
J'ai toujours la même erreur, je ne comprends pas.
Je cherche de mon coté de ou cela peut venir étant donné que chez toi cela fonctionne.
J'ai Microsoft 365 et windows 10 pro 64 bits
ci joint une capture d'écran.
Ce qui est étrange, c'est que lorsque je supprime "CopyImage" et que je le réinscrit tout en minuscule, excel me le laisse en minuscule.
Bonne journée

 

Pièces jointes

• Screenshot_3.jpg

  268.2 KB · Affichages: 10

Dernière édition: 16 Octobre 2023

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 16 Octobre 2023

• #12

re
franchement je sais pas
'erreur de compilation" je pourrais même pas te dire pourquoi tu a cette erreur
bon ben on va passer par un autre moyen alors
je reviens

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 16 Octobre 2023

• #13

re
voici avec une autre méthode

 

Pièces jointes

• Doctor V 2 patricktoulon.xlsm

  641.7 KB · Affichages: 16

Vote positif 0 Vote négatif

Solution

patricktoulon

XLDnaute Barbatruc

• 16 Octobre 2023

• #14

re
Alors ça marche? ou pas

 

Vote positif 0 Vote négatif

Electron24

XLDnaute Occasionnel

• 16 Octobre 2023

• #15

YES formidable je viens de l'essayer j'avais du m'absenter.
Un super grand merci à toi
Bonne après midi

 

Vote positif 0 Vote négatif