Bonjour,
Je démarre sur VBA et j'éprouve quelques (nombreuses) difficultés. Sur mon fichier Excel j'ai créé un bouton associé avec une macro pour insérer une image, cela fonctionne plutôt bien, ma problématique c'est la source de l'image, pour faire mes essais j'ai pris le chemin sur mon poste mais pour les autres fichiers le chemin sera toujours différent. Du coup je voulais utiliser la cible de mon fichier excel pour retrouver mon fichier, je placerai mon image avec le fichier Excel à chaque fois.
Sub CODE_BARRE()
Range("Q1:AA8").Select
ActiveSheet.Pictures.Insert( _
"C:\Users\christopher.lopez\Desktop\CODE LA CHATAIGNERAIE.jpg").Select
Selection.ShapeRange.ScaleHeight 2.2, msoFalse, msoScaleFromTopLeft
Selection.ShapeRange.IncrementLeft 30
Selection.ShapeRange.IncrementTop 95
Range("Q1:AA8").Select
End Sub
D'avance merci de votre réponse.
Je démarre sur VBA et j'éprouve quelques (nombreuses) difficultés. Sur mon fichier Excel j'ai créé un bouton associé avec une macro pour insérer une image, cela fonctionne plutôt bien, ma problématique c'est la source de l'image, pour faire mes essais j'ai pris le chemin sur mon poste mais pour les autres fichiers le chemin sera toujours différent. Du coup je voulais utiliser la cible de mon fichier excel pour retrouver mon fichier, je placerai mon image avec le fichier Excel à chaque fois.
Sub CODE_BARRE()
Range("Q1:AA8").Select
ActiveSheet.Pictures.Insert( _
"C:\Users\christopher.lopez\Desktop\CODE LA CHATAIGNERAIE.jpg").Select
Selection.ShapeRange.ScaleHeight 2.2, msoFalse, msoScaleFromTopLeft
Selection.ShapeRange.IncrementLeft 30
Selection.ShapeRange.IncrementTop 95
Range("Q1:AA8").Select
End Sub
D'avance merci de votre réponse.