Contenu récent par Cédric06400

  1. Cédric06400

    Microsoft 365 Application.GetOpenFilename et multiSelect

    Hello merci de ton retour, désolé j'ai que quelques minutes le matin pour coder avant de partir travailler. Je vais m'y pencher ce week-end, je reviens vers toi
  2. Cédric06400

    Microsoft 365 Application.GetOpenFilename et multiSelect

    Hello, Il n'est pas rare que j'importe 50 photos en même temps, donc répondre 50 fois à la même question est inutile. Ce qui rend l'opération inutile dans mon cas. Ce programme vise à intégrer la fonction "insérer un ou des image" dans un userform qui me permet de trier, déplacer et placer...
  3. Cédric06400

    Microsoft 365 Application.GetOpenFilename et multiSelect

    Hello je me permet de revenir vers toi, Pardon mais j'ai 2 soucis : Le 1ere est que la boucle sur la mise en forme de chaque photo est toujours présente, alors qu'on souhaite formater l'ensemble de la sélection sur une seule réponse. Ensuite une fois la (les) photo(s) insérée(s) la macro...
  4. Cédric06400

    Microsoft 365 Application.GetOpenFilename et multiSelect

    Hello, Pardon mais j'ai 2 soucis : Le 1ere est que la boucle sur la mise en forme de chaque photo est toujours présente, alors qu'on souhaite formater l'ensemble de la sélection sur une seule réponse. Ensuite une fois la (les) photo(s) insérée(s) la macro ne garde pas la sélection aussi les...
  5. Cédric06400

    Microsoft 365 Application.GetOpenFilename et multiSelect

    Hello, Merci beaucoup pour le code qui fonctionne parfaitement. J'ai cependant une amélioration à te demander. Avec ce code tu boucles sur chaque photo pour demander le type de Mise en forme, ce qui peut être fastidieux si tu as beaucoup de photos. Ce que j'applique manuellement depuis des...
  6. Cédric06400

    Microsoft 365 Application.GetOpenFilename et multiSelect

    Hello, Je viens de tester ta solution Lors de l'ouverture de la boite de dialogue je ne peux sélectionner qu'une seule photo Merci de ton retour Cédric
  7. Cédric06400

    Microsoft 365 Application.GetOpenFilename et multiSelect

    Hello merci, je testerais ta solution ce soir. J'avais une solution avec une boucle, mais ça lagué. Je vais tester Bien à toi
  8. Cédric06400

    Microsoft 365 Application.GetOpenFilename et multiSelect

    Bonjour, j'ai créé un code pour importer une photo depuis un UF vers ma feuille active avec mise en forme. Maintenant j'aimerai modifier ce code pour que pouvoir sélectionner plusieurs photos en meme temps. Tout en gardant la section de toutes les photos pour une mise en forme glogale. Sub...
  9. Cédric06400

    Microsoft 365 Déplacement Shape

    Hello, Merci pour ton retour rapide, c'est parfait. ;)
  10. Cédric06400

    Microsoft 365 Déplacement Shape

    Bonjour à tous, J'ai créer un macro qui permet de déplacer une image sélectionnée dans une feuille de calculs. J'ai un MsgBox qui s'affiche si avant de lancer la macro aucune image est sélectionnée. Ca tourne très bien Sub DéplacImage1() Dim Img As Excel.Picture Dim Cel As Integer Cel =...
  11. Cédric06400

    Microsoft 365 Lien hyper tetxe email

    Merci erreur de syntaxe encore et encore, moi je fais tourner le ventilateur ;)
  12. Cédric06400

    Microsoft 365 Lien hyper tetxe email

    Hello Merci de vos promptes réponses, je dois être un quiche. Le mail part bien mais à la reception ce n'est plus un lien hypertexte Voici mon code avec la modif que je suppose etre faite ;) Sub Email_avec_lien() 'Test mail avec lien hype texte Dim xOtl As Object Dim xOtlMail As Object Dim...
  13. Cédric06400

    Microsoft 365 Lien hyper tetxe email

    Bonjour à vous tous, J'ai besoin de votre science. J'ai créer un email automatique en html avec un lien hypertexte qui renvoi sur un lien de paiement CB Ce lien change et il est présent dans une cellule. xStrBody = "Hello" & "<br>" _ & "<a href=" & Lien & ">" &...
  14. Cédric06400

    XL 2021 Revenir sur Excel

    Merciiiiii
Retour