Bonjour,
j'ai un souci avec une macro qui fonctionne bien sous 2003 mais qui me donne une erreur sous 2010.
Cette macro prend la partie ou il y a un graphe sur une page et la place dans un dossier sous la forme d'une image.
la macro originale est :
]
et a priori mon erreur est a cette ligne la :
Pouvez vous m'aider svp ?
Merci d'avance
Cordialement
j'ai un souci avec une macro qui fonctionne bien sous 2003 mais qui me donne une erreur sous 2010.
Cette macro prend la partie ou il y a un graphe sur une page et la place dans un dossier sous la forme d'une image.
la macro originale est :
]
Code:
Sub test()
Dim Plage As Range
Set Plage = Application.InputBox(Prompt:="Sélectionner votre zone: (Ex. A1:B10) ", _
Title:="Sélection de zone ", Default:="$I$1:$P$46", Type:=8)
Application.ScreenUpdating = False
Workbooks.Add
Plage.CopyPicture
ActiveSheet.Paste
With ActiveSheet.ChartObjects.Add(0, 0, _
Selection.Width, Selection.Height).Chart
.Paste
.Export "C:\Documents and Settings\m.morot\Bureau\site\graphreleve.JPG", "JPG"
End With
ActiveWorkbook.Close False
End Subet a priori mon erreur est a cette ligne la :
Code:
With ActiveSheet.ChartObjects.Add(0, 0, _
Selection.Width, Selection.Height).ChartPouvez vous m'aider svp ?
Merci d'avance
Cordialement