.Charts.add qui fait pas de Charts...

borntobealive Messages postés 167 Statut Membre -  
borntobealive Messages postés 167 Statut Membre -
Bonjour,

j'ai créer sous windows une application ( c'est un grosse macro dans un excel ) de comptabilité perso. Je suis aussi sur mac et j'aimerais pouvoir l'utiliser mais je rencontre des petits soucis de compatibilité. J'ai pu en résoudre un certain nombre seul mais celui là je bloque completement.

Mon appli créée des graphes et les supprime à la fermeture comme ça le fichier prend moins de place.

un sub est donc charger de créer les graphes :

Sub GrapheCamenbert(Categorie As String)

'''''''''''''''''''''''''''''''''''''''''''''''''''''
'                                                   '
'           creer le camenbert et sa feuille        '
'                                                   '
'''''''''''''''''''''''''''''''''''''''''''''''''''''

'nouveau graphe, nouvelle feuille
Set Dec.mg = Dec.Wk_ComptaMensuel.Charts.Add

With Dec.mg
    .Location where:=xlLocationAsNewSheet, name:=Categorie
    .ChartType = xl3DPie
End With
Dec.Wk_ComptaMensuel.Sheets(Categorie).Tab.ColorIndex = 3

'supression des series absurdes
Do Until Dec.mg.SeriesCollection.Count = 0
    Dec.mg.SeriesCollection(1).Delete
Loop

'ajout du code
If Categorie = "Categories" Then
    Application.EnableEvents = False
    Call Action.AjouterCode("Categorie", Dec.Wk_ComptaMensuel.Sheets(Categorie).name)
    Application.EnableEvents = True
Else
    Application.EnableEvents = False
    Call Action.AjouterCode("SousCategorie", Dec.Wk_ComptaMensuel.Sheets(Categorie).name)
    Application.EnableEvents = True
End If

Set Dec.mg = Dec.mg
End Sub


dec.mg 
a été déclarer comme une variable de portée
Public 
de type
Charts
.

Lors de l'execution le code s'arrète pour un incompatibilité de type à ligne 10 (oups). J'ai essayer de dissossier les deux :
Dec.Wk_ComptaMensuel.Charts.Add
Dec.mg = ActiveChart 


Mais rien ne se passe je pense (en fait j'en suis sûr) qu'il ne crée pas le graphique...

Si quelqu'un a une idée il m'éviterai de devoir me rebooter en PC à chaque fois que je veux faire ma compta...

merci d'avance
A voir également:

2 réponses

PlacageGranby Messages postés 402 Statut Membre 26
 
Bonjour,

Dec.mg

mg est une fonction que tu as défini pour ta variable Dec ?
0
borntobealive Messages postés 167 Statut Membre 7
 
Dec est un module dans lequel je déclare plein de variable public que je réutilise tout le temps (du coup j'écris que Dec. et hop avec un tab j'ai tout le monde... y'a 2000 ligne dans le programme ça m'a fait gagner du temps)

cordialement,
N'oubliez pas de marquez votre post comme résolu !
0