Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Applique la disposition de graphique et le type de graphique spécifiés à un graphique sélectionné.
Syntaxe
expression.
ApplyLayout
(Layout,varChartType)
expression Variable qui représente un objet Chart.
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Layout | Obligatoire | Long | Spécifie le type de mise en page, où la valeur correspond à un élément de mise en page rapide sur le ruban. |
| varChartType | Facultatif | Variant | Peut être l’une des constantes Office.XlChartType . |
| Layout | Obligatoire | INT32 | |
| varChartType | Facultatif | Variant |
Valeur renvoyée
Nothing
Remarques
Lorsque vous sélectionnez un graphique dans un rapport, la liste déroulante Disposition rapide se trouve sous l’onglet CRÉATION sous OUTILS DE GRAPHIQUE sur le ruban. Vous pouvez modifier manuellement le type de graphique à l’aide de la commande Modifier le type de graphique dans le même onglet du ruban.
Lorsque vous utilisez une mise en page dans le type de graphique actuel, le paramètre Mise en page est limité au nombre d’éléments de la liste déroulante Mise en page rapide . Utilisez le paramètre varChartType pour appliquer la disposition d’un autre type de graphique sur le graphique actif. Par exemple, vous pouvez appliquer les dispositions disponibles à partir d’un graphique en courbes à un histogramme. La méthode ApplyLayout ajoute uniquement les éléments de graphique en courbes qui sont également disponibles pour le type d’histogramme.
Exemple
L’exemple suivant applique le numéro d’élément de disposition rapide 12 d’un graphique en courbes au graphique sélectionné.
Sub SetChartLayout()
Dim chartShape As Shape
Dim reportName As String
reportName = "Simple scalar chart"
Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
chartShape.Chart.ApplyLayout Layout:=12, varChartType:=Office.XlChartType.xlLine
End Sub
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.