Se connecter avec
S'enregistrer | Connectez-vous

porbleme avec la propriété weigh

Dernière réponse : dans Programmation

Bonjour il me fait une erreura la ligne ou Weight est affiché
  1. With graph.SeriesCollection(3).Border
  2. .Weight = xlHairline
  3. .LineStyle = xlNone


voila le début de mon code alors je ne comprends pas pouruoi cela ne fonctionne pas (ca fonctionnait avant) j'ai juste changé Feuil1 par Feuil2

  1. xls.Workbooks("e_analyse_croisée.xls").Activate
  2. xls.ActiveWorkbook.Worksheets("Feuil2").Activate
  3.  
  4. Set feuille = xls.ActiveSheet
  5. ' xls.ActiveSheet.Range("B53:J54").Select
  6. feuille.Range(feuille.Cells(53, 2), feuille.Cells(54, colonne)).Select
  7.  
  8. Set graph = wbfile.Charts.Add
  9.  
  10. 'récupération des données avec type de graphique demandé
  11. graph.SeriesCollection(1).ChartType = xlColumnStacked
  12. graph.SeriesCollection.NewSeries
  13. graph.SeriesCollection(1).XValues = "=Feuil1!R3C2:R4C" & colonne
  14. graph.SeriesCollection(1).name = "Préjudices en France"
  15. graph.SeriesCollection(2).XValues = "=Feuil1!R3C2:R4C" & colonne
  16. graph.SeriesCollection(2).name = "Préjudices à l'étranger"
  17. graph.SeriesCollection(3).XValues = "=Feuil1!R3C2:R4C" & colonne
  18. graph.SeriesCollection(3).Values = "=Feuil1!R48C2:R48C" & colonne
  19. graph.SeriesCollection(3).Select
  20. graph.SeriesCollection(3).ChartType = xlXYScatter
  21. With graph.SeriesCollection(3).Border
  22. .Weight = xlHairline
  23. .LineStyle = xlNone

Autres pages sur : porbleme propriete weigh

Lassé par la pub ? Créez un compte
Expert Programmation

Bonjour,

Peut-on avoir un aperçu de ton code (*) ? Celui de Darkspoilt est assez brouillon et le fonctionnement d'Excel assez désappointant.




(*) bien relire le règlement
Lassé par la pub ? Créez un compte