Bonjour,
Premier post pour moi autodidacte...
Voilà un bout de "code":
Alors voilà, je sèche totalement car voyez-vous en pas à pas dans le débogueur pas de soucis j'ai mon image enregistré sur le disque ...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Valeur = Range("H2").Value Dim S As Range Set S = Sheets("Classement Championnat").Range("A1", "G" & Valeur) S.CopyPicture Appearance:=xlScreen, Format:=xlBitmap Application.ScreenUpdating = True Workbooks.Add With ActiveSheet.ChartObjects.Add(0, 0, S.Width, S.Height).Chart .Paste .Export "C:\***.png", "PNG" End With ActiveWorkbook.Close False
Mais lors de l'exécution du bouton affecté à cette macro l'export copie une image vide (toujours enregistré sur le disque)
Pourquoi dieu cela fonctionne-t-il en pas à pas et pas après Grrr!
Help please.
Merci par avance !
Partager