Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 J'en ai une très bonne lol

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous,

Mes élucubrations de la nuit m'ont amené vers une folie certainement pas réalisable
Mais dont j'aurais bien besoin... Alors soyons fous, je soumets à nos magiciens

Dans ma feuille j'ai mis une photo :

Je voudrais que la ou est écrit "cel.Excel", que ce soit la valeur des cellules qui soient mentionnées
C'est à dire :
remplace "cel.Excel"à droite de année par 2022 (valeur de "E8")
remplace "cel.Excel"à droite de au taux par 78.00% (valeur de "E10")

En modifiant la photo ou en la recréant ?
J'ai pas trouvé comment faire
Je sais c'est foldingue lol
Mais qui sait avec nos Magiciens ...
En cas, je joins un petit fichier test.

Je vous remercie pour vos éventuels retours...
 

Pièces jointes

  • test.xlsm
    17.9 KB · Affichages: 9
Dernière édition:
Trier par date Trier par votes

sylvanu

XLDnaute Barbatruc
Supporter XLD
Qu'est ce que la fonction Photo ?
Cliquez pour agrandir...
Cherchez cet icone dans les barres de menu :
Si vous ne l'avez pas vous pouvez la mettre en Accès rapide :

L'appareil photo d'Excel (ou comment prendre des Excelfies)

Bonjour à tous, L'outil Appareil Photo est un petit bijou caché car il n'est pas configuré pour apparaître par défaut sur l'interface principale, mais la bonne nouvelle c'est qu'en quelques clics vous allez pouvoir l'activer en bénéficier ! Avant toute chose à quoi sert-il? L'appareil photo d'Excel
www.linkedin.com

Ensuite c'est simple :

Il faut mettre le nom de la feuille avant la plage, comme ici Photo! si on veut mettre l'image sur une autre feuille.
 
Dernière édition:
Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc
re
et oui mais là on entre dans la reconnaissance de texte adobd fine reader ( ca me rajeuni pas)ou superieur
je suppose que l'on peut le piloter par macro mais ça reste du truc compliqué

je me demande pourquoi tu travaille comme ça ( a chercher les complication qui vont faire de ton fichier un enfer à maintenir )
ce texte là ne peut pas venir d'ailleurs ?en texte
comme ca tu inscrit ce que tu veux dans le texte et au pire!!!! si tu y tiens on copy en image et efface la cell après
 
Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour sylvanu
Merci pour ton retour.
Je vais voir ça ce soir...
 
Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour Patrick
Merci d'être là..
Tu sais comment je suis "pkoi faire simple qd on peut faire compliqué" ?" lol
Et puis j'ai une réputation d'usine à gaz à défendre lol
Je vais voir tout ça ce soir...
 
Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
sylvanu à dit:
C'est dans la photo :
Regarde la pièce jointe 1161415
Cliquez pour agrandir...
Bonjour sylvanu , Bonjour Patrick , Bonjour WTF, le Forum
Hier au soir, j'ai continué mes élucubrations.....

Malheureusement avec les explications du #post 6 de Sylvanu, je n'ai pas "tout à fait" réussi à faire un code.
Si je fais la manipulation, ça fonctionne... mais si je l'enregistre en macro pour automatiser, ça ne fonctionne plus et je n'arrive pas à modifier le code pour que ça fonctionne
En cas de solution, je joins le fichier test.

En cherchant sur le net, j'ai trouvé sur notre Forum un code qui fonctionne :

XL 2013 - Tips Appareil Photo (Image Liée avec cellule)

Bonjour le fil, le forum, Je me permets de partager une petite "astuce" que j'ai trouvé en cherchant à résoudre un problème lié à l'utilisation de l'appareil photo. En effet, lors de l'utilisation de plusieurs images liées (tableaux en particulier) un problème récurrent de lenteur se fait...
excel-downloads.com
Merci à son auteur
Apparemment, je n'étais pas le seul intéressé lol
Je joins également le fichier test sur lequel il me reste un petit souci :
j'aurais juste besoin de la décaler un peu à droite pour quelle soit parfaitement dans le cadre

Je vous remercie pour les éventuels retours...
 

Pièces jointes

  • test photo Sylvanu.xlsm
    306.6 KB · Affichages: 1
  • test Tips Appareil photo2.xlsm
    21 KB · Affichages: 1
Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour sylvanu
Merci d'être encore là ...
Si je sélectionne les cellules à mettre en photo, ça fonctionne.
Mais si j'enregistre l'action avec l'enregistreur pour faire le code, au clic sur le bouton ça ne marche plus
Dans le fichier joint, j'ai tenté ces codes :
VB: 
Sub Macro1()
    Range("C9:D15").Select
    ActiveSheet.Shapes.Copy
    [H9].Select
    ActiveSheet.Paste
'    ActiveSheet.Shapes.AddShape(, 331.5, 133.5, 72#, 72#).Select
'    ActiveSheet.Shapes.Range(Array("Picture 2")).Select
    'Application.CutCopyMode = False
End Sub
Sub Macro2()
    Range("C13").Select
    Selection.Copy
    Range("C26").Select
    ActiveSheet.Paste
End Sub

Sub Macro3()

    Range("C9:D15").Select
    Selection.Copy
    ActiveSheet.Shapes.AddShape(, 327.75, 127.5, 72#, 72#).Select
    ActiveSheet.Shapes.Range(Array("Picture 3")).Select
    Application.CutCopyMode = False
End Sub
Qui ne fonctionnent pas et je n'arrive pas à les modifier ...
 

Pièces jointes

  • test photo Sylvanu.xlsm
    306.6 KB · Affichages: 0
Vote positif 0 Vote négatif

Deadpool_CC

XLDnaute Accro
Bonjour,

quand t'a inséré ta shape et que tu l'a selectionnée : fais un simple Selection.Formula = "=$D$23" pour alimenter ta forme.

VB: 
    Range("D23:G23").Select
    ActiveSheet.Shapes.AddShape(msoShapeTear, 686.25, 327.75, 138, 135).Select
    Selection.ShapeRange.ShapeStyle = msoShapeStylePreset12
    Selection.Formula = "=$D$23"

 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…