Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Test existence propriiété en BVA

  • Initiateur de la discussion Pierrot93
  • Date de début
P

Pierrot93

Guest
Bonjour le forum, à tous et à toutes

je cherche une synthase VBA me permettant de tester si une propriété existe pour un objet donné.

par exemple, comment savoir si pour un graphique, la propriété 'MinimumScale' existe avant de lancer l'instruction ci dessous.

ActiveChart.Axes(xlCategory).MinimumScale = '01/01/2004'

j'espère être suffisamment précis.

j ai recherché dans l aide vba et le forum mais je n'ai rien trouvé !!

Merci d avance à tous ceux et toutes celles, qui voudront bien m'aider

bonne journée à tous

@+
 

Bernard_XLD

XLDnaute Barbatruc
Membre du Staff
Bonjour Pierrot93, le forum

Utilises une fonction
Code:
Function Test_minimumscale(Chart_Actif As Chart) As Boolean
Dim Test_exist
Test_minimumscale = False
On Error GoTo Fin:
Test_exist = Chart_Actif.Axes(xlCategory).MinimumScale
Test_minimumscale = True
Fin:
End Function
pour le test (graphique actif)
MsgBox Test_minimumscale(ActiveChart)

Cordialement, A+
 
P

Pierrot93

Guest
Bonjour Yeahou, le forum

merci de ta réponse Yeahou, en effet c'est la solution que je vais appliquer, en attendant j'étais passé par un 'on error resume next' qui ne me satisfaisais pas

encore merci et bonne journée.

@+
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…