erreurs compilation: constantes d'objet excel non reconnue

S

sony

Guest
bonjour,

Je dois développer une base de données access qui sélectionne des
données sur une table access, ouvre une feuille excel et trace un
graphique.
Pour aller vite j'ai créé des macros excel que je mets dans des
modules access qui créent des objets excels et adaptent le code vba.
Cependant je rencontre des problèmes avec certaines constantes
d'objet excel (voir exemples à la fin). En effet vba access ne reconnaît pas
ces constantes et renvoie : "erreurs de compilation, variables non
définies".
Je voudrais des conseils, astuces ou liens qui pouraient me permettre
d'avancer car là je bloque.

Exemples de variables posant ce problème :

'msoTextOrientationHorizontal' dans :
Feuille1.Shapes.AddTextbox(msoTextOrientationHorizontal, MargeGauche,
MargeHaut, Hauteur, Largeur).Select
il s'agit ici d'une création de zone de texte

'xlColumnClustered'
dans:
ActiveChart.ChartType = xlColumnClustered

'xlCategory' et 'xlPrimary' dans :
ActiveChart .Axes(xlCategory, xlPrimary).HasTitle = True
 
A

Arnaud

Guest
re,

désolé de répondre si tard sony mais mon adresse mail je la met en cas de besoin et non pour consulter les réponses.
tu aurais mis ton message ici tu aurai directement eu ta réponse ;)
donc je ne sais pas si il y a un moyen plus simple mais moi quand g besoin de savoir la valeur d'une de c variable, je fais tout simplement un :

MsgBox xlColumnClustered

par exemple dans un macro que je lance et la par exemple ici cela m'a affiché 51.
 
S

sony

Guest
Mon graphique, comme tout grand chantier progresse, mais 2 problèmes persistent :
j’ai du mal à choisir l’emplacement et à nommer le graph (pour le récupérer pour différentes manipulation, format, couleur, …)

Les instructions suivantes posent un problème dans le module access alors qu’elles marchent dans excel :

* ExcelClasseur.ActiveChart.Location Where:=xlLocationAsObject, Name:=”reporting”
(De même que si je remplace xlLocationAsObject par 2.)

* ActiveSheet.ChartObjects(ActiveChart.Parent.Name).Name = NomduGraph

Le message suivant s’affiche : Erreur execution ‘13’ : Incompatibilité de type


Merci encore
 

Statistiques des forums

Discussions
312 234
Messages
2 086 468
Membres
103 226
dernier inscrit
smail12