C'est dans la photo :Merci pour ce retour mais il faudrait que ce soit dans la photo.
Cherchez cet icone dans les barres de menu :Qu'est ce que la fonction Photo ?
Bonjour sylvanuCherchez cet icone dans les barres de menu : Regarde la pièce jointe 1161418
Si vous ne l'avez pas vous pouvez la mettre en Accès rapide :
Regarde la pièce jointe 1161417
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'Excelwww.linkedin.com
Ensuite c'est simple :
Regarde la pièce jointe 1161420
Il faut mettre le nom de la feuille avant la plage, comme ici Photo! si on veut mettre l'image sur une autre feuille.
Bonjour Patrickre
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
Elle n'est plus à défendre, elle est bien établie.j'ai une réputation d'usine à gaz à défendre
Bonjour sylvanuC'est dans la photo :
Regarde la pièce jointe 1161415
Vous avez plein d'images à générer ?mais si je l'enregistre en macro pour automatiser, ça ne fonctionne plus
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
Selection.Formula = "=$D$23"
pour alimenter ta forme. Range("D23:G23").Select
ActiveSheet.Shapes.AddShape(msoShapeTear, 686.25, 327.75, 138, 135).Select
Selection.ShapeRange.ShapeStyle = msoShapeStylePreset12
Selection.Formula = "=$D$23"