Boujour
Je voudrais utilise ce code trouver sur ce forum
Mais j'ai une erreur 1004 a cette ligne
Savez vous d'ou sa vient Mercie
Je voudrais utilise ce code trouver sur ce forum
Application.ScreenUpdating = False
Sheets('Tableau').Range('A1:K63').CopyPicture
Sheets('Tableau').Paste
With Sheets('Tableau').ChartObjects.Add(0, 0, Sheets('Tableau').Range('K64').Left, _
Sheets('Tableau').Range('K64').Top).Chart
.Paste
.Export ThisWorkbook.Path & '\\monImage.jpg', 'JPG'
End With
With Sheets('Tableau')
.ChartObjects(Sheets('Tableau').ChartObjects.Count).Delete
.Shapes(Sheets('Tableau').Shapes.Count).Delete
End With
Application.ScreenUpdating = True
Mais j'ai une erreur 1004 a cette ligne
.Export ThisWorkbook.Path & '\\monImage.jpg', 'JPG'
Savez vous d'ou sa vient Mercie